diff options
Diffstat (limited to '1328/CH17/EX17.1/17_1.sce')
| -rw-r--r-- | 1328/CH17/EX17.1/17_1.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/1328/CH17/EX17.1/17_1.sce b/1328/CH17/EX17.1/17_1.sce new file mode 100644 index 000000000..a8e5bc6be --- /dev/null +++ b/1328/CH17/EX17.1/17_1.sce @@ -0,0 +1,11 @@ +printf("\t example 17.1 \n");
+pw=0.4298; // psia, at 75F, table 7
+pt=14.696; // psia
+t=75;
+Mw=18;
+Ma=29;
+X=(pw/(pt-pw))*(Mw/Ma);
+printf("\t humidity is : %.4f lb water/lb air \n",X);
+H=(X*t)+(1051.5*X)+(0.24*t); // eq 17.54
+printf("\t enthalpy at 75F is : %.1f Btu/lb dry air \n",H);
+// end
|