User Portlet
| Discussions |
|---|
| ClearAll["Global`*"]; ode1 = y'[t] == -Sin[x[t]]/y[t]; ode2 = x'[t] == -Cos[x[t]] (6 Sin[x[t]] Cos[x[t]] + y[t] (b - c (1 + 3*y[t]^2)))/(2*y[t]^3*(b + c (y[t]^2 - 1))); ode3 = v'[t] == -(b + c*(y[t]^2 - 1))/(4*y[t]*Cos[x[t]]) + ... |