Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- typedef void (FORTRAN_CONV *MODTRAN3FORTRAN)(
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
- void*, void*, void*, void*, void*, void*, void*, void*, void*, void*);
- MODTRAN3FORTRAN f = (MODTRAN3FORTRAN)modtran;
- f(
- &args->FULLFILE, &args->TABFILE, &args->PLTABFILE, &args->SUNFILE, &args->DIRACFILE,
- &args->UFTAPXFILE, &args->CODE, &args->MODEL, &args->ITYPE, &args->IEMSCT,
- &args->IMULT, &args->M1, &args->M2, &args->M3, &args->M4,
- &args->M5, &args->M6, &args->MDEF, &args->IM, &args->NOPRNT,
- &args->TBOUND, &args->SPECALB, &args->LDISORT, &args->ISTRM, &args->LSUN1,
- &args->ISUN, &args->CO2MIX, &args->IHAZE, &args->ISEASN, &args->IVULCN,
- &args->ICSTL, &args->ICLD, &args->IVSA, &args->VIS, &args->WSS,
- &args->WHH, &args->RAINRT, &args->GNDALT, &args->H1, &args->H2,
- &args->ANGLE, &args->RANGE, &args->BETA, &args->RO, &args->LEN,
- &args->PHI, &args->IV1, &args->IV2, &args->IDV, &args->IRES,
- &args->YFLAG, &args->XFLAG, &args->DLIMIT, &args->CTHIK, &args->CALT,
- &args->CEXT, &args->ISEED, &args->NCRALT, &args->NCRSPC, &args->CWAVLN,
- &args->CCOLWD, &args->CCOLIP, &args->CHUMID, &args->ASYMWD, &args->ASYMIP,
- &args->ZCVSA, &args->ZTVSA, &args->ZINVSA, &args->ML, &args->IRD1,
- &args->IRD2, &args->TITLE, &args->ZMDLIN, &args->PIN, &args->TIN,
- &args->WMOLIN, &args->XMOLIN, &args->JCHARIN, &args->JCHARXIN, &args->AHAZE,
- &args->EQLWCZ, &args->RRATZ, &args->IHA1, &args->ICLD1, &args->IVUL1,
- &args->ISEA1, &args->ICHR1, &args->IREG, &args->AWCCON, &args->TITLE2D,
- &args->WAVLEN, &args->VX, &args->EXTC, &args->ABSC, &args->ASYM,
- &args->ZCLD, &args->CLD, &args->CLDICE, &args->RR, &args->IPARM,
- &args->IPH, &args->IDAY, &args->ISOURC, &args->PARM1, &args->PARM2,
- &args->PARM3, &args->PARM4, &args->TIME, &args->PSIPO, &args->ANGLEM,
- &args->G, &args->NANGLS, &args->ANGF, &args->F, args->SCALING,
- args->WAVELEN, args->TRANSMIT, args->TOTALRAD, args->PATHRAD, args->SKYRAD);
Add Comment
Please, Sign In to add comment