summaryrefslogtreecommitdiff
path: root/2510/CH19/EX19.16/Ex19_16.sce
blob: a4709155e8cb268d46ceb58f6fdce447e49c00d9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Variable declaration:
ki = 0.44                       //Thermal conductivity of insulation (Btu/h.ft. F)
ho = 1.32                       //Air flow coefficient (Btu/h.ft^2. F)
OD = 2                          //Outside diameter of pipe (in)

//Calculation:
rc = (ki/ho)*12                 //Outer critical radius of insulation (in)
ro = OD/2                       //Outside radius of pipe (in)
L = rc-ro                       //Critical insulation thickness (in)

//Result:
printf("The outer critical radius of insulation is : %.0f in .",rc)
if ro<rc then
    printf("Since, ro<rc, the heat loss will increase as insulation is added.")
else 
    printf("Sice, ro>rc, the heat loss will decrease as insulation is added.")
end