diff options
Diffstat (limited to '3875/CH2/EX2.2/Ex2_2.sce')
-rw-r--r-- | 3875/CH2/EX2.2/Ex2_2.sce | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/3875/CH2/EX2.2/Ex2_2.sce b/3875/CH2/EX2.2/Ex2_2.sce new file mode 100644 index 000000000..824d5b8c8 --- /dev/null +++ b/3875/CH2/EX2.2/Ex2_2.sce @@ -0,0 +1,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
|