summaryrefslogtreecommitdiff
path: root/2144/CH5/EX5.15/ex5_15.sce
diff options
context:
space:
mode:
Diffstat (limited to '2144/CH5/EX5.15/ex5_15.sce')
-rwxr-xr-x2144/CH5/EX5.15/ex5_15.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/2144/CH5/EX5.15/ex5_15.sce b/2144/CH5/EX5.15/ex5_15.sce
new file mode 100755
index 000000000..85b426fc8
--- /dev/null
+++ b/2144/CH5/EX5.15/ex5_15.sce
@@ -0,0 +1,17 @@
+// Exa 5.15
+clc;
+clear;
+close;
+// Given data
+C_v = 0.711;// in kJ/kg-K
+T3 = 850;// in degree C
+T3 = T3 + 273;// in K
+T2 = 90;// in degree C
+T2 = T2 + 273;// in K
+E = C_v * (log(T3/T2));// Entropy change in kJ/kg-K
+disp(E,"Entrophy change in kJ/kg-K is");
+W = (E * (T3-T2))/2;//output work in kJ/kg
+Q = T2+E;//rejected heat in kJ/kg
+Q1 = W + Q;//heat supplied in kJ/kg
+Eta = (W/Q1);// in %
+disp(Eta,"The efficiency of cycle in % is");