path: root/3886/CH22/EX22.6/22_6.sce

//Velocity of B
//refer fig.2.9
omega=(2)/(3*sind(60))  //rad/sec
vB=3*0.770*cosd(60)  //m/sec
printf("\nvB=%.3f m/sec",vB)