summaryrefslogtreecommitdiff
path: root/1364/CH2/EX2.6.5/2_6_5.sce
blob: 4c454869b12a30698e69520c9c519cceea021d48 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clc
//initialisation of variables
w= 62.4 //lb/ft^3
H1= 15 //ft
B= 10 //ft
H2= 5 //ft
r= sqrt(19)/10
l= 16 //ft
//CALCULATIONS
F= 0.5*w*(H1^2-H2^2)*B/2240
N= F*0.5/r
h= H2*(1-(H2/H1)^3)/(1-(H2/H1)^2)
R1= N*h/l
R2= N-R1
//RESULTS
printf (' reaction between the gates= %.1f tonf',F)
printf (' \n reaction forces on the finges= %.1f tonf',R2)