1 files changed, 27 insertions, 0 deletions
diff --git a/965/CH7/EX7.66/66.sci b/965/CH7/EX7.66/66.sci
new file mode 100644
index 000000000..13f948b91
--- /dev/null
+++ b/965/CH7/EX7.66/66.sci
@@ -0,0 +1,27 @@
+clc;
+clear all;
+disp("heat loss from four surfaces")
+U=90*1000/3600;// m/s
+ta=50;// degree C
+l=10;//m
+w=4;//m
+h=3;//m
+ts=10;// degree C
+rho=1.165;// kg/m^3
+cp=1005;// J/kg.K
+k=.02676;// W/m.C
+v=16*10^(-6);// m^2/s
+Pr=0.701;
+Rel=U*l/v;
+Nu=0.036*Rel^0.8*Pr^0.333;
+hs=k*Nu/l;
+A=2*(w+h)*l;
+Ql=hs*A*(ta-ts);//W
+Q=Ql/1000;// kQ
+disp("W",Q,"Heat loss from surfaces =")
+cc=Q*3600/14000;
+disp("TR",cc,"Cooling capacity required =")
+Cf=0.072/(Rel)^0.2;
+Fd=Cf*0.5*rho*A*U^2;
+P=Fd*U/1000;
+disp("kW",P,"Power required to overcome the resistance =")