Mathematica generated graphic showing the magnetic field lines from a uniformly magnetic sphere created by Jeff Bryant (jeffb@wolfram.com). Version 5.2 cylinder code by Flavio Smirne.