- #1

- 1,868

- 0

Hi

I am succesfully using NDSolve to find the solution of a 1D equation of motion:

This is a particle decelerating constantly in the x-direction. Now, I need to extend my problem, because the deceleration along

So the total problem is

[tex]

\frac{d^2x}{dt^2} = -200y - x\\

\frac{dy}{dt} = -2

[/tex]

So along x there is non-constant deceleration, and along y I have a constant velocity. Is it possible to solve such a problem in Mathematica?

Best regards and thanks in advance,

Niles.

I am succesfully using NDSolve to find the solution of a 1D equation of motion:

Code:

```
solution = NDSolve[{x''[t] == -200, x[0] == 0, x'[0] == 100}, x, {t, 0, 1}];
ParametricPlot[{x[t], x'[t]} /. solution, {t, 0, 1}, PlotRange -> {{0, 100}, {0, 100}}]
```

*x*is actually not constant. It depends on both the*x*- and*y*-coordinate of the particle.So the total problem is

[tex]

\frac{d^2x}{dt^2} = -200y - x\\

\frac{dy}{dt} = -2

[/tex]

So along x there is non-constant deceleration, and along y I have a constant velocity. Is it possible to solve such a problem in Mathematica?

Best regards and thanks in advance,

Niles.

Last edited: