The following is an attempt to graph Enneper's surface using Mathematica. The code and a gif representation of the output appear bellow.
Enne=ParametricPlot3D[{u-u^3/3+u v^2,v-v^3/3+v u^2,u^2-v^2},{u,-1.5,1.5},{v,-1.5,1.5}]
Show[Enne, AspectRatio->Automatic]
Display["Enne1.ps", Enne]
The second grapgh is an intersecting Enneper's Surface which is obtained by changing the range of the values of u and v in the above code to (-1.9,1.9) (i.e. the rage of values for both variables).
The third graph is another intersecting Enneper's Surface. This time, the range is (-2.5,2.5).