initial commit / add all books

1 files changed, 23 insertions, 0 deletions

diff --git a/2087/CH3/EX3.2/example3_2.sce b/2087/CH3/EX3.2/example3_2.sce
new file mode 100755
index 000000000..19c2f1716
--- /dev/null
+++ b/2087/CH3/EX3.2/example3_2.sce
@@ -0,0 +1,23 @@
+

+

+//example 3.2

+//calculate

+//Depth of moisture in root zone at field capacity

+//Depth of moisture in root zone at permanent wilting point

+//Depth of moisture available in root zone

+clc;

+//Given

+gammad=15;        //dry weigth of soil

+gammaw=9.81;      //unit weigth of water

+Fc=0.3;           //field capacity

+pwp=0.08;         //permanent wilting point

+d=0.8;            //root zone depth

+d1=gammad*Fc*1000/gammaw;

+d2=gammad*pwp*1000/gammaw;

+d3=gammad*d*(Fc-pwp)*1000/gammaw;

+d1=round(d1);

+d2=round(d2);

+d3=round(d3);

+mprintf("Depth of moisture in root zone at field capacity=%f mm/m.",d1);

+mprintf("\nDepth of moisture in root zone at permanent wilting point=%f mm/m.",d2);

+mprintf("\nDepth of moisture available in root zone=%f mm/m.",d3);