SETUP

SUBROUTINE 0 args, 94 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/SETUP.f90,0000001,0000236
SETUP CALLed by AERMOD
CALLs to COCARD DEFINE ERRHDL EXKEY GETFLD LWRUPR MECARD OUCARD RECARD SETORD SOCARD TGCARD
Chng COMMON **NOTHING**
Uses COMMON **NOTHING**
Chng MODULE DDPLETE DUMMY ECHO EOF ILINE MODOPS PATH PKEYWD RUNST RUNST1 WDPLETE
Uses MODULE BLINE ECHO EOF FIELD ICSTAT ILINE IMSTAT INUNIT IOSTAT IOUNIT IRSTAT ISSTAT ITEVUT KEYWRD LDGAS LDPART LOCB LWGAS LWPART PATH PPATH RUNST1
Uses Argument **NOTHING**
Chng Argument **NOTHING**
Uses PARAMETER ISTRG
Local Var ECFRM EVFRM I IFSTAT MODNAM NOKEY NOPATH PATHWY RDFRM

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