blob: b346665b99f90e9a2948ccd0a5c7900165c7d906 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
//example 16.7
//calculate annual average rainfall
clc;funcprot(0);
//given
L=50; //spacing between drains
k=1D-5; //permeability coefficient
a=10;
b=10.3;
Q=4*k*(b^2-a^2)/L;
Pav=Q*24*3600*100*100/L;
mprintf("annual average rainfall=%i cm",Pav);
|