summaryrefslogtreecommitdiff
path: root/2087/CH16/EX16.10/example16_10.sce
blob: baa13dbd870f37ce3dc71f0d0206544f82511175 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13


//example 16.10
//calculate the required depth of water to be applied
clc;funcprot(0);
//given
Ecd=20;           //electrical conductivity of drainage water
Eci=1.5;        //m mho/cm
Dc=55.5;        //consumptive use

Lr=Eci/Ecd;
D=Dc/(1-Lr);
mprintf("required depth of water to be applied=%i mm.",D);