**++ Symbol table for subprogram AA0037 in file s1sgeo.inc
     produced by SPAG     6.70Rc-40 at 21:09:21 on  9 Dec 2012
   0         D                           s1sgeo.inc,0000012,0000028
   1         C     /11/S                /S1SGEO/ASZRGH,ASZRHO,ASXRGW,ASXRGS,ASARGO,ASXDKS,ASXDKH,AS0RRK,ASLRRC,ASLRR,ASLRRO
   2         M?            I            AA0037
   3    1   8 R    ( 1)C   E            AS0RRK(mnsub)
   4    1   5 R    ( 1)C   E            ASARGO(mnsub)
   5    1  10 R    ( 1)C   E            ASLRR(mnsub)
   6    1   9 R    ( 1)C   E            ASLRRC(mnsub)
   7    1  11 R    ( 1)C   E            ASLRRO(mnsub)
   8    1   7 R    ( 1)C   E            ASXDKH(mnsub)
   9    1   6 R    ( 1)C   E            ASXDKS(mnsub)
  10    1   4 R    ( 1)C   E            ASXRGS(mnsub)
  11    1   3 R    ( 1)C   E            ASXRGW(mnsub)
  12    1   1 R    ( 1)C   E            ASZRGH(mnsub)
  13    1   2 R    ( 1)C   E            ASZRHO(mnsub)
  14          I          U I            MNSUB
**-- END OF SYMBOL TABLE
**+-!*--AA00374 ./Restructure/Output/s1sgeo.spg