summaryrefslogtreecommitdiff
path: root/3825/CH7/EX7.21/Ex7_21.sce
diff options
context:
space:
mode:
Diffstat (limited to '3825/CH7/EX7.21/Ex7_21.sce')
-rw-r--r--3825/CH7/EX7.21/Ex7_21.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/3825/CH7/EX7.21/Ex7_21.sce b/3825/CH7/EX7.21/Ex7_21.sce
new file mode 100644
index 000000000..9104f1018
--- /dev/null
+++ b/3825/CH7/EX7.21/Ex7_21.sce
@@ -0,0 +1,14 @@
+clc
+h1=2775.8
+h2=167.456
+h3=104.77
+h4=146.56
+s1=7.5984
+s2=0.5721
+s3=0.367
+s4=0.5049
+m3=((h2-h1)*10^4)/(h3-h4)
+mprintf("m3=%fkg/h\n",m3)//ans vary due to roundoff error
+TO=300
+delta=(-10^4*TO*(s2-s1))-(m3*TO*(s4-s3))
+mprintf("Net change in availability=%fkJ",delta)//ans vary due to roundoff error