diff options
Diffstat (limited to '2087/CH16/EX16.10/example16_10.sce')
| -rwxr-xr-x | 2087/CH16/EX16.10/example16_10.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/2087/CH16/EX16.10/example16_10.sce b/2087/CH16/EX16.10/example16_10.sce new file mode 100755 index 000000000..baa13dbd8 --- /dev/null +++ b/2087/CH16/EX16.10/example16_10.sce @@ -0,0 +1,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);
|