summaryrefslogtreecommitdiff
path: root/2510/CH9/EX9.7/Ex9_7.sce
blob: 5364b82bb0b5d575c2dd70b4904fb60fd408ee88 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

//Variable declaration:
x = 0.3                         //Length from the leading age of the plate (m)
L = 1.2                         //Length of plate (m)
TS = 58.0                       //Surface temperature of plate (°C)
Ta = 21.0                       //Temperature of flowing air (°C)

//Calculation:
hx = 25/x**0.4                  //Local heat transfer coefficient at 0.3m (W/m^2.K) (Part 1)
syms y                          //Length
hy = 25/y**0.4                  //hx at the end of the plate (W/m^2.K)
h = integrate(hy, y,0,L)/L    //Average heat transfer coefficient (W/m^2.K)
Q = hx*(TS-Ta)                  //Heat flux at 0.3m from leading edge of plate (W/m^2)
hL = 25/L**0.4                  //Local heat transfer coefficient at plate end (W/m^2.K) (Part 2) 
r = h/hL                        //Ratio h/hL at the end of the plate

//Result:
printf("1. The heat flux at 0.3 m from the leading edge of the plate is : %.0f  W/m^2.",Q)
printf("2. The local heat transfer coefficient at the end of the plate is : %.1f  W/m^2.K.",hL)
disp("3. The ratio h/hL at the end of plate is : ")
disp(r)