SCAVRAT

SUBROUTINE 0 args, 67 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/SCAVRAT.f90,0000004,0000203
SCAVRAT CALLed by ACALC OCALC PCALC PLUME_VOL VCALC
CALLs to ALOG MIN SQRT
Chng COMMON **NOTHING**
Uses COMMON **NOTHING**
Chng MODULE DENOM FRACSAT GSCVRT LIQCONT PSCVRT WASHOUT
Uses MODULE DEBUG DENOM FRACSAT GSCVRT HENRY IOUNIT IPCODE ISRC LIQCONT NPD NPDMAX PDENS PDIAM PDIFF PDIFFW PRATE PSCVRT SCHMIDT TA TSTOP VGRAV WASHOUT XNU ZSUBP
Uses Argument **NOTHING**
Chng Argument **NOTHING**
Uses PARAMETER RGAS RHOW
Local Var ECOLL FSUBG FSUBL I IMISS KAPPA N RDROP REYNOLD SSTAR STOKE TABS TERM1 TERM2 TERM3 TRES VFALL

GXCHK Version 7.50ME executed at 21:26 on 17 Mar 2021