summaryrefslogtreecommitdiff
path: root/3594/CH8/EX8.3/Ex8_3.sce
blob: 6ab2d50cb8a3d484486da805ee5e27c0df0397f4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

clc
//given
u=.35
Tb=500//lb.ft
rd=10//in
phi=atan(u)
x=rd*sin(phi)
//F*OD=R*a=R1*a
//R=R1
//2*R*x=Tb
OD=24//in
a=11.5//inches; From figure
F=Tb*a*12/(OD*2*x)
//from figure
HG=4//in
GK=12//in
HL=12.22//in
P=F*HG/GK
Fhd=HL*P/HG
printf("\na) Magnitude of P = %.f lb",P)
printf("\nb) Magnitude of Fhd = %.f lb",Fhd)