All systems: | {int f77dims[1];f77dims[0]=n; |
farg=cnfCrela(1,f77dims);} |
type POINTER will expand as follows:
All systems: | farg= |
(F77_POINTER_TYPE *)malloc(n*sizeof(F77_POINTER_TYPE)) |
All other types (except CHARACTER) will expand as follows:
All systems: |
CNF and F77 Mixed Language Programming -- FORTRAN and C