blob: aabca8fc08288531c4c336049e558f98a62f414d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
//Exa 4.6
clc;
clear;
close;
//given data
k=385;// in W/mK
h=100;// in W/m^2K
delta =2*10^-3;// thickness of plate in meter
A=25*25;// area of plate in square meter
rho=8800;// kg/m^3
C=400;// J/kg-K
// l_s= V/A= L*B*delta/(2*L*B) = delta/2
l_s= delta/2;// in meter
Bi= h*l_s/k;
// since Bi < 0.1 , hence lumped heat capacity analysis can be applied
// Part(i)
// toh= rho*V*C/(h*A) = rho*C*l_s/h
toh= rho*C*l_s/h;// in second
disp(toh,"Time constant in seconds");
// Part(ii)
t_i=400;// in degree C
t=40;// in degree C
t_infinite=25;// in degree C
// (t-t_infinite)/(t_i-t_infinite) = %e^(-h*A*toh /(rho*V*C)) = %e^(-h*toh/(rho*l_s*C))
toh= -log((t-t_infinite)/(t_i-t_infinite))*rho*C*l_s/h;// in sec
disp(toh,"The time required for the plate to reach the temperature of 40 degree C in seconds");
|
