summaryrefslogtreecommitdiff
path: root/1535/CH18/EX18.4/Ch18Ex4.sci
blob: 42c5bf8ce5886cdea54ed3c0e09935b66c97f645 (plain)
1
2
3
4
5
6
7
8
9
// Scilab Code Ex18.4: Average absorption coefficient of the surfaces of the hall: Page-362 (2010)
V = 25*20*8;      // Volume of the hall, metre cube
S = 2*(25*20+25*8+20*8);    // Total surface area of the hall, metre square
T = 4;    // Reverbration time of the hall, s
alpha = 0.167*V/(T*S);    // Sabine Formule giving total absorption in the hall, OWU
printf("\nThe total absorption in the hall = %5.3f OWU per metre square", alpha);

// Result
// The total absorption in the hall = 0.097 OWU per metre square