1 files changed, 17 insertions, 0 deletions
diff --git a/965/CH4/EX4.4/4.sci b/965/CH4/EX4.4/4.sci
new file mode 100644
index 000000000..1af28d192
--- /dev/null
+++ b/965/CH4/EX4.4/4.sci
@@ -0,0 +1,17 @@
+clc;
+clear all;
+disp("heat transfer coefficient")
+L=0.04;//m length of plate
+Lc=L/2;// m characteristic length of plate
+k=386;//W/m.C
+rho=9000;// kg/m^3
+C=380;//J/kg.C
+t=165;//degree C
+ta=90;// degree C
+ti=200;// degree C
+tau = 4.5*60;//sec
+disp("Temperature distribution is given by : (t-ta)/(ti-ta) = exp((-h*As*tau)/(rho*V*C))")
+m = (t-ta)/(ti-ta);
+x=(-tau)/(rho*Lc*C);
+h=(log(m))/x;
+disp("W/m^2.C",h,"the heat transfer coefficient is ")