summaryrefslogtreecommitdiff
path: root/32/CH11/EX11.21/11_21.sce
blob: a1b6e46fa696418ab709b27773fd29859af1cc91 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//pathname=get_absolute_file_path('11.21.sce')
//filename=pathname+filesep()+'11.21-data.sci'
//exec(filename)
//Ambient air temperature(in K):
Ta=27+273
//Temperature of burnt gases(in K):
Tg=630
//Air consumed at rate(in kg air per kg of coal):
m=15
//Ratio of actual draught to thereotical draught:
r=0.60
//Actual draught:
hw1=14
//Theoretical draught:
hw=hw1/r
//Height of chimney(in m):
H=hw/(353*(1/Ta-(m+1)/(m*Tg)))
printf("\n RESULT \n")
printf("\nHeight of chimney = %f m",H)