summaryrefslogtreecommitdiff
path: root/3831/CH10/EX10.9/Ex10_9.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3831/CH10/EX10.9/Ex10_9.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 '3831/CH10/EX10.9/Ex10_9.sce')
-rw-r--r--3831/CH10/EX10.9/Ex10_9.sce32
1 files changed, 32 insertions, 0 deletions
diff --git a/3831/CH10/EX10.9/Ex10_9.sce b/3831/CH10/EX10.9/Ex10_9.sce
new file mode 100644
index 000000000..3358fd04d
--- /dev/null
+++ b/3831/CH10/EX10.9/Ex10_9.sce
@@ -0,0 +1,32 @@
+// Example 10_9
+clc;funcprot(0);
+// Given data
+m=18.0;// kg/s
+T_b=350.0;// °C
+W=20*10^3;// kW
+// Station 1
+T_1=500.0;// °C
+p_1=3.00;// MPa
+h_1=3456.5;// kJ/kg
+s_1=7.2346;// kJ/kg.K
+// Station 2
+p_2=0.0100;// MPa
+x_2=0.960;// The quality of steam
+h_2f=191.8;// kJ/kg
+h_2fg=2392.8;// kJ/kg
+h_2=h_2f+(x_2*h_2fg);// kJ/kg
+s_2f=0.6491;// kJ/kg.K
+s_2fg=7.5019;// kJ/kg.K
+s_2=s_2f+(x_2*s_2fg);// kJ/kg.K
+// Ground state
+x_0=0.00;// The quality of steam
+T_0=20.0;// °C
+h_0=83.9;// kJ/kg
+s_0=0.2965;// kJ/kg.K
+
+// Calculation
+a_f1=(h_1-h_0)-((T_0+273.15)*(s_1-s_0));// kJ/kg
+a_f2=(h_2-h_0)-((T_0+273.15)*(s_2-s_0));// kJ/kg
+Q=(W+(m*(a_f2-a_f1)))/(1-((T_0+273.15)/(T_b+273.15)));// kW
+printf("\nThe rate of heat loss from the surface of the turbine,Q=%4.0f kW",Q);
+// The answer vary due to round off error