summaryrefslogtreecommitdiff
path: root/1752/CH4/EX4.5/exa_4_5.sce
blob: b8f768bbb8d46aa9ef3e64ce7ea69563ceccf078 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Exa 4.5
clc;
clear;
close;
//given data
//t=450-500*x+100*x^2+150*x^3 at any instant, so
// dtBYdx= -500+200*x+450*x^2

L=0.5;// thickness of the wall in meter
k=10;// in W/mK
// Rate of heating entering in the wall per unit area, at
x=0;
//q1= -k*dtBYdx
q1= -k*(-500+200*x+450*x^2);// in W/m^2
// Rate of heat going out of the wall per unit area , at
x=L;
q2= -k*(-500+200*x+450*x^2);// in W/m^2
E=q1-q2;// in W/m^2
disp(E,"Heat energy stored per unit area in W/m^2")