summaryrefslogtreecommitdiff
path: root/3819/CH3/EX3.12/Ex3_12.sce
blob: 6c469146d9c7c9e60ec332f42da552a8bb75fc7b (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
30
31
// A Textbook of Fluid Mecahnics and Hydraulic Machines - By R K Bansal
// Chapter 3-Hydrostatic Forces on surfaces
// Problem 3.12

//Data given in the Problem
d=0.6
a=1.5
SG=0.9
dens=1000
g=9.81

//Calculations
dens1=SG*dens
h=a-d
pA=0
pD=dens1*g*h
pB=dens1*g*h+dens*g*d
//In the diagram,DE=pD,BC=pB,FC=pB-pD

//1)Total pressure
F1=(1/2*h*pD)*a
F2=(d*pD)*a
F3=(1/2*d*(pB-pD))*a
F=F1+F2+F3
mprintf("The total pressure is %f N\n",F)

//2) Position of Centre of Pressure
h=(F1*d+F2*(a-d/2)+(F3*(a-d+2/3*d)))/F      //Taking moments of all forces
mprintf("The position of centre of pressure is %f m from A ",h)