summaryrefslogtreecommitdiff
path: root/551/CH15/EX15.4/4.sce
blob: b76619f5e87f89c121cef8d32268501d1509f4c5 (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
clc
L_A=0.2; //m
L_C=0.006; //m
L_D=0.1; //m
t1=1150; //0C
t2=40; //0C
dt=t1-t2;
k_A=1.52; //W/m 0C
k_B=0.138; //W/m 0C
k_D=0.138; //W/m 0C
k_C=45; //W/m 0C
q=400; //W/m^2

disp("(i) The value of x = (L_C) ")
L_B=((t1-t2)/q - (L_A/k_A+L_C/k_C+L_D/k_D))*k_B*1000;
disp("L_B =")
disp(L_B)
disp("mm")


disp("(ii) Temperature of the outer surface of the steel plate t_so =")
t_so=q*L_D/k_D + t2;
disp(t_so)
disp("0C")