1 files changed, 25 insertions, 0 deletions
diff --git a/2135/CH6/EX6.34/Exa_6_34.sce b/2135/CH6/EX6.34/Exa_6_34.sce
new file mode 100755
index 000000000..a765be5fb
--- /dev/null
+++ b/2135/CH6/EX6.34/Exa_6_34.sce
@@ -0,0 +1,25 @@
+//Exa 6.34
+clc;
+clear;
+close;
+format('v',7);
+
+//Given Data :
+p1=80;//bar
+Tsup3=350;//degree C
+pb=712.5/760*1.01325;//bar
+mdot=2;//Kg/s
+//mdot=1;//Kg
+h3=2964;//KJ/Kg(Molliers diagram)
+h4=2184;//KJ/Kg(Molliers diagram)
+WT=h3-h4;//KJ/Kg
+WTdot=mdot*WT;//KW
+disp(WTdot,"Total turbine work in KW : ");
+wp=(p1-pb)/10;//KJ/Kg
+hf1=411.35;//KJ/Kg(from steam table)
+h1=hf1;//KJ/Kg
+h2=h1+wp;//KJ/Kg
+qi=h3-h2;//KJ/Kg
+EtaR=(WT-wp)/qi*100;//%
+disp(EtaR,"Rankine efficiency in  % : ");
+//Steam table is used to get some data.