PRESET

SUBROUTINE 0 args, 115 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/PRESET.f90,0000002,0000237
PRESET CALLed by AERMOD
CALLs to DEFINE EXKEY FSPLIT GETFLD LWRUPR MAX NINT PREINCLUD RECSIZ SET_WINDOW SRCSIZ STONUM
Chng COMMON **NOTHING**
Uses COMMON **NOTHING**
Chng MODULE EOF EVONLY IBELEV IBND IEND ILINE INUM IPNUM IPPNUM IREC ISTA IXM IYM NARC NAVE NEVE NEWID NGRP NMAX NNET NPDMAX NQF NREC NSRC NTYP NVAL OLM PATH PKEYWD PNETID PPATH PREVGRPID PVMRM RUNST RUNST1
Uses MODULE BLINE EOF FIELD FNUM IFC ILINE IMIT INUM INUNIT IPNUM IXM IYM KEYWRD NAVE NEVE NGRP NMAX NNET NREC NSRC NTYP NVAL PATH PPATH
Uses Argument **NOTHING**
Chng Argument **NOTHING**
Uses PARAMETER ILEN_FLD ISTRG
Local Var HPRD I IEPRD ISPRD J LPRD MODNAM NCHR1 NCHR2 NOKEY NOPATH PATHWY RDFRM RMARK

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