summaryrefslogtreecommitdiff
path: root/2507/CH10/EX10.12/Ex10_12.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2507/CH10/EX10.12/Ex10_12.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2507/CH10/EX10.12/Ex10_12.sce')
-rwxr-xr-x2507/CH10/EX10.12/Ex10_12.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/2507/CH10/EX10.12/Ex10_12.sce b/2507/CH10/EX10.12/Ex10_12.sce
new file mode 100755
index 000000000..cbe7ab638
--- /dev/null
+++ b/2507/CH10/EX10.12/Ex10_12.sce
@@ -0,0 +1,25 @@
+clc
+clear
+printf("Example 10.12 | Page number 361 \n\n");
+//Find the work and heat interactions during the expansion process
+//Given data
+m =0.1 //kg
+p1 = 10 //bar
+p2 = 1 //bar
+//Solution
+//From saturated steam table
+v1 = 0.1944 //m^3/kg
+v2 = (p1/p2)^(1/1.3)*v1 //m^3/kg
+W = m*(p1*v1-p2*v2)*100/(1.3-1) //kJ
+printf("Work during expansion process = %.2f kJ\n",W)
+h1 = 2778.1 //kJ/kg
+u1 = (h1 - p1*v1*100) //kJ/kg
+
+vf = 0.001043 //m^3/kg
+vg = 1.694 //m^3/kg
+x2 = (v2-vf)/(vg-vf) //Dryness fraction
+hf = 417.33 //kJ/kg
+hg = 2675.5 //kJ/kg
+h2 = (1-x2)*hf + x2*hg //kJ/kg
+u2 = h2 - p2*v2*100 //kJ/kg
+printf("Heat rejected from steam = %.2f kJ",W+m*(u2-u1))