diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3755/CH14 | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '3755/CH14')
| -rw-r--r-- | 3755/CH14/EX14.1/Ex14_1.sce | 14 | ||||
| -rw-r--r-- | 3755/CH14/EX14.2/Ex14_2.sce | 36 | ||||
| -rw-r--r-- | 3755/CH14/EX14.3/Ex14_3.sce | 26 | ||||
| -rw-r--r-- | 3755/CH14/EX14.4/Ex14_4.sce | 18 |
4 files changed, 94 insertions, 0 deletions
diff --git a/3755/CH14/EX14.1/Ex14_1.sce b/3755/CH14/EX14.1/Ex14_1.sce new file mode 100644 index 000000000..4c9be0292 --- /dev/null +++ b/3755/CH14/EX14.1/Ex14_1.sce @@ -0,0 +1,14 @@ +clear
+//
+//
+//
+
+//Variable declaration
+V=7500; //volume(m^3)
+T=1.5; //time(sec)
+
+//Calculations
+aS=0.165*V/T; //total absorption in hall(OWU)
+
+//Result
+printf("\n total absorption in hall is %0.3f OWU",aS)
diff --git a/3755/CH14/EX14.2/Ex14_2.sce b/3755/CH14/EX14.2/Ex14_2.sce new file mode 100644 index 000000000..e1c06499f --- /dev/null +++ b/3755/CH14/EX14.2/Ex14_2.sce @@ -0,0 +1,36 @@ +clear
+//
+//
+//
+
+//Variable declaration
+V=1500; //volume(m^3)
+A1=112; //area of plastered walls(m^2)
+A2=130; //area of wooden floor(m^2)
+A3=170; //area of plastered ceiling(m^2)
+A4=20; //area of wooden door(m^2)
+n=100; //number of cushioned chairs
+A5=120; //area of audience(m^2)
+C1=0.03; //coefficient of absorption in plastered walls
+C2=0.06; //coefficient of absorption in wooden floor
+C3=0.04; //coefficient of absorption in plastered ceiling
+C4=0.06; //coefficient of absorption in wooden door
+C5=1.0; //coefficient of absorption in cushioned chairs
+C6=4.7; //coefficient of absorption in audience
+
+//Calculations
+a1=A1*C1; //absorption due to plastered walls
+a2=A2*C2; //absorption due to wooden floor
+a3=A3*C3; //absorption due to plastered ceiling
+a4=A4*C4; //absorption due to wooden door
+a5=n*C5; //absorption due to cushioned chairs
+a6=A5*C6; //absorption due to audience
+aS=a1+a2+a3+a4+a5; //total absorption in hall
+T1=0.165*V/aS; //reverberation time when hall is empty(sec)
+T2=0.165*V/(aS+a6); //reverberation time with full capacity of audience(sec)
+T3=0.165*V/((n*C6)+aS); //reverberation time with audience in cushioned chairs(sec)
+
+//Result
+printf("\n reverberation time when hall is empty is %0.2f sec",T1)
+printf("\n reverberation time with full capacity of audience is %0.3f sec",T2)
+printf("\n reverberation time with audience in cushioned chairs is %0.2f sec",T3)
diff --git a/3755/CH14/EX14.3/Ex14_3.sce b/3755/CH14/EX14.3/Ex14_3.sce new file mode 100644 index 000000000..fb59b8d04 --- /dev/null +++ b/3755/CH14/EX14.3/Ex14_3.sce @@ -0,0 +1,26 @@ +clear
+//
+//
+//
+
+//Variable declaration
+V=1200; //volume(m^3)
+a1=220; //area of wall(m^2)
+a2=120; //area of floor(m^2)
+a3=120; //area of ceiling(m^2)
+C1=0.03; //coefficient of absorption in wall
+C2=0.80; //coefficient of absorption in floor
+C3=0.06; //coefficient of absorption in ceiling
+
+//Calculations
+A1=a1*C1; //absorption due to plastered walls
+A2=a2*C2; //absorption due to wooden floor
+A3=a3*C3; //absorption due to plastered ceiling
+aS=a1+a2+a3; //total absorption in hall
+abar=(A1+A2+A3)/aS; //average sound absorption coefficient
+AS=abar*aS; //total absorption of room(metric sabines)
+T=0.165*V/AS; //reverberation time(sec)
+
+//Result
+printf("\n average sound absorption coefficient is %0.2f ",abar)
+printf("\n reverberation time is %0.1f sec",T)
diff --git a/3755/CH14/EX14.4/Ex14_4.sce b/3755/CH14/EX14.4/Ex14_4.sce new file mode 100644 index 000000000..98916f610 --- /dev/null +++ b/3755/CH14/EX14.4/Ex14_4.sce @@ -0,0 +1,18 @@ +clear
+//
+//
+//
+
+//Variable declaration
+I0=10^-12; //standard intensity level(watt/m^2)
+A=1.4; //area(m^2)
+il=60; //intensity level(decibels)
+
+//Calculations
+x=10^(il/10);
+I=x*10^-12; //intensity level(watt/m^2)
+Ap=I*A; //acoustic power(watt)
+
+//Result
+printf("\n acoustic power is %e watt",Ap)
+printf("\n answer in the book is wrong")
|