summaryrefslogtreecommitdiff
path: root/1928/CH4/EX4.15.8
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1928/CH4/EX4.15.8
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1928/CH4/EX4.15.8')
-rwxr-xr-x1928/CH4/EX4.15.8/ex_4_15_8.sce35
1 files changed, 35 insertions, 0 deletions
diff --git a/1928/CH4/EX4.15.8/ex_4_15_8.sce b/1928/CH4/EX4.15.8/ex_4_15_8.sce
new file mode 100755
index 000000000..421566f16
--- /dev/null
+++ b/1928/CH4/EX4.15.8/ex_4_15_8.sce
@@ -0,0 +1,35 @@
+//Chapter-4,Example4_15_8,pg 4-30
+
+l=20 //length of room
+
+b=15 //bredth of room
+
+h=10 //height of room
+
+V=l*b*h //volume of room
+
+a=0.1 //absorption coefficient
+
+S=2*(l*b+b*h+h*l) //surface area of hall
+
+T1=(0.161*V)/(a*S) //Reverberation time,using Sabine's formula
+
+printf("1) Reverberation time =")
+
+disp(T1)
+
+printf("sec")
+
+a2=0.66 //absorption coefficient of curtain cloth
+
+S2=100 //surface area of a curtain cloth
+
+T2=(0.161*V)/(a*S+a2*S2*2) //Reverberation time,using Sabine's formula
+
+T=T1-T2 //change in Reverberation time
+
+printf("2) change in Reverberation time =")
+
+disp(T)
+
+printf("sec")