summaryrefslogtreecommitdiff
path: root/3594/CH14/EX14.12/Ex14_12.sce
diff options
context:
space:
mode:
Diffstat (limited to '3594/CH14/EX14.12/Ex14_12.sce')
-rw-r--r--3594/CH14/EX14.12/Ex14_12.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3594/CH14/EX14.12/Ex14_12.sce b/3594/CH14/EX14.12/Ex14_12.sce
new file mode 100644
index 000000000..e96b4f3a9
--- /dev/null
+++ b/3594/CH14/EX14.12/Ex14_12.sce
@@ -0,0 +1,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)