diff options
Diffstat (limited to '2519/CH9/EX9.10/Ex9_10.sce')
| -rwxr-xr-x | 2519/CH9/EX9.10/Ex9_10.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/2519/CH9/EX9.10/Ex9_10.sce b/2519/CH9/EX9.10/Ex9_10.sce new file mode 100755 index 000000000..f08f1c72c --- /dev/null +++ b/2519/CH9/EX9.10/Ex9_10.sce @@ -0,0 +1,15 @@ +clc
+clear
+//Initialization of variables
+pb=14.696 //psia
+pa=150 //psia
+tb=300 //F
+//calculations
+disp("From steam tables,")
+hb=1192.8 //Btu/lbm
+ha=hb
+hf=330.51 //Btu/lbm
+hfg=863.6 //Btu/lbm
+x=(ha-hf)/hfg
+//results
+printf("Quality of wet steam = %.1f percent",x*100)
|