RECART

SUBROUTINE 0 args, 106 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/RECART.f90,0000002,0000183

RECART	CALLed by	RECARD
	CALLs to	ERRHDL FLGHGT GENCAR HILHGT SETCAR TERHGT XYPNTS
	Chng COMMON	**NOTHING**
	Uses COMMON	**NOTHING**
	Chng MODULE	DUMMY ICOUNT IDC1 IEND IEVSET IFGSET IHLSET INCSET INNET IRZE IRZF IRZH ISTA IXYSET IZE IZF IZH JCOUNT KTYPE NETIDT NEWID PNETID RECERR
	Uses MODULE	ELEV FIELD FLAT FLGPOL ICOUNT IEVSET IFC IFGSET IHLSET INCSET INNET IRXR IRZE ISTA IXYSET IZE IZF IZH JCOUNT KTYPE NETIDT NEWID NNET NTID PNETID RECERR
	Uses Argument	**NOTHING**
	Chng Argument	**NOTHING**
	Uses PARAMETER	**NOTHING**
	Local Var	I MODNAM

---

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