summaryrefslogtreecommitdiff
path: root/3843/CH8/EX8.4/Ex8_4.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3843/CH8/EX8.4/Ex8_4.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3843/CH8/EX8.4/Ex8_4.sce')
-rw-r--r--3843/CH8/EX8.4/Ex8_4.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/3843/CH8/EX8.4/Ex8_4.sce b/3843/CH8/EX8.4/Ex8_4.sce
new file mode 100644
index 000000000..f295b0f6b
--- /dev/null
+++ b/3843/CH8/EX8.4/Ex8_4.sce
@@ -0,0 +1,25 @@
+// Example 8_4
+clc;funcprot(0);
+// Given data
+P_1=4;// kPa
+P_2=2;// MPa
+T_3=400;// °C
+h_2=192;// kJ/kg
+h_3=3248;// kJ/kg
+s_3=7.1279;// kJ/kg.K
+
+// Calculation
+s_f4=0.4225;// kJ/kg.K
+s_fg4=8.0529;// kJ/kg.K
+s_4=s_3;// kJ/kg.K
+x_4=(s_4-s_f4)/s_fg4;// The quality of steam at state 4
+q_B=h_3-h_2;// The heat input in kJ/kg
+h_f4=121;// kJ/kg
+h_fg4=2433;// kJ/kg
+h_4=h_f4+(x_4*h_fg4);// kJ/kg
+w_T=h_3-h_4;// kJ/kg
+n_2=w_T/q_B;// The cycle efficiency
+// From example 8.1
+n_1=0.3232;// The power cycle efficiency at P_1=10 MPa
+Pi=((n_2-n_1)/n_1)*100;// The percentage increase in efficiency
+printf("\nThe percentage increase in efficiency is %1.1f percentage.",Pi);