summaryrefslogtreecommitdiff
path: root/3594/CH14/EX14.12/Ex14_12.sce
blob: e96b4f3a914829cddf98f7fe526f3248e89c235e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

clc
//given
N=1500 //rpm
R=4//lb
g=32.2//ft/s^2
w=%pi*N/30
stroke=5//in
r=stroke/2
l=9//in
b=3.5//in
B=(3/2)*R*r/b//primary force
n=l/r
F=(3/2)*R*w^2*r/(g*12*n)//secondary force
printf("\nResultant primary force = %.2f lb\nResultant secondary force = %.f lb",B,F)