RELDISP

SUBROUTINE 3 args, 20 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/RELDISP.f90,0000002,0000066
RELDISP CALLed by PLUME_VOL
CALLs to SQRT
Chng COMMON **NOTHING**
Uses COMMON **NOTHING**
Chng MODULE **NOTHING**
Uses MODULE EPSEFF EPSEFF3 EPSEFFD HS ISRC PPFACT STABLE SWEFF SWEFF3 SWEFFD SYINIT SZB SZB3 SZBD SZINIT UEFF UEFF3 UEFFD UNSTAB ZI
Uses Argument SROUT XARG
Chng Argument SROUT SROUT3
Uses PARAMETER A1 A2 AR1
Local Var MODNAM SRAMB TLR VSIGR

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