PRTSUM

SUBROUTINE 0 args, 101 executable stmts in /Users/john/Dropbox (Polyhedron Solutions)/Work/AERMOD/PRTSUM.f90,0000002,0000232
PRTSUM CALLed by OUTPUT
CALLs to HEADER INT MOD
Chng COMMON **NOTHING**
Uses COMMON **NOTHING**
Chng MODULE IAVE IGRP NGPP
Uses MODULE AMXVAL ANNUAL AXR AYR AZELEV AZFLAG AZHILL CHIDEP CHRAVE GRPID HMAX HMCLM HMDATE HMLOC IANHRS IAVE IGRP IMXLOC IOUNIT ITYP NETID NGPP NHIAVE NUMAVE NUMGRP NUMYRS NVAL OUTLBL PERIOD PERLBL POLLUT RECTYP
Uses Argument **NOTHING**
Chng Argument **NOTHING**
Uses PARAMETER NHIANN
Local Var AXR1 AYR1 AZELV1 AZFLG1 AZHIL1 I IHST INDLOC INDMX IVAL IWHP MODNAM PERCHR RANK XR2 YR2 ZE2 ZF2 ZH2

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