0094 NOTE AEV=TOTAL YEAR'S EVAP
0095 NOTE ARA=TOTAL YEAR'S RAIN
0096 NOTE INT IS TOTAL YEAR'S INTERFLOW
0097 NOTE AGR IS TOTAL YEAR'S GROUND WATER FLOW
0098 N ARO=0.0
0099 L ARO.K=ARO.J*(1-PULSE(1,12,12))+DT*RT9.JK
0100 N AEV=0.0
0101 L AEV.K=AEV.J*(1-PULSE(1,12,12))+DT*SUP3.J
0102 N ARA=0.0
0103 L ARA.K=ARA.J*(1-PULSE(1,12,12))+DT*SUP5.J
0104 N INT=0
0105 L INT.K=INT.J*(1-PULSE(1,12,12))+'DT*RT4.JK
0106 N AGR=0
0107 L AGR.K=AGR.J*(1-PULSE(1,12,12))+DT*RT2.JK
0108 NOTE STO IS CHANGE IN STORAGE ON AN ANNUAL BASIS
0109 S STO.K=ARA.K-(ARO.K+AEV.K)
0110 NOTE LL4 IS CUMULATIVE WATER AREA PER YEAR IN ACRE MONTHS
0111 L LL4.K=(LL4.J+DT*(TABHL(TABAT,L2.J,0,55E5,5E5)))*(1-PULSE(1,12,12))
0112 N LL4=0.0
0113 NOTE
0114 NOTE TABLE OF RAINFALL INPUT
0115 NOTE RAINFALL INPUT IS IN INCHES. PROGRAM DIVIDES BY 12.
0116 NOTE FT MYERS RAINFALL, FROM JUNE, 1950 THRU MAY 1975
0117 T RAINTB=4.84/6.83/5.93/8.32/3.26/0.02/2.20/0.38/1.96/1.13/2.71/2.14 50-51
0118 X /9.19/11.44/10.30/3.43/11.9171.14/0.14/1.28/4.34/2.05/0.78/1.75 51-52
0119 X /7.95/5.74/8.39/12.35/8.34/0.75/0.71/1.71/2.01/0.68/2.25/0.41 52-53
0120 X /12.81/9.34/4.32/15.58/6.68/1.07/1.18/0.30/2.53/2.13/3.49/4.08 53-54
0121 X /4.78/9.19/6.84/10.31/1.82/2.33/1.93/2.68/1.16/0.32/0.97/3.23 54-55
0122 X /8.53/8.76/4.29/10.50/2.15/0.52/0.85/0.57/1.06/0.05/3.50/4.76 55-56
0123 X /4.67/5.34/8.03/6.00/4.42/1.35/0.10/0.78/3.68/4.73/2.69/7.97 56-57
0124 X /4.85/12.52/9.39/8.77/3.19/1.52/3.53/6.04/1.26/10.31/2.18/6.22 57-58
0125 X /7.37/10.92/4.12/8.89/4.57/1.4,3/3.36/1.48/1.72/6.33/1.75/4.74 58-59
0126 X /16.10/6.17/5.75/6.89/12.04/1.92/1.79/0.46/3.66/1.87/3.83/2.20 59-60