30 calls from
DISORT

ALBTRN  1
CHEKIN  1
CMPINT  1
FLUXES  1
LEPOLY  3
PLKAVG  3
PRAVIN  1
PRTINP  1
PRTINT  1
R1MACH  1
RATIO   1
SETDIS  1
SETMTX  1
SOLEIG  1
SOLVE0  1
SURFAC  1
TERPEV  1
TERPSO  1
UPBEAM  1
UPISOT  1
USRINT  1
ZEROAL  1
ZEROIT  4