summaryrefslogtreecommitdiff
path: root/1535/CH18/EX18.2/Ch18Ex2.sci
diff options
context:
space:
mode:
Diffstat (limited to '1535/CH18/EX18.2/Ch18Ex2.sci')
-rwxr-xr-x1535/CH18/EX18.2/Ch18Ex2.sci8
1 files changed, 8 insertions, 0 deletions
diff --git a/1535/CH18/EX18.2/Ch18Ex2.sci b/1535/CH18/EX18.2/Ch18Ex2.sci
new file mode 100755
index 000000000..a5b5fc6dc
--- /dev/null
+++ b/1535/CH18/EX18.2/Ch18Ex2.sci
@@ -0,0 +1,8 @@
+// Scilab Code Ex18.2: Change in sound level for doubling intensity: Page-361 (2010)
+I1 = 1; // For simplicity assume first intensity level to be unity, W per metre square
+I2 = 2*I1; // Intensity level after doubling, watt per metre square
+dA_I = 10*log10(I2/I1); // Difference in gain level, dB
+printf("\nThe sound intensity level is increased by = %1d dB", dA_I);
+
+// Result
+// The sound intensity level is increased by = 3 dB \ No newline at end of file