APARM

SUBROUTINE 2 args, 71 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/APARM.f90,0000002,0000163
APARM CALLed by SOPARM
CALLs to ABS COS ERRHDL SIN
Chng COMMON **NOTHING**
Uses COMMON **NOTHING**
Chng MODULE AANGLE AHS AQS ASZINI AXCNTR AXINIT AXVERT AYCNTR AYINIT AYVERT NVERTS
Uses MODULE AANGLE AHS AQS ASZINI AXCNTR AXINIT AXS AXVERT AYCNTR AYINIT AYS AYVERT IFC NVERTS
Uses Argument ISDX TEMP
Chng Argument **NOTHING**
Uses PARAMETER DTORAD IFMAX
Local Var I MODNAM

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