All Unix: | {int f77dims[1];f77dims[0]=nels; |
fstring=cnfCrefa(strlen(cstring),1,f77dims); | |
fstring_length=strlen(cstring);} | |
VAX/VMS: | {int f77dims[1];f77dims[0]=nels; |
fstring_arg = cnfCrefa(strlen(cstring),1,f77dims); | |
fstring = fstring_arg->pointer; | |
fstring_length = fstring_arg->length;} |
CNF and F77 Mixed Language Programming -- FORTRAN and C