diff options
Diffstat (limited to '2837/CH10/EX10.2/Ex10_2.sce')
-rwxr-xr-x | 2837/CH10/EX10.2/Ex10_2.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/2837/CH10/EX10.2/Ex10_2.sce b/2837/CH10/EX10.2/Ex10_2.sce new file mode 100755 index 000000000..25ef422e8 --- /dev/null +++ b/2837/CH10/EX10.2/Ex10_2.sce @@ -0,0 +1,12 @@ +clc
+clear
+//Initialization of variables
+h=1100 //Btu/lb
+P=100 //psia
+//calculations
+disp("From table 2 of keenan and keynes,")
+hg=1187.2 //Btu/lb
+hfg=888.8 //Btu/lb
+y=-(h-hg)/hfg
+//results
+printf("The state is %d psia with a moisture content of %.2f percent",P,y*100)
|