VDP

SUBROUTINE 0 args, 142 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/VDP.f90,0000004,0000463
VDP CALLed by ACALC OCALC PCALC PLUME_VOL VCALC
CALLs to EXP LOG NINT SQRT
Chng COMMON **NOTHING**
Uses COMMON **NOTHING**
Chng MODULE RCUT RH RM SCHMIDT VDEP VDEPG XNU ZRDEP
Uses MODULE AFV DEBUG ESTA F2 FINEMASS FO FSEAS2 FSEAS5 HENRY IHOUR ILAND_GD IMONTH IOUNIT IPCODE ISEAS_GD ISRC KURDAT L_METHOD2 NCLOUD NPD NPDMAX OBULEN PDIAM PDIFF PRATE PREC1 PREC2 QSW RCLI RCUT RH RM SCF SCHMIDT SFCP SFCZ0 TA TSTOP USTAR VDEP VDEPG VDPHOR VGRAV WSTAR XNU ZRDEP
Uses Argument **NOTHING**
Chng Argument **NOTHING**
Uses PARAMETER VONKAR
Local Var A ALFA DE DQ DV D_SUBA D_SUB_B F F1 F3 F4 GR GUST_ADJ I ILAND_NDX ISEA5 J K LANUSE N PO PPP PRESSURE Q QSAT RA RAC RACI RB RC RCL RCO RCOX RCS RD RESTAB RG RGO RGS RI RLAI RP RS RX SFACT ST STAB T1 TCEL TO VD1 VD2 VP XINERT

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