diff options
Diffstat (limited to '965/CH9/EX9.9/9.sci')
| -rw-r--r-- | 965/CH9/EX9.9/9.sci | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/965/CH9/EX9.9/9.sci b/965/CH9/EX9.9/9.sci new file mode 100644 index 000000000..bc3954ca6 --- /dev/null +++ b/965/CH9/EX9.9/9.sci @@ -0,0 +1,20 @@ +clc
+clear all;
+disp("average heat transfer coefficient")
+ts=120;// degree C
+d=2/100;//m
+L=0.2;//m
+ta=119;// degree C
+psat=1.985;// bar
+rhow=943;//kg/m^3
+hfg=2202.2*1000;//J/kg
+kw=0.686;// W/m.K
+mu=273.3*10^(-6);// Ns/m^2
+
+g=9.81;//m/s^2
+del=(4*kw*mu*(ts-ta)*L/(rhol^2*g*hfg))^0.25;//
+hL=k/del;
+disp("mm",del*1000,"Thickness of condensate film =")
+h=4*hL/3;
+disp("W/m^2.C",h,"Average heat transfer coefficient =")
+
|