summaryrefslogtreecommitdiff
path: root/3886/CH6/EX6.14/6_14.sce
diff options
context:
space:
mode:
Diffstat (limited to '3886/CH6/EX6.14/6_14.sce')
-rw-r--r--3886/CH6/EX6.14/6_14.sce9
1 files changed, 9 insertions, 0 deletions
diff --git a/3886/CH6/EX6.14/6_14.sce b/3886/CH6/EX6.14/6_14.sce
new file mode 100644
index 000000000..68df5a803
--- /dev/null
+++ b/3886/CH6/EX6.14/6_14.sce
@@ -0,0 +1,9 @@
+//Force required at the end of lever
+d=40 //mm
+p=20/3 //mm
+W=40000 //N
+R=400 //mm
+mu=0.12
+theta=atand(p/(%pi*d)) //degree
+P=(d*W*(mu+tand(theta)))/(2*R*(1-mu*tand(theta))) //N
+printf("Force required at the end of lever P=%0.2f N",P)