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

---
 2223/CH18/EX18.17/Ex18_17.sav | Bin 0 -> 41560 bytes
 2223/CH18/EX18.17/Ex18_17.sce |  45 ++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 45 insertions(+)
 create mode 100755 2223/CH18/EX18.17/Ex18_17.sav
 create mode 100755 2223/CH18/EX18.17/Ex18_17.sce

(limited to '2223/CH18/EX18.17')

diff --git a/2223/CH18/EX18.17/Ex18_17.sav b/2223/CH18/EX18.17/Ex18_17.sav
new file mode 100755
index 000000000..6a90f531c
Binary files /dev/null and b/2223/CH18/EX18.17/Ex18_17.sav differ
diff --git a/2223/CH18/EX18.17/Ex18_17.sce b/2223/CH18/EX18.17/Ex18_17.sce
new file mode 100755
index 000000000..ec87bb2c5
--- /dev/null
+++ b/2223/CH18/EX18.17/Ex18_17.sce
@@ -0,0 +1,45 @@
+// scilab Code Exa 18.17 three stage steam turbine
+
+t1=250;  // Initial Temperature in degree C
+n_T=0.75; // overall Efficiency of the turbine
+p1=10; //Initial Pressure in bar
+n_m=0.98; // Mechanical Efficiency
+m=5;
+N=1e3; // rotor Speed in RPM
+H=45; // height in m
+ro=1e3;
+g=9.81; // Gravitational acceleration in m/s^2
+Q=2.5; // discharge in m3/s
+
+P=(ro*Q*g*H)/(n_T);
+delh_T=P/(m*n_m*1e3);
+delh_st=delh_T/3;
+delh1_4ss=delh_T/n_T;
+
+//part(a)steam conditions
+h1=2940; // from Mollier diagram
+disp("(a)steam conditions at the turbine exit are:")
+h_4ss=h1-delh1_4ss;
+p4=1.2; // in bar
+disp("bar",p4,"pressure:")
+h4=2640;
+x4=0.98;
+t4=104.8; // in degree C
+disp("degree C",t4,"temperature:")
+disp(x4,"the dryness fraction is:")
+
+// part(b)stage Efficiencies
+h2=h1-delh_st;
+p2=5;
+h3=h2-delh_st;
+p3=2.5;
+h4=h3-delh_st;
+h2s=2795;
+h3s=2705;
+h4s=2605;
+n_st1=delh_st/(h1-h2s);
+n_st2=delh_st/(h2-h3s);
+n_st3=delh_st/(h3-h4s);
+disp ("%",n_st1*100,"(b)Efficiency of the first stage is")
+disp ("%",n_st2*100,"Efficiency of the second stage is")
+disp ("%",n_st3*100,"Efficiency of the third stage is")
-- 
cgit