1 files changed, 17 insertions, 0 deletions
diff --git a/1460/CH12/EX12.5/12_5.sce b/1460/CH12/EX12.5/12_5.sce
new file mode 100755
index 000000000..056f6e63e
--- /dev/null
+++ b/1460/CH12/EX12.5/12_5.sce
@@ -0,0 +1,17 @@
+clc
+//initialization of variables
+P=14.7 //lb/in^2
+T=80+460 //R
+M=18
+Ps=0.5069  //lb/in^2
+//calculations
+Pair=P-Ps
+R=1544/M
+v=R*T/(144*Ps)
+vair=53.3*T/(144*Pair)
+wair=1/(1+vair/v)
+wwater=vair/v/(1+vair/v)
+//results
+printf("Partial pressure of air = %.1f ft^3/lbm",Pair)
+printf("\n Gravimetric analysis of air = %.4f",wair)
+printf("\n Gravimetric analysis of water = %.4f",wwater)