1 files changed, 13 insertions, 0 deletions
diff --git a/632/CH8/EX8.14/example8_14.sce b/632/CH8/EX8.14/example8_14.sce
new file mode 100755
index 000000000..9f442e470
--- /dev/null
+++ b/632/CH8/EX8.14/example8_14.sce
@@ -0,0 +1,13 @@
+//clc()
+P = 101.3;//kPa
+MW = 58;
+T1 = 280.8;//K
+Ps = 5;//kPa
+pr = 2;//kJ/kgK ( Psychometric ratio )
+Hvap = 360;//kJ/kg
+Tw = T1;
+Yw1 = Ps * MW / (( P - Ps) * 29);
+// Tw = Tg - Hvap * ( Yw1 - Y1) / (hG / kY), where hG/kY is the psychmetric ratio pr
+Y1 = 0;
+Tg = Tw + Hvap * ( Yw1 - Y1) / pr;
+disp("K",Tg,"The air temperature = ")
+\ No newline at end of file