2 files changed, 22 insertions, 0 deletions
diff --git a/3856/CH21/EX21.1/Ex21_1.sce b/3856/CH21/EX21.1/Ex21_1.sce
new file mode 100644
index 000000000..12bb91d7f
--- /dev/null
+++ b/3856/CH21/EX21.1/Ex21_1.sce
@@ -0,0 +1,21 @@
+//How high will water rise in Xylem vessel of a plant
+
+//Examlpe 21.1
+
+clc;
+
+clear;
+
+gyma=0.07275; //Suface tension in N m^-1
+
+r=0.020*10^-2; //Radius of Xylem vessel in m
+
+g=9.81; //Acceleration due to gravity in m s^-1
+
+rho=1*10^3; //Density of water in kj m^-3
+
+costheta=1; //Beacause the contact angle is quite small we assume that theta=0
+
+h=(2*gyma*costheta)/(rho*g*r); //Height of the water that rise up in Xylem vessel in m (1 N=1 kg m s^-2 therefore N s^2 kg^-1=1 m)
+
+printf(" Hight of the  water that rise up in Xylem vessel of a plant = %.3f m",h); 
diff --git a/3856/CH21/EX21.1/Ex21_1.txt b/3856/CH21/EX21.1/Ex21_1.txt
new file mode 100644
index 000000000..f3f005f6b
--- /dev/null
+++ b/3856/CH21/EX21.1/Ex21_1.txt
@@ -0,0 +1 @@
+  Hight of the  water that rise up in Xylem vessel of a plant = 0.074 m
+\ No newline at end of file