diff options
Diffstat (limited to '2837/CH10/EX10.11')
-rwxr-xr-x | 2837/CH10/EX10.11/Ex10_11.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/2837/CH10/EX10.11/Ex10_11.sce b/2837/CH10/EX10.11/Ex10_11.sce new file mode 100755 index 000000000..5c5540251 --- /dev/null +++ b/2837/CH10/EX10.11/Ex10_11.sce @@ -0,0 +1,17 @@ +clc
+clear
+//Initialization of variables
+disp("From table 1 of keenan and keynes,")
+h1=1351.1 //Btu/lb
+p1=600 //psia
+t1=700 //F
+p2=234 //psia
+h2=1.6865
+h1=1.5875
+t3=101.74
+//calculations
+t2=660 //F
+loss= (h2-h1)*(t3+459.69)
+//results
+printf("Final state of steam is %d psia and %d F",p2,t2)
+printf("\n Loss of available energy = %.1f Btu/lb",loss)
|