1 files changed, 16 insertions, 0 deletions
diff --git a/172/CH9/EX9.11/ex11.sce b/172/CH9/EX9.11/ex11.sce
new file mode 100755
index 000000000..b95bb560d
--- /dev/null
+++ b/172/CH9/EX9.11/ex11.sce
@@ -0,0 +1,16 @@
+//example 11
+//turbine inlet pressure
+clear
+clc
+hi=1757.3 //initial specific heat of enthalpy of air in  kJ/kg
+si=8.6905 //initial specifc entropy of airin kJ/kg-K
+he=855.3 //final specific heat of enthalpy of air in kJ/kg
+w=hi-he //actual work done by turbine in kJ/kg
+n=0.85 //efficiency of turbine 
+ws=w/n //ideal work done by turbine in kJ/kg
+hes=hi-ws //from first law of isentropic process
+Tes=683.7 //final temperature in kelvins from air tables
+ses=7.7148 //in kJ/kg-K
+R=0.287 //gas constant in kJ/kg-K
+Pi=100/%e^((si-ses)/-R) //turbine inlet pressure in kPa
+printf("\n hence,turbine inlet pressure is Pi=%.0f kPa.\n",Pi)
+\ No newline at end of file