1026/CH5/EX5.1/Example5_1.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

//chapter5,Example5_1,pg 97

T1=1.5

T2=1

A=20

V=10*8*6

a=((0.161*V)/(2*A))*((1/T2)-(1/T1))

printf("absorption coefficient\n")

printf("a=%.3f Sabines",a)