blob: 5858a212742423ea266458647c7c05ec6cea400f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
//Chapter 4, Exmaple 3, page 140
//Claculate size of developed avalanche
clc
clear
a = 4*10**4
b = 15*10**5
//Rewriting equation 4.2
x0=0;x1=0.0005;
X=integrate('a-b*sqrt(x)','x',x0,x1);
As = exp(X) // Avelanche size
printf("\n Avalanche size = %f m",As)
//Answers may vary due to round of error
|
