This mathematica code works for version 4 but i can't get it to work in version 5. Does anybody have any sugestions.(adsbygoogle = window.adsbygoogle || []).push({});

F = {Fx, Fy, Fz};

r = {x[t], y[t], z[t]};

EF = {Ex, Ey, Ez};

BF = {Bx, By, Bz};

v = D[r, t]

F = q EF + q Cross[v, BF]

eq1 = F - m D[r, {t, 2}] == 0 // Thread;

eq1 // ColumnForm

initial = {

x[0] == 0, x'[0] == 0,

y[0] == 0, y'[0] == 0,

z[0] == 0, z'[0] == 0};

fields = Thread /@ {BF -> {0, 0, m ω0/

q}, EF -> {E0 Cos[ω t], 0, 0}} // Flatten

eqs = Join[eq1, initial] /. fields

dsol = DSolve[eqs, {x[t], y[t], z[t]}, t] // Flatten // FullSimplify

when i do this last part i get this message

DSolve::bvnul: "For some branches of the general solution, the given boundary \

conditions lead to an empty solution.

Thanks!

**Physics Forums | Science Articles, Homework Help, Discussion**

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Mathematica Version 5 help

Loading...

Similar Threads for Mathematica Version help |
---|

Mathematica Storing Mathematica output |

Mathematica Mathematica to MATLAB |

Mathematica Cannot do the integral of the Hyper-geometric function? |

Mathematica Cannot Plot This Function in Mathematica |

Mathematica While Loop in Mathematica |

**Physics Forums | Science Articles, Homework Help, Discussion**