FRGAUSS

SUBROUTINE 5 args, 5 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/FRGAUSS.f90,0000002,0000038

FRGAUSS	CALLed by	WAKE_FQC
	CALLs to	ABS AMAX1 ERFDIF
	Chng COMMON	**NOTHING**
	Uses COMMON	**NOTHING**
	Chng MODULE	**NOTHING**
	Uses MODULE	**NOTHING**
	Uses Argument	H1 H2 HCNTR SIGMA
	Chng Argument	FRACT
	Uses PARAMETER	**NOTHING**
	Local Var	S SMALL SQRT2 Z1 Z2

---

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