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.10/example10_10.sce | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100755 632/CH10/EX10.10/example10_10.sce (limited to '632/CH10/EX10.10') diff --git a/632/CH10/EX10.10/example10_10.sce b/632/CH10/EX10.10/example10_10.sce new file mode 100755 index 000000000..0e1b75e38 --- /dev/null +++ b/632/CH10/EX10.10/example10_10.sce @@ -0,0 +1,27 @@ +//clc() +mlime = 5;//kg +mcoke = 1;//kg +PCaCO3l = 84.5;//% +PMgCO3l = 11.5;//% +NCaCO3l = PCaCO3l * mlime / (100.09*100); +NMgCO3l = PMgCO3l * mlime / (84.312*100); +mInertsl = mlime * ( 100 - PCaCO3l - PMgCO3l ) / 100; +PCc = 76;//% +Pashc = 21;//% +Pwaterc = 3;//% +NCc = mcoke * PCc /(100*12); +Nwaterc = mcoke * Pwaterc / ( 100 * 18.016 ); +mash = Pashc * mcoke / 100; +//CaCO3 + C + O2 = CaO + 2CO2 +//MgCO3 + C + O2 = MgO + 2CO2 +PCaCO3conv = 95;//(Percent calcination of CaCO3) +PMgCO3conv = 90;//(Percent calcination of MgCO3) +NCaO = PCaCO3conv * NCaCO3l / 100; +mCaO = NCaO * 56.08; +NMgO = PMgCO3conv * NMgCO3l / 100; +mMgO = NMgO * 40.312; +mCaCO3 = (NCaCO3l * (1-PCaCO3conv/100)*100.09); +mMgCO3 = (NMgCO3l * (1-PMgCO3conv/100)*84.312); +mtotal = mCaO + mMgO + mCaCO3 + mMgCO3 + mInertsl + mash; +PCaO = mCaO * 100 / mtotal; +disp("%",PCaO,"The weight percent of CaO in the product leaving the kiln = ") \ No newline at end of file -- cgit