HRLOOP

SUBROUTINE 0 args, 256 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/HRLOOP.f90,0000002,0000430
HRLOOP CALLed by AERMOD
CALLs to AVER CALC CHK_ENDYR ERRHDL HIVALS HRQEXT MAX MAXFIL MAXVAL METEXT METSUM MIN MOD O3EXT OLM_CALC POSTFL PRTDAY PVMRM_CALC RSDUMP TOXXFL
Chng COMMON **NOTHING**
Uses COMMON **NOTHING**
Chng MODULE AERVAL AERVALD AVEVAL CALCS CHI DUMMY ENDMON EOF FIRSTWET FULLDATE HRVAL HRVALD IANCLM IANHRS IANMSG IANWET IAVE IDCONC IDUM IFIRSTHR IGRP ILINE IREC ISRC ITYP IWETCLM IWETMSG KURDAT NDAYS NSDRYCLM NSDRYMSG NSEACM NSEAHR NSKIPDRY NSKIPTOT NSKIPWET NSWETCLM NSWETMSG NTOTHRS NUMCLM NUMHRS NUMMSG NWETHR O3CONC PREC1 PREC2 PRMVAL PRMVALD SCIMHR TXCONC WETHR
Uses MODULE ANNUAL CLMHR CLMPRO CONC DAYTAB DBGUNT DEBUG DEPOS ENDMON EOF FIRSTWET FULLDATE IANCLM IANHRS IANMSG IANWET IAVE IDCONC IDUM IDYTAB IEDATE IFIRSTHR IGRP IHOUR ILINE INCRST IPAIR IPROC IREC ISDATE ISEAS ISRC ITOXFL ITXUNT ITYP IWETCLM IWETMSG IYR JDAY KAVE KURDAT MSGHR MSGPRO MXFILE NDAYS NOCHKD NREGINT NREGSTART NSDRYCLM NSDRYMSG NSEACM NSEAHR NSKIPDRY NSKIPTOT NSKIPWET NSWETCLM NSWETMSG NTOTHRS NUMAVE NUMCLM NUMGRP NUMHRS NUMMSG NUMREC NUMSRC NUMTYP NWETHR NWETINT NWETSTART O3BACK O3CONC O3FILE O3MISS OBULEN OLM PERIOD PM10AVE PPFILE PRATE PREC1 PVMRM QFLAG RSTSAV RUNERR SCIM SCIMHR SCIMOUT SEASONHR STABLE TXCONC TXFILE WDEP WDPLETE WETHR WETSCIM ZI
Uses Argument **NOTHING**
Chng Argument **NOTHING**
Uses PARAMETER NPAIR
Local Var I ILSAVE MODNAM O3MAX24 O3MIN O3VALUES RDUM

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