1 files changed, 20 insertions, 0 deletions
diff --git a/632/CH10/EX10.12/example10_12.sce b/632/CH10/EX10.12/example10_12.sce
new file mode 100755
index 000000000..0bb1a88d3
--- /dev/null
+++ b/632/CH10/EX10.12/example10_12.sce
@@ -0,0 +1,20 @@
+//clc()
+macid = 1000;//kg ( basis - dilute phosphoric acid )
+Mphacid = 97.998;
+P = 1.25;//% ( dilute % )
+mphacid = macid * P /100;
+Nphacid = mphacid / Mphacid;
+//1mole of phosphoric acid - 1mole of trisodium phosphate
+NTSP = Nphacid;
+MTSP = 380.166;
+mTSP = NTSP * MTSP;
+disp("kg",mTSP,"(a)Maximum weight of TSP obtained = ")
+NCO2 = NTSP;
+Pwater = 6.27//kPa
+//since gas is saturated with water vapour, vapour pressure = partial pressure
+Nwater = NCO2 * Pwater / ( 100 - Pwater );
+Ntotal = Nwater + NCO2;
+P = 100;//kPa
+T = 310;//K
+V = Ntotal * 101.3 * T *22.4143 / ( P * 273.15 );
+disp("m^3",V,"(b)Volume of CO2 = ")
+\ No newline at end of file