Guest User

Untitled

a guest
Dec 10th, 2017
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.67 KB | None | 0 0
  1.  
  2. typedef void (FORTRAN_CONV *MODTRAN3FORTRAN)(
  3. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  4. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  5. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  6. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  7. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  8.  
  9. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  10. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  11. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  12. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  13. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  14.  
  15. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*,
  16. void*, void*, void*, void*, void*, void*, void*, void*, void*, void*);
  17.  
  18. MODTRAN3FORTRAN f = (MODTRAN3FORTRAN)modtran;
  19. f(
  20. &args->FULLFILE, &args->TABFILE, &args->PLTABFILE, &args->SUNFILE, &args->DIRACFILE,
  21. &args->UFTAPXFILE, &args->CODE, &args->MODEL, &args->ITYPE, &args->IEMSCT,
  22. &args->IMULT, &args->M1, &args->M2, &args->M3, &args->M4,
  23. &args->M5, &args->M6, &args->MDEF, &args->IM, &args->NOPRNT,
  24. &args->TBOUND, &args->SPECALB, &args->LDISORT, &args->ISTRM, &args->LSUN1,
  25.  
  26. &args->ISUN, &args->CO2MIX, &args->IHAZE, &args->ISEASN, &args->IVULCN,
  27. &args->ICSTL, &args->ICLD, &args->IVSA, &args->VIS, &args->WSS,
  28. &args->WHH, &args->RAINRT, &args->GNDALT, &args->H1, &args->H2,
  29. &args->ANGLE, &args->RANGE, &args->BETA, &args->RO, &args->LEN,
  30. &args->PHI, &args->IV1, &args->IV2, &args->IDV, &args->IRES,
  31.  
  32. &args->YFLAG, &args->XFLAG, &args->DLIMIT, &args->CTHIK, &args->CALT,
  33. &args->CEXT, &args->ISEED, &args->NCRALT, &args->NCRSPC, &args->CWAVLN,
  34. &args->CCOLWD, &args->CCOLIP, &args->CHUMID, &args->ASYMWD, &args->ASYMIP,
  35. &args->ZCVSA, &args->ZTVSA, &args->ZINVSA, &args->ML, &args->IRD1,
  36. &args->IRD2, &args->TITLE, &args->ZMDLIN, &args->PIN, &args->TIN,
  37.  
  38. &args->WMOLIN, &args->XMOLIN, &args->JCHARIN, &args->JCHARXIN, &args->AHAZE,
  39. &args->EQLWCZ, &args->RRATZ, &args->IHA1, &args->ICLD1, &args->IVUL1,
  40. &args->ISEA1, &args->ICHR1, &args->IREG, &args->AWCCON, &args->TITLE2D,
  41. &args->WAVLEN, &args->VX, &args->EXTC, &args->ABSC, &args->ASYM,
  42. &args->ZCLD, &args->CLD, &args->CLDICE, &args->RR, &args->IPARM,
  43.  
  44. &args->IPH, &args->IDAY, &args->ISOURC, &args->PARM1, &args->PARM2,
  45. &args->PARM3, &args->PARM4, &args->TIME, &args->PSIPO, &args->ANGLEM,
  46. &args->G, &args->NANGLS, &args->ANGF, &args->F, args->SCALING,
  47. args->WAVELEN, args->TRANSMIT, args->TOTALRAD, args->PATHRAD, args->SKYRAD);
Add Comment
Please, Sign In to add comment