summaryrefslogtreecommitdiff
path: root/2417/CH8/EX8.6/Ex8_6.sce
diff options
context:
space:
mode:
Diffstat (limited to '2417/CH8/EX8.6/Ex8_6.sce')
-rwxr-xr-x2417/CH8/EX8.6/Ex8_6.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/2417/CH8/EX8.6/Ex8_6.sce b/2417/CH8/EX8.6/Ex8_6.sce
new file mode 100755
index 000000000..679e02294
--- /dev/null
+++ b/2417/CH8/EX8.6/Ex8_6.sce
@@ -0,0 +1,17 @@
+//scilab 5.4.1
+clear;
+clc;
+printf("\t\t\tProblem Number 8.6\n\n\n");
+// Chapter 8 : Vapor Power Cycles
+// Problem 8.6 (page no. 385)
+// Solution
+
+//For the upper temperature of the cycle,we have 400C,and for 50kPa,the steam tables give us a saturation temperature of 81.33C.The efficiency of a Carnot cycle operating between the limits would be
+T1=400+273; //Celcius temperature converted to fahrenheit temperature
+T2=81.33+273; //temperature converted to fahrenheit temperature
+nc=((T1-T2)/T1)*100; //Efficiency of carnot cycle
+printf("The efficiency is %f percentage\n",nc);
+//In problem 8.1,
+nR=28.5; //Thermal efficiency of the cycle neglecting the pump work
+typen=(nR/nc)*100; //Type efficiency=ideal thermal efficiency/efficiency of carnot cycle operating between min and max temperature limits
+printf("The type efficiency of the ideal Rankine cycle is %f percentage\n",typen);