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

---
 172/CH11/EX11.1/ex1.sce | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100755 172/CH11/EX11.1/ex1.sce

(limited to '172/CH11/EX11.1/ex1.sce')

diff --git a/172/CH11/EX11.1/ex1.sce b/172/CH11/EX11.1/ex1.sce
new file mode 100755
index 000000000..bae723ced
--- /dev/null
+++ b/172/CH11/EX11.1/ex1.sce
@@ -0,0 +1,27 @@
+//Ques 1
+//To determine the efficiency of Rankine cycle
+clc
+clear
+//1-Inlet state of pump
+//2-Exit state of pump
+P2=2000;//Exit pressure in kPa
+P1=10;//Inlet pressure in kPa
+v=0.00101;//specific weight of water in m^3/kg
+wp=v*(P2-P1);//work done in pipe in kJ/kg
+h1=191.8;//Enthalpy in kJ/kg from table
+h2=h1+wp;//enthalpy in kJ/kg
+//2-Inlet state for boiler
+//3-Exit state for boiler
+h3=2799.5;//Enthalpy in kJ/kg
+//3-Inlet state for turbine
+//4-Exit state for turbine
+//s3=s4(Entropy remain same)
+s4=6.3409;//kJ/kg
+sf=0.6493;//Entropy at liquid state in kJ/kg
+sfg=7.5009;//Entropy difference for vapor and liquid state in kJ/kg
+x4=(s4-sf)/sfg;//x-factor
+hfg=2392.8;//Enthalpy difference in kJ/kg for turbine
+h4=h1+x4*hfg;//Enthalpy in kJ/kg
+
+nth=((h3-h2)-(h4-h1))/(h3-h2);
+printf('Percentage efficiency = %.1f ',nth*100);
\ No newline at end of file
-- 
cgit