summaryrefslogtreecommitdiff
path: root/2870/CH7/EX7.20/Ex7_20.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2870/CH7/EX7.20/Ex7_20.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 '2870/CH7/EX7.20/Ex7_20.sce')
-rwxr-xr-x2870/CH7/EX7.20/Ex7_20.sce29
1 files changed, 29 insertions, 0 deletions
diff --git a/2870/CH7/EX7.20/Ex7_20.sce b/2870/CH7/EX7.20/Ex7_20.sce
new file mode 100755
index 000000000..90c91b774
--- /dev/null
+++ b/2870/CH7/EX7.20/Ex7_20.sce
@@ -0,0 +1,29 @@
+clc;clear;
+//Example 7.20
+
+//given data
+P=20;
+T1=50+460;//in R
+T2=240;
+T3=130;
+m1=300;
+Qout=180;
+
+//from steam tables
+//at P and T1
+h1=18.07;
+s1=0.03609;
+//at P and T2
+h2=1162.3;
+s2=1.7406;
+//at P and T3
+h3=97.99;
+s3=0.18174;
+
+//calculations
+// Qout = m1*h1 + m2*h2 - (m1+m2)*h3
+m2= (Qout-m1*h1+m1*h3)/(h2-h3);
+m3=m1+m2;
+// Sin - sout + Sgen = dSsystem/dt
+Sgen=m3*s3-m1*s1-m2*s2+Qout/T1;
+disp(Sgen,'the rate of entropy generation in Btu/min R')