**++ Symbol table for subprogram AA0018 in file h1temp.inc
     produced by SPAG     6.70Rc-40 at 21:09:21 on  9 Dec 2012
   0         D                           h1temp.inc,0000017,0000025
   1         C     / 4/S                /H1TEMP/AHTSAV,AHTSMX,AHTSMN,AHFICE
   2         M?            I            AA0018
   3    1   4 R    ( 2)C   E            AHFICE(mnsz,mnsub)
   4    1   1 R    ( 2)C   E            AHTSAV(mnsz,mnsub)
   5    1   3 R    ( 2)C   E            AHTSMN(mnsz,mnsub)
   6    1   2 R    ( 2)C   E            AHTSMX(mnsz,mnsub)
   7          I          U I            MNSUB
   8          I          U I            MNSZ
**-- END OF SYMBOL TABLE
**+-!*--AA00184 ./Restructure/Output/h1temp.spg