diff options
Diffstat (limited to '3862/CH6/EX6.14/Ex6_14.sce')
| -rw-r--r-- | 3862/CH6/EX6.14/Ex6_14.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/3862/CH6/EX6.14/Ex6_14.sce b/3862/CH6/EX6.14/Ex6_14.sce new file mode 100644 index 000000000..6d9d7fdae --- /dev/null +++ b/3862/CH6/EX6.14/Ex6_14.sce @@ -0,0 +1,9 @@ +clear +D=40.0 //Screw diameter +l=20.0 //Screw lwngth +p=l/3.0 //Lead of the screw +W=40000.0 //effort +R = 400 //Lever length +u = 0.12 //coefficient of friction between screw and nut +P = (D/(2*R))*W*((u+(p/(3.14*D)))/(1-u*(p/(3.14*D)))) //Effort +printf("\n Effort is %0.3f N",P) |