summaryrefslogtreecommitdiff
path: root/3886/CH22/EX22.5/22_5.sce
blob: ef6f7a228397a588776b47899cda8cb006da63da (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Velocities of point B and D
//refer fig. 22.8
vA=5*1  //m/sec
//Instantaneous centre in vertically downward direction
Ic=5/5  //m
vB=2*5  //m/sec
CP=1+0.6*sind(60)  //m
PD=0.6*cosd(60)  //m
CD=sqrt((1.520^2)+(0.3^2))  //m
vD=1.549*5  //m/sec
//Inclination to horizontal
theta=atand((0.3)/(1.520))  //degree
printf("\nvD=%.2f m/sec\ntheta=%.2f degree",vD,theta)