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

---
 632/CH10/EX10.13/example10_13.sce | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100755 632/CH10/EX10.13/example10_13.sce

(limited to '632/CH10/EX10.13')

diff --git a/632/CH10/EX10.13/example10_13.sce b/632/CH10/EX10.13/example10_13.sce
new file mode 100755
index 000000000..4e9dac80b
--- /dev/null
+++ b/632/CH10/EX10.13/example10_13.sce
@@ -0,0 +1,19 @@
+//clc()
+mTSPd = 1000;//kg ( basis - 20% dilute TSP )
+P = 20;//%
+mTSP = mTSPd * P / 100;
+NTSP = mTSP / 163.974;
+msodaashd = NTSP * 106;
+mphacidd = NTSP * 97.998;
+mNaOHd = NTSP * 40.008;
+Pphacid = 85;//% (85% solution phosphoric acid)
+PNaOH = 50;//% (50% solution NaOH)
+//let x be the water in soda ash,
+//taking water balance,
+x = (mTSPd - mTSP) - mNaOHd * PNaOH /(100 - PNaOH) - mphacidd * (100 - Pphacid) / Pphacid;
+msodaash = msodaashd + x;
+C = msodaashd *100 / msodaash;
+disp("%",C,"(a)Concentration of soda ash solution = ")
+mphacid = mphacidd * 100 / Pphacid;
+R = msodaash / mphacid;
+disp(R,"(b)Weight ratio in which soda ash and commercial phosphoric acid are mixed = ")
\ No newline at end of file
-- 
cgit