1 files changed, 27 insertions, 0 deletions
diff --git a/172/CH11/EX11.2/ex2.sce b/172/CH11/EX11.2/ex2.sce
new file mode 100755
index 000000000..ea7fd759a
--- /dev/null
+++ b/172/CH11/EX11.2/ex2.sce
@@ -0,0 +1,27 @@
+//Ques 2
+//To determine the efficiency of Rankine cycle
+clc
+clear
+//1-Inlet state of pump
+//2-Exit state of pump
+P2=4000;//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=3213.6;//Enthalpy in kJ/kg from table
+//3-Inlet state for turbine
+//4-Exit state for turbine
+//s3=s4(Entropy remain same)
+s4=6.7690;//Entropy in kJ/kg from table
+sf=0.6493;//Entropy at liquid state in kJ/kg from table
+sfg=7.5009;//Entropy difference for vapor and liquid state in kJ/kg from table
+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