summaryrefslogtreecommitdiff
path: root/3753/CH3/EX3.1/Ex3_1.sce
blob: d9c0b21a9b4ea2e71f0b8cc0d2182af37b9981d7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Example number 3.1, Page number 3.32

// importing modules
clc;clear;close

// Variable declaration
V=2265 // m^3
A=92.9 // Coefficient
x=2               // The absorption become 2*A of open window

// Calculation
T=(0.16*V)/A      // Sabine's formula  
T2=(0.16*V)/(x*A) // in s

// Result
printf("Reverbration time = %0.1f s",T)
printf("\nFinal Reverbration time = %0.2f s",T2)
printf("\nThus the reverbration time is reduced to one-half of its initial value")