summaryrefslogtreecommitdiff
path: root/3845/CH10/EX10.13/Ex10_13.sce
blob: c7951dcb80bb315bc70ad623bf4575862183e575 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//Example 10.13
F=2000;//Force exerted (N)
r=2.20*10^-2;//Lever arm (m)
net_tau=r*F;//Net torque (N.m)
I=1.25;//Moment of inertia (kg.m^2)
alpha=net_tau/I;//Angular acceleration (rad/s^2)
printf('a.Angular acceleration of the leg =%0.1f rad/s^2',alpha)
theta=1;//Angular displacement (rad)
omega_0=0;//Initial angular velocity (rad/s)
omega=sqrt(omega_0^2+2*alpha*theta);//Final angular velocity (rad/s)
KE_rot=(1/2)*I*omega^2;//Rotational kinetic energy (J)
printf('\nb.Rotational kinetic energy of the leg  = %0.1f J',KE_rot)
//Openstax - College Physics
//Download for free at http://cnx.org/content/col11406/latest