Posición de la partícula: R = Math.sqrt(x*x+y*y+z*z);

Campo de la tierra considerada como un dipolo

C = A/Math.pow(R, 5.0);
Bx = C*(-3*z*x);
By = C*(-3*z*y);
Bz = C*(x*x+y*y-2*z*z);

Fx = vy*Bz - vz*By;
Fy = vz*Bx - vx*Bz;
Fz = vx*By - vy*Bx;