blob: 824d5b8c8f8d62bd8cbc4cc3912eaa855cb41cca (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
clc;
clear;
V=1500 //volume of hall in m^3
Area_plastered_wall=112 //in m^2
Area_woodem_floor=130 //in m^2
Area_plastered_ceiling=170 //in m^2
Area_wooden_doors=20 //in m^2
Area_cushioned_chairs=120 //in m^2
Area_Audience=120 //in m^2
//Coefficient of Absorption (c)
c_plastered_wall=0.03
c_woodem_floor=0.06
c_plastered_ceiling=0.04
c_wooden_doors=0.06
c_cushioned_chairs=0.50
c_Audience=0.4367
//calcultion
Absorption_plastered_wall=Area_plastered_wall*c_plastered_wall //in m^2 sabine
Absorption_wooden_floor=Area_woodem_floor*c_woodem_floor //in m^2 sabine
Absorption_plastered_ceiling=Area_plastered_ceiling*c_plastered_ceiling //in m^2 sabine
Absorption_wooden_doors=Area_wooden_doors*c_wooden_doors //in m^2 sabine
Absorption_cushioned_chairs=Area_cushioned_chairs*c_cushioned_chairs //in m^2 sabine
Total_absorption1 = Absorption_plastered_wall+Absorption_wooden_floor+Absorption_plastered_ceiling+Absorption_wooden_doors+Absorption_cushioned_chairs //in m^2 sabine
//Case (i)
T1=(0.162*V)/Total_absorption1
//case (ii)
Absorption_Audience=Area_Audience*c_Audience //in m^2 sabine when hall at full capacity
Total_absorption2 = Absorption_plastered_wall+Absorption_wooden_floor+Absorption_plastered_ceiling+Absorption_wooden_doors+Absorption_cushioned_chairs+Absorption_Audience //in m^2 sabine
T2=(0.162*V)/Total_absorption2
mprintf("Reveberation time when hall empty = %1.2f s\n",T1)
mprintf("Reveberation time when hall at full capacity = %1.2f s",T2) //The answer provided in the textbook is wrong
|
