Модель эффекта Джанибекова в Wolfram Mathematica
in Механика on Mathematica
Численное интегрирование уравнений пространственного движения твёрдого тела вокруг неподвижной точки и его визуализация в Wolfram Mathematica
Динамические уравнения Эйлера
eq = {
Jx wx'[t] == (Jy - Jz) wy[t] wz[t],
Jy wy'[t] == (Jz - Jx) wx[t] wz[t],
Jz wz'[t] == (Jx - Jy) wy[t] wx[t]
};
Кинематические уравнения для углов последовательности XZ’X’’
kinematicEq = {
ψ'[t] == (wz[t] Sin[φ[t]] - wy[t] Cos[\[CurlyPhi][t]])/
Sin[\[CurlyTheta][t]],
\[CurlyTheta]'[t] ==
wz[t] Cos[\[CurlyPhi][t]] + wy[t] Sin[\[CurlyPhi][t]],
\[CurlyPhi]'[t] ==
wx[t] + (wy[t] Cos[\[CurlyPhi][t]] - wz[t] Sin[\[CurlyPhi][t]])/
Tan[\[CurlyTheta][t]]
};
