**++ Symbol table for subprogram ERODINIT in file erodinit.for produced by SPAG 6.70Rc-40 at 15:33:38 on 10 Dec 2012 0 X erodinit.for,0000006,0000110 1 D M +../inc/erosion/e2grid.inc 2 D MU +../inc/erosion/m2geo.inc 3 D M +../inc/erosion/threshold.inc 4 D MU +../inc/m1flag.inc 5 D U +../inc/m1geo.inc 6 D U +../inc/m1subr.inc 7 D U +../inc/p1werm.inc 8 D M +../inc/s1surf.inc 9 1 C / 2/SM 9072144 /E2GRID/CSR,W0BR 10 4 C /28/SMU 112 /M1FLAG/AM0IFL,AM0EIF,AM0CGF,AM0CIF,AM0DIF,AM0HFL,AM0GDF,AM0TIL,AM0DEFOLIATEFL,AM0KILFL,AM0CROPUPFL,AM0SFL,AM0TFL,AM0CFL,AM0DFL, AM0EFL,AM0OIF,AM0SIF,INIT_LOOP,CALIB_LOOP,REPORT_LOOP,CALIB_DONE,MAX_CALIB_CYCLES,CALIB_CYCLE,N_ROT_CYCLES, WIND_GEN_FMT_FLAG,CLI_GEN_FMT_FLAG,WIND_MAX_FLAG 11 5 C /12/S U 54160 /M1GEO/NACCTR,NBR,SIM_AREA,AMASIM,AMPBR,AMXAR,AMXBR,AMXBRW,AMXSIM,AMXSR,AMZBR,AMZBT 12 6 C /12/S U 1464 /M1SUBR/NSUBR,AM0CSR,AMNRYR,AMNROTCYCLE,AMRSLP,SFCOV,WATEREROSION,SOILROCKFRAGMENTS,AM0SID,AM0TAX,AM0LOCALPHASE,SOILLOSSTOL 13 2 C / 6/SMU 24 /M2GEO/IMAX,JMAX,IX,JY,XGDPT,YGDPT 14 8 C /13/SM 208 /S1SURF/ASZCR,ASFCR,ASMLOS,ASFLOS,ASDCR,ASECR,ASFALD,ASFALW,ACANAG,ACANCR,ASF10AN,ASF10EN,ASF10BK 15 3 C /16/SM 256 /THRESHOLD/NE_EROSION,NE_SNOWDEPTH,NE_WUS_ANEMOM,NE_WUS_RANDOM,NE_WUS_RIDGE,NE_WUS_BIODRAG,NE_WUS,NE_BARE,NE_FLAT_COV, NE_SURF_WET,NE_AG_DEN,NE_WUST,NE_SFD84,NE_ASVROC,NE_WZZO,NE_SFCV 16 14 9 R ( 1)CM E 4 ACANAG(mnsub) 17 14 10 R ( 1)CM E 4 ACANCR(mnsub) 27 10 2 L CMU E AM0EIF 48 11 9 R ( 2)C U E 4 AMXSIM(mnspt,mnspt) 68 9 1 I ( 2)CM E 252004 CSR(0:mngdpt,0:mngdpt) 69 S 41 ERODINIT 70 I MU E I 71 13 1 I CMU E IMAX 73 13 3 R CM E IX 74 I MU E J 75 13 2 I CMU E JMAX 76 13 4 R CM E JY 79 7 PI U E 4 MNAR=4 80 7 PI U E 2 MNARPT=2 82 7 PI U E 2 MNBPT=2 83 7 PI U E 500 MNBR=500 87 7 PI U E 501 MNGDPT=501 93 7 PI U E 2 MNSPT=2 94 7 PI U E 2 MNSRPT=2 95 7 PI U E 4 MNSUB=4 99 11 2 I C U E NBR 100 15 11 R ( 1)CM E 4 NE_AG_DEN(mnsub) 101 15 14 R ( 1)CM E 4 NE_ASVROC(mnsub) 102 15 8 R ( 1)CM E 4 NE_BARE(mnsub) 103 15 1 I ( 1)CM E 4 NE_EROSION(mnsub) 104 15 9 R ( 1)CM E 4 NE_FLAT_COV(mnsub) 105 15 16 R ( 1)CM E 4 NE_SFCV(mnsub) 106 15 13 R ( 1)CM E 4 NE_SFD84(mnsub) 107 15 2 I ( 1)CM E 4 NE_SNOWDEPTH(mnsub) 108 15 10 R ( 1)CM E 4 NE_SURF_WET(mnsub) 109 15 7 R ( 1)CM E 4 NE_WUS(mnsub) 110 15 12 R ( 1)CM E 4 NE_WUST(mnsub) 111 15 3 R ( 1)CM E 4 NE_WUS_ANEMOM(mnsub) 112 15 6 R ( 1)CM E 4 NE_WUS_BIODRAG(mnsub) 113 15 4 R ( 1)CM E 4 NE_WUS_RANDOM(mnsub) 114 15 5 R ( 1)CM E 4 NE_WUS_RIDGE(mnsub) 115 15 15 R ( 1)CM E 4 NE_WZZO(mnsub) 116 12 1 I C U E NSUBR 120 s SBBR 121 s SBGRID 122 s SBIGRD 127 I MU E SR 132 13 5 I C U E XGDPT 133 13 6 I C U E YGDPT **-- END OF SYMBOL TABLE **+-!*--ERODINIT25 ./Restructure/Output/erodinit.spg