summaryrefslogtreecommitdiff
path: root/Engineering_Physics_by_G_Aruldhas/18-ACOUSTICS_OF_BUILDINGS.ipynb
diff options
context:
space:
mode:
authorPrashant S2020-04-14 10:25:32 +0530
committerGitHub2020-04-14 10:25:32 +0530
commit06b09e7d29d252fb2f5a056eeb8bd1264ff6a333 (patch)
tree2b1df110e24ff0174830d7f825f43ff1c134d1af /Engineering_Physics_by_G_Aruldhas/18-ACOUSTICS_OF_BUILDINGS.ipynb
parentabb52650288b08a680335531742a7126ad0fb846 (diff)
parent476705d693c7122d34f9b049fa79b935405c9b49 (diff)
downloadall-scilab-tbc-books-ipynb-master.tar.gz
all-scilab-tbc-books-ipynb-master.tar.bz2
all-scilab-tbc-books-ipynb-master.zip
Merge pull request #1 from prashantsinalkar/masterHEADmaster
Initial commit
Diffstat (limited to 'Engineering_Physics_by_G_Aruldhas/18-ACOUSTICS_OF_BUILDINGS.ipynb')
-rw-r--r--Engineering_Physics_by_G_Aruldhas/18-ACOUSTICS_OF_BUILDINGS.ipynb202
1 files changed, 202 insertions, 0 deletions
diff --git a/Engineering_Physics_by_G_Aruldhas/18-ACOUSTICS_OF_BUILDINGS.ipynb b/Engineering_Physics_by_G_Aruldhas/18-ACOUSTICS_OF_BUILDINGS.ipynb
new file mode 100644
index 0000000..3f1bf2b
--- /dev/null
+++ b/Engineering_Physics_by_G_Aruldhas/18-ACOUSTICS_OF_BUILDINGS.ipynb
@@ -0,0 +1,202 @@
+{
+"cells": [
+ {
+ "cell_type": "markdown",
+ "metadata": {},
+ "source": [
+ "# Chapter 18: ACOUSTICS OF BUILDINGS"
+ ]
+ },
+{
+ "cell_type": "markdown",
+ "metadata": {},
+ "source": [
+ "## Example 18.1: Output_power_of_the_sound_source.sci"
+ ]
+ },
+ {
+"cell_type": "code",
+ "execution_count": null,
+ "metadata": {
+ "collapsed": true
+ },
+ "outputs": [],
+"source": [
+"// Scilab Code Ex18.1: Output power of the sound source : Page-361 (2010)\n",
+"r = 200; // Distance of the point of reduction from the source, m\n",
+"I_0 = 1e-012; // Final intensity of sound, watt per metre square\n",
+"I_f = 60; // Intensity gain of sound at the point of reduction, dB\n",
+"// As A_I = 10*log10(I/I_0), solving for I\n",
+"I = I_0*10^(I_f/10); // Initial Intensity of sound, watt per metre square\n",
+"P = 4*%pi*r^2*I; // Output power of the sound source, watt\n",
+"printf('\nThe output power of the sound source = %3.1f W', P);\n",
+"\n",
+"// Result\n",
+"// The output power of the sound source = 0.5 W "
+ ]
+ }
+,
+{
+ "cell_type": "markdown",
+ "metadata": {},
+ "source": [
+ "## Example 18.2: Change_in_sound_level_for_doubling_intensity.sci"
+ ]
+ },
+ {
+"cell_type": "code",
+ "execution_count": null,
+ "metadata": {
+ "collapsed": true
+ },
+ "outputs": [],
+"source": [
+"// Scilab Code Ex18.2: Change in sound level for doubling intensity: Page-361 (2010)\n",
+"I1 = 1; // For simplicity assume first intensity level to be unity, W per metre square\n",
+"I2 = 2*I1; // Intensity level after doubling, watt per metre square\n",
+"dA_I = 10*log10(I2/I1); // Difference in gain level, dB\n",
+"printf('\nThe sound intensity level is increased by = %1d dB', dA_I);\n",
+"\n",
+"// Result\n",
+"// The sound intensity level is increased by = 3 dB "
+ ]
+ }
+,
+{
+ "cell_type": "markdown",
+ "metadata": {},
+ "source": [
+ "## Example 18.3: Total_absorption_of_sound_in_the_hall.sci"
+ ]
+ },
+ {
+"cell_type": "code",
+ "execution_count": null,
+ "metadata": {
+ "collapsed": true
+ },
+ "outputs": [],
+"source": [
+"// Scilab Code Ex18.3: Total absorption of sound in the hall: Page-361 (2010)\n",
+"V = 8000; // Volume of the hall, metre cube\n",
+"T = 1.5; // Reverbration time of the hall, s\n",
+"alpha_s = 0.167*V/T; // Sabine Formula giving total absorption of sound in the hall, OWU\n",
+"printf('\nThe total absorption of sound in the hall = %5.1f OWU', alpha_s);\n",
+"\n",
+"// Result\n",
+"// The total absorption in the hall = 890.7 OWU "
+ ]
+ }
+,
+{
+ "cell_type": "markdown",
+ "metadata": {},
+ "source": [
+ "## Example 18.4: Average_absorption_coefficient_of_the_surfaces_of_the_hall.sci"
+ ]
+ },
+ {
+"cell_type": "code",
+ "execution_count": null,
+ "metadata": {
+ "collapsed": true
+ },
+ "outputs": [],
+"source": [
+"// Scilab Code Ex18.4: Average absorption coefficient of the surfaces of the hall: Page-362 (2010)\n",
+"V = 25*20*8; // Volume of the hall, metre cube\n",
+"S = 2*(25*20+25*8+20*8); // Total surface area of the hall, metre square\n",
+"T = 4; // Reverbration time of the hall, s\n",
+"alpha = 0.167*V/(T*S); // Sabine Formule giving total absorption in the hall, OWU\n",
+"printf('\nThe total absorption in the hall = %5.3f OWU per metre square', alpha);\n",
+"\n",
+"// Result\n",
+"// The total absorption in the hall = 0.097 OWU per metre square"
+ ]
+ }
+,
+{
+ "cell_type": "markdown",
+ "metadata": {},
+ "source": [
+ "## Example 18.5: Reverbration_time_for_the_hall.sci"
+ ]
+ },
+ {
+"cell_type": "code",
+ "execution_count": null,
+ "metadata": {
+ "collapsed": true
+ },
+ "outputs": [],
+"source": [
+"// Scilab Code Ex18.5: Reverbration time for the hall : Page-362 (2010)\n",
+"V = 475; // Volume of the hall, metre cube\n",
+"s = [200, 100, 100]; // Area of wall, floor and ceiling of the hall resp., metre square\n",
+"T = 4; // Reverbration time of the hall, s\n",
+"alpha = [0.025, 0.02, 0.55]; // Absorption coefficients of the wall, ceiling and floor resp., OWU per metre square\n",
+"alpha_s = 0;\n",
+"for i=1:1:3\n",
+" alpha_s = alpha_s + alpha(i)*s(i);\n",
+"end\n",
+"T = 0.167*V/alpha_s; // Sabine Formula for reverbration time, s\n",
+"printf('\nThe reverbration time for the hall = %4.2f s', T);\n",
+"\n",
+"// Result\n",
+"// The reverbration time for the hall = 1.28 s "
+ ]
+ }
+,
+{
+ "cell_type": "markdown",
+ "metadata": {},
+ "source": [
+ "## Example 18.6: Gain_of_resultant_sound_intensity.sci"
+ ]
+ },
+ {
+"cell_type": "code",
+ "execution_count": null,
+ "metadata": {
+ "collapsed": true
+ },
+ "outputs": [],
+"source": [
+"// Scilab Code Ex18.6: Gain of resultant sound intensity: Page-362 (2010)\n",
+"I0 = 1; // For simplicity assume initial sound intensity to be unity, watt per metre square\n",
+"A_I1 = 80; // First intensity gain of sound, dB\n",
+"A_I2 = 70; // Second intensity gain of sound, dB\n",
+"// As A_I = 10*log10(I/I_0), solving for I1 and I2\n",
+"I1 = 10^(A_I1/10)*I0; // First intensity of sound, watt per metre square\n",
+"I2 = 10^(A_I2/10)*I0; // Second intensity of sound, watt per metre square\n",
+"I = I1 + I2; // Resultant intensity level of sound, watt per metre square\n",
+"A_I = 10*log10(I/I0); // Intensity gain of resultant sound, dB\n",
+"printf('\nThe intensity gain of resultant sound = %6.3f dB', A_I);\n",
+"\n",
+"// Result\n",
+"// The intensity gain of resultant sound = 80.414 dB "
+ ]
+ }
+],
+"metadata": {
+ "kernelspec": {
+ "display_name": "Scilab",
+ "language": "scilab",
+ "name": "scilab"
+ },
+ "language_info": {
+ "file_extension": ".sce",
+ "help_links": [
+ {
+ "text": "MetaKernel Magics",
+ "url": "https://github.com/calysto/metakernel/blob/master/metakernel/magics/README.md"
+ }
+ ],
+ "mimetype": "text/x-octave",
+ "name": "scilab",
+ "version": "0.7.1"
+ }
+ },
+ "nbformat": 4,
+ "nbformat_minor": 0
+}