Question: How to plot forcelines and equipotential curves?

Hello! I have a problem - i can't find standart Maple functions and procedures, that plot, so to speak, "phase portrait"-esque magnetic field lines for featured "vector field". In details: i need to plot magnetic field lines and equipotential curves of uniformly magnetized cylinder. I have piecewise functions Hr(r,z) and Hz(r,z), (per se, r is x, z is y, y-axis coincides with cylinder axis): L := 2; a := .5 H[z](r,z):=piecewise(0<>
Please Wait...