diff options
Diffstat (limited to '1472/CH12/EX12.1/12_1.sce')
| -rwxr-xr-x | 1472/CH12/EX12.1/12_1.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/1472/CH12/EX12.1/12_1.sce b/1472/CH12/EX12.1/12_1.sce new file mode 100755 index 000000000..9a4caaccb --- /dev/null +++ b/1472/CH12/EX12.1/12_1.sce @@ -0,0 +1,17 @@ +clc
+//initialization of varaibles
+P=15 //psia
+T2=70+460 //R
+T1=55+460 //R
+//calculations
+pw=0.2141
+pA=P-pw
+mratio=pA*29/(pw*18)
+mAbym=mratio/(1+mratio)
+mwbym=1/(1+mratio)
+pg=0.3631 //psia
+phi=pw/pg
+gamma=1/mratio
+//results
+printf("Partial pressure of water vapor = %.2f psia",pA)
+printf("\n Specific humidity = %.4f lb vapor/lb air",gamma)
|