New in Wolfram Mathematica 6: High-Impact Adaptive Visualization ◄ previous | next ►
Highlight Features Using Arbitrary Meshing
Mathematica 6 makes it easy to specify any form of meshing for any surface.
In[1]:=

Click for copyable input
Plot3D[Abs[Sec[x + I y]], {x, -4, 4}, {y, -4, 4}, 

 MeshFunctions -> {#3 &, #1^2 - #2^2 &}, 

 PlotStyle -> 

  Directive[RGBColor[.95, .95, .55], Specularity[White, 30]]]
Out[1]=