1 files changed, 22 insertions, 0 deletions
diff --git a/3819/CH3/EX3.21/Ex3_21.sce b/3819/CH3/EX3.21/Ex3_21.sce
new file mode 100644
index 000000000..e36b4e3f8
--- /dev/null
+++ b/3819/CH3/EX3.21/Ex3_21.sce
@@ -0,0 +1,22 @@
+// A Textbook of Fluid Mecahnics and Hydraulic Machines - By R K Bansal
+// Chapter 3-Hydrostatic Forces on surfaces
+// Problem 3.21
+
+//Data given in the Problem
+b=2
+h=3
+A=b*h/2
+theta =60
+dens=1000
+g=9.81
+
+//calculations
+x=1/3*h             //x=AG distance
+H=2.5 + (x * sin (theta*%pi/180))
+//1)
+F=dens*g*A*H
+mprintf("The total pressure  is %f N\n",F)
+//2)
+IG=b*h^3/36
+COP=IG*(sin (theta*%pi/180))^2/(A*H)+H
+mprintf("Te COP is at %f m \n",COP)