NUMPR1

SUBROUTINE 0 args, 52 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/NUMPR1.f90,0000002,0000132
NUMPR1 CALLed by AERMOD
CALLs to **NOTHING**
Chng COMMON /AMBIENT/ /NUMPARM/ ADIA ALPHAP BETAP DS GRAVI NENT NSTEP NZA PTGRAD0 RGAS RP SLAST XCAT ZFACEA ZGPTA ZMIN
Uses COMMON /AMBIENT/ NZA ZGPTA
Chng MODULE **NOTHING**
Uses MODULE **NOTHING**
Uses Argument **NOTHING**
Chng Argument **NOTHING**
Uses PARAMETER IO6 MXENT MXENTP1 MXNZ MXNZP1
Local Var DZ I NN NZAP1

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