CAV_SRC

SUBROUTINE 12 args, 114 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/CAV_SRC.f90,0000002,0000239
CAV_SRC CALLed by PRMCALC
CALLs to AMAX1 AMIN1 CAVITY_HT POSITION WAKE_XSIG
Chng COMMON **NOTHING**
Uses COMMON /WAKEDAT/ FQCAV SYCAV SZCAV WB XBADJ XLB XLR YBADJ
Chng MODULE **NOTHING**
Uses MODULE **NOTHING**
Uses Argument HC N1 N2 QC SYC SZC XR YR YRC ZR ZRC
Chng Argument FQCAV0 HC N1 N2 QC SYC SZC YRC ZRC
Uses PARAMETER MXENT MXNTR MXNZ
Local Var DUMY DUMZ I IPOSITN LDB MODE RT2PI SYCAV0 SZCAV0 WCAV WTOP X115B X85B XRB YBMAX YRB YSB ZCAV ZRB

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