From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 542/CH10/EX10.2/Example_10_2.sci | 48 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 48 insertions(+)
 create mode 100755 542/CH10/EX10.2/Example_10_2.sci

(limited to '542/CH10/EX10.2/Example_10_2.sci')

diff --git a/542/CH10/EX10.2/Example_10_2.sci b/542/CH10/EX10.2/Example_10_2.sci
new file mode 100755
index 000000000..eeef53b91
--- /dev/null
+++ b/542/CH10/EX10.2/Example_10_2.sci
@@ -0,0 +1,48 @@
+clear;
+clc;
+printf("\n Example 10.2");
+
+//If x1, x2, x3 are the solute: solvent ratios in thickeners 1, 2, and 3, respectively, the quantities of CaCO3. NaOH, and water in each of the streams can be calculated for every 100 kg of calcium carbonate
+
+//Since the final underflow must contain only 1 per cent of NaOH
+function[f]=F(x)
+    f(1)=(300*x(3))/100 - 0.01;
+    f(2)=300*(x(2)-x(3))/x(4) - x(3);        //Wf = x(4)
+    f(3)=300*(x(1)-x(3))/x(4) - x(2);
+    f(4)=(80-300*x(3))/(600+x(4))-x(1);
+    funcprot(0);
+endfunction
+//An initial guess
+x = [0.1 0.1 0.1 0.1];
+y = fsolve(x,F);
+printf("\n x1 = %f  x2 = %f  x3 = %f Wf = %f",y(1),y(2),y(3),y(4));
+
+printf("\n Thus the amount of water required for washing 100 kg CaCO3 is %f kg",y(4));
+printf("\n The solution fed to reactor contains 0.25 kg/s Na2CO3.This isequivalent to 0.236 kg/s CaCO3,and hence the actual water required is %.2f kg/sec",y(4)*0.236/100);
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-- 
cgit