kinN27a.mws
Задача 27a
> |
AB:=77:OA:=40:OD:=OA/2:
|
> |
alf:=evalf(arccos((43+OA*cos(Pi/4))/AB));
|
> |
h:=evalf(AB*sin(alf)-OA*sin(Pi/4));
|
> |
beta:=evalf(arctan((h+OD*sin(Pi/4))/(43+OD*cos(Pi/4))));
|
Неподвижные точки (нулевые скорости)
> |
v[B,1],v[O,1],v[O,2]:=0$3:
|
Заданная угловая скорость ОА
Размеры
> |
Gr1:=Граф([B,A,O],[AB,OA],[alf,-3*Pi/4],[w2,w1]):
|
> |
eq1:=Gr1[1]; eq2:=Gr1[2];
|
> |
S:=solve({eq1,eq2});assign(S);
|
> |
Gr2:=Граф([O,D],[OD],[Pi/4],[w1]);
|
> |
S:=solve({op(Gr2)});assign(S);
|
> |
v:=evalf(v[D,1]*cos(beta)+v[D,2]*sin(beta)-v[B,2]*sin(beta));
|
|