summaryrefslogtreecommitdiff
path: root/1325/CH8/EX8.3/8_3.sce
blob: 017cc168aebc2efe0039feb1183b05e718c3b1a5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//To find a) magnitude of P b) magnitude of force at Hd
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)