summaryrefslogtreecommitdiff
path: root/965/CH2/EX2.6/6.sci
blob: 17b978d1abffc88ee9eeb23b3d2d0bf04deb37ee (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clc;
clear all;
disp("Thickness of insulation")
La=1;//m
Lb=0.04;//m
kA=0.7;// W/(m*C)
kB=0.48;//W/(m*C)
kC=0.065;//W/(m*C)
//Q1 = A(delT)/(La/kA+Lb/kB+)=A(delT)/(0.1/0.7+0.04/0.48)
//Q2 = A(delT)/(La/kA+Lb/kB+Lc/kC)=A(delT)/(0.1/0.7+0.04/0.48+x/0.065)
//Q2=(1-0.8)Q1
//A(delT)/(0.1/0.7+0.04/0.48+x/0.065)=0.2*A(delT)/(0.1/0.7+0.04/0.48)
//0.1/0.7+0.04/0.48+x/0.065 =(0.1/0.7+0.04/0.48)/0.2
x=(0.2261/0.2-0.2261)/15.385;//m
disp ("mm",x*1000,"thickness of the rock wool insulation should be = ")