diff options
Diffstat (limited to '1100/CH10/EX10.5/10_5.sce')
-rwxr-xr-x | 1100/CH10/EX10.5/10_5.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1100/CH10/EX10.5/10_5.sce b/1100/CH10/EX10.5/10_5.sce new file mode 100755 index 000000000..d3f3e49fa --- /dev/null +++ b/1100/CH10/EX10.5/10_5.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+P= 100 //psia
+n= 0.97
+hf= 298.4 //Btu/lb
+hfg= 888.8 //Btu/lb
+hg= 1187.2 //Btu/lb
+//CALCULATIONS
+hx= hf+n*hfg
+hx1= hg-(1-n)*hfg
+//RESULTS
+printf ('Enthalpy= %.f Btu/lb',hx)
+printf (' \n Precise Enthalpy= %.1f Btu/lb',hx1)
|