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