diff options
Diffstat (limited to '2870/CH7/EX7.18/Ex7_18.sce')
| -rwxr-xr-x | 2870/CH7/EX7.18/Ex7_18.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/2870/CH7/EX7.18/Ex7_18.sce b/2870/CH7/EX7.18/Ex7_18.sce new file mode 100755 index 000000000..824b0f131 --- /dev/null +++ b/2870/CH7/EX7.18/Ex7_18.sce @@ -0,0 +1,20 @@ +clc;clear;
+//Example 7.18
+
+//given data
+P1=7;
+T1=450;
+P2=3;
+
+//from steam tables
+//at P1 and T1
+h1=3288.3;
+s1=6.6353;
+//at P2
+h2=h1;
+s2=7.0046;
+
+//calculations
+// Sin - Sout + Sgen = dSsystem/dt
+Sgen=s2-s1;
+disp(Sgen,'the entropy generated in kJ/kg-K')
|