New in Wolfram Mathematica 6: 3D Printing & Scanning Support  previous | next 
Process 3D Geometry Data
Mathematica 6 allows you to apply the full power of Mathematica to processing 3D geometry data.
In[1]:=

Click for copyable input
ListSurfacePlot3D[

 ExampleData[{"Geometry3D", "StanfordTestBunny"}, "VertexData"], 

 MaxPlotPoints -> 50, Mesh -> 30, Axes -> None, 

 MeshFunctions -> (#1 + #2 + #3 &), MeshShading -> {None, Yellow}]
Out[1]=