summaryrefslogtreecommitdiff
path: root/965/CH7/EX7.60/60.sci
diff options
context:
space:
mode:
Diffstat (limited to '965/CH7/EX7.60/60.sci')
-rw-r--r--965/CH7/EX7.60/60.sci21
1 files changed, 21 insertions, 0 deletions
diff --git a/965/CH7/EX7.60/60.sci b/965/CH7/EX7.60/60.sci
new file mode 100644
index 000000000..dd9570aa3
--- /dev/null
+++ b/965/CH7/EX7.60/60.sci
@@ -0,0 +1,21 @@
+clc;
+clear all;
+disp("average heat transfer coefficient")
+tb=27;// degree C
+d=19/1000;//m diameter of tube
+U=0.061;//m/s
+L=1.5;//m length of tube
+ts=38;//degree C
+mus=5.233*10^(-4);// Pa s
+mub=5.892*10^(-4);// Pa s
+kb=0.1591;// W/m.K
+rhob=876.6;// kg/m^3
+cpb=1757;// j/kg.K
+Prb=6.5;
+Reb=rhob*U*d/mub;
+Nu=1.86*(Reb*Prb/(L/d))^0.33*(mub/mus)^0.14;
+h=k*Nu/d;
+xv=0.05*Reb*d;// velocity depth
+xt=xv*Prb;// temperature depth
+disp("m",xv,"velocity depth =")
+disp("m",xt,"temperature depth =")