blob: 37d4dba672718b31d6b3686360dfbc98ad18581f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
// A Textbook of Fluid Mecahnics and Hydraulic Machines - By R K Bansal
// Chapter 3-Hydrostatic Forces on surfaces
// Problem 3.11
//Data given in the Problem
d=0.5
D=1
SG=0.8
dens=1000
dens1=SG*dens
w=2
g=9.81
//calculations
//1)total pressure
pA=0
pD=dens1*g*D
pB=pD+dens*g*d //Pressure on the base
F1=1/2*D*pD*w
F2=(d*pD)*w
F3=1/2*d*(pB-pD)*2
F=F1+F2+F3
mprintf("The total pressure on one side of the wall is %f N\n",F)
//Centre of pressure
//we know , from geametry that
h=((F1*2/3*D)+(F2*(D+0.5*d))+(F3*(D+2/3*d)))/F
mprintf("The centre of pressure is %f m from the top",h)
|