diff options
Diffstat (limited to '2087/CH3/EX3.3')
| -rwxr-xr-x | 2087/CH3/EX3.3/example3_3.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/2087/CH3/EX3.3/example3_3.sce b/2087/CH3/EX3.3/example3_3.sce new file mode 100755 index 000000000..e382c144c --- /dev/null +++ b/2087/CH3/EX3.3/example3_3.sce @@ -0,0 +1,15 @@ +
+
+//example 3.3
+//calculate
+//depth upto which soil profile is wetted
+clc;
+//Given
+gammad=15.3; //dry weigth of soil
+gammaw=9.81; //unit weigth of water
+Fc=0.15; //field capacity
+Mc=0.08; //moisture content before irrigation
+D=60; //Depth of water applied
+d=(gammaw*D)/(gammad*(Fc-Mc));
+d=round(d);
+mprintf("Depth upto which soil profile is wetted=%f mm.",d);
|