470
A.S. Anderson and R.C. Hanson
900
910
920
930
940
950
960
970
980
990
1000
1010
1020
1030
1040
1050
1060
1070
1080
1090
1100
1110
1120
1130
1140
1150
1160
1170
1180
1190
FOLD(L)=F(L)
SUM=VN(L)*12.+SUM
200 CONTINUE
NN1=0
10 CONTINUE
H=SUM+LTH
J1=K1-NN+1
K85=K85+1
IF(K85=10)GOTO482
GO TO 807
482 CONTINUE
K85=0
H=H-10.*DEPTH
vs=o.
DO 503 JJ2=1,500
L=K1+1-JJ2
VS=VN(L)+VS
IF(VS*12..GT.10.*DEPTH) GO TO 504
503 CONTINUE
504 CONTINUE
NN1=JJ2-1
K86=K86+1
IF(K86.LT.l)GOTO807
K86=0
806 WRITE(6,*)NN1 ,TIME,VS,H,(CON(L),L=Jl ,K1,1)
79 CONTINUE
807 CONTINUE
400 CONTINUE
WRITE(6,*) SUM,H
END
APPENDIX C
Symbology
AK
CO
Lumped parameters of Carman-Kozeney equation
Concentration of sludge being removed
CON(L)
Concentration of layer L
DEPTH
Height of column removed
DT
DR
F
FI
FU
H
K
*LTH
NN
PBW
Delta time for layer addition
Dry weight of solids
Porosity of a layer
Initial porosity
Ultimate porosity
Initial column height
Adjusted value of AK
Layer thickness
Number of layers
Percent bound water
mg/liter
mg/liter
inches
seconds
mg/liter
inches
inches