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