summaryrefslogtreecommitdiff
path: root/3862/CH6/EX6.13/Ex6_13.sce
blob: 0cee86d442077df78d7eb529d7b3d6f3efcecf81 (plain)
1
2
3
4
5
6
7
8
9
10
11
clear
D=500.0            //diameter of the wheel
d=200.0            //diameter of axle 

W=5000.0              //effort

VR=(2*D)/(D-d)           //Velocity Ratio
Efficiency=0.6
MA=Efficiency*VR         //Mechanical advantage
P = W/MA    //Effort
printf("\n Effort is %0.3f  N",P)