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