VDP1

SUBROUTINE 0 args, 57 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/VDP1.f90,0000003,0000165

VDP1	CALLed by	SOCARD
	CALLs to	EXP
	Chng COMMON	**NOTHING**
	Uses COMMON	**NOTHING**
	Chng MODULE	ATSTOP AVGRAV PDIFF PDIFFW RCLI SCF VAIRMS VDPHOR
	Uses MODULE	APDENS APDIAM APHI ATSTOP AVGRAV DEBUG HENRY INPD IOUNIT LUSERVD NSRC NUMSRC PDIFF PDIFFW RCLI SCF TOXICS VAIRMS VDPHOR ZRDEP ZREF
	Uses Argument	**NOTHING**
	Chng Argument	**NOTHING**
	Uses PARAMETER	A1 A2 A3 G RHOAIR VAIR VCON XMFP
	Local Var	DIAMCM I IO6 J N

---

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