1 files changed, 22 insertions, 0 deletions
diff --git a/965/CH4/EX4.1/1.sci b/965/CH4/EX4.1/1.sci
new file mode 100644
index 000000000..962b43411
--- /dev/null
+++ b/965/CH4/EX4.1/1.sci
@@ -0,0 +1,22 @@
+clc;
+clear all;
+disp("required time calculation")
+As=2*0.5*0.5;// m^2 surface area of plate
+V=0.5*0.5*0.00625;// m^3 volume of plate
+Lc=V/As;// m characteristic length of plate
+h=90; //W/m^2/C
+k=370;//W/m.C
+rho=9000;// kg/m^3
+C=380;//J/kg.C
+t=108;// degree C
+ta= 36;// degree C
+ti=300;// degree C
+Bi=h*Lc/k;// biot number
+if (Bi< 0.1)
+disp("Bi is less than 0.1 hence lumped heat capacity method can be applied")
+disp("Temperature distribution is given by : (t-ta)/(ti-ta) = exp((-h*As*tau)/rho*V*C)")
+m=(t-ta)/(ti-ta);
+x=-h*As/(V*rho*C);
+disp("sunstituting the values we get,")
+tau = (log(m))/x;
+disp("sec",tau,"time required to attend the temperature is ")