summaryrefslogtreecommitdiff
path: root/2966/CH1/EX1.2.89/1_2_89.sce
diff options
context:
space:
mode:
Diffstat (limited to '2966/CH1/EX1.2.89/1_2_89.sce')
-rw-r--r--2966/CH1/EX1.2.89/1_2_89.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/2966/CH1/EX1.2.89/1_2_89.sce b/2966/CH1/EX1.2.89/1_2_89.sce
new file mode 100644
index 000000000..0029526f8
--- /dev/null
+++ b/2966/CH1/EX1.2.89/1_2_89.sce
@@ -0,0 +1,25 @@
+//water//
+//page 1.89 example 2//
+clc
+Purity_Lime=.9
+Purity_soda=.95
+W1=155;//amount of Mg(HCO3)2 in ppm//
+W2=23;//amount of MgCl2 in ppm//
+W3=5;//amount of H2SO4 in ppm//
+W4=111;//amount of CaCl2 in ppm//
+M1=100/146;//multiplication factor of Mg(HCO3)2//
+M2=100/95;//multiplication factor of MgCl2//
+M3=100/98;//multiplication factor of H2SO4//
+M4=100/111;//multiplication factor of CaCl2//
+P1=W1*M1;//in terms of CaCO3//2*L
+P2=W2*M2;//in terms of CaCO3//L+S
+P3=W3*M3;//in terms of CaCO3//L+S
+P4=W4*M4;//in terms of CaCO3//S
+printf ("We do not take NaCl and Na2SO4 since they do not react with lime/soda");
+V=50000;//volume of water in litres//
+L=0.74*(2*P1+P2+P3)*V/Purity_Lime;//lime required in mg//
+L=L/10^3;
+printf("\n Amount of Lime required is %.2f g",L);
+S=1.06*(P2+P3+P4)*V/Purity_soda;//soda required in mg//
+S=S/10^3;
+printf("\n Amount of Soda required is %.2f g",S) \ No newline at end of file