1 files changed, 23 insertions, 0 deletions
diff --git a/551/CH10/EX10.1/1.sce b/551/CH10/EX10.1/1.sce
new file mode 100755
index 000000000..c965270e4
--- /dev/null
+++ b/551/CH10/EX10.1/1.sce
@@ -0,0 +1,23 @@
+clc
+t_db=293; //K
+W=0.0095; //kg/kg of dry air
+p_t=1.0132; 
+disp("(i) Partial pressure of vapour")
+p_v=p_t*W/(W+0.622);
+disp("p_v=")
+disp(p_v)
+disp("bar")
+
+
+disp("(ii) Relative humidity phi :")
+p_vs=0.0234; //bar; From steam tables corresponding to 20 0C
+phi=p_v/p_vs;
+disp("relative hmidity =")
+disp(phi)
+
+
+disp("(iii) Dew point temperature")
+t_dp=13 + (14-13)/(0.01598 - 0.0150)*(0.01524-0.0150); //From stea table by interpolation
+disp("t_dp=")
+disp(t_dp)
+disp("0C")
+\ No newline at end of file