       Defective Mesh lines in ContourPlot3D

• To: mathgroup at smc.vnet.net
• Subject: [mg121112] Defective Mesh lines in ContourPlot3D
• From: "Alexey Popkov" <lehin.p at gmail.com>
• Date: Mon, 29 Aug 2011 03:46:57 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com

```Hello,

I have a problem with rendering of Mesh lines on a 3D surface produced by
ContourPlot3D in Mathematica 7.0.1:

p=ContourPlot3D[x^4+y^4+z^4-(x^2+y^2+z^2)^2+3(x^2+y^2+z^2)==3,
{x, -2,2}, {y, -2, 2}, {z,-2,2},
BoundaryStyle->Directive[Black,Thickness[.003]],
ContourStyle->Directive[Orange,Opacity[0.5],Specularity[White,300]],
PlotPoints->90,Ticks->None,
MeshStyle->Directive[GrayLevel[.7],Thickness[.001]],
Lighting->{{"Directional",RGBColor[1,1,1],
{ImageScaled@{1,0,1},ImageScaled@{0,0,0}}}}];
p=Graphics[Inset[p,{0,0},Center,{1,1}],
PlotRange->{{-.5,.5},{-.5,.5}},Frame->True]

(see screenshot here: http://i.stack.imgur.com/zBtYC.png )

Let us to look closer on Mesh lines:

Show[p, PlotRange -> {{-.16, -.05}, {0, .1}}]

(see screenshot here: http://i.stack.imgur.com/JBkcc.png )

You can see that gray Mesh lines are overlapped by surface-forming triangles
in many places and even look dashed. Is there a way to avoid this?

```

• Prev by Date: NDSolve solution does not fulfill boundary condition ??
• Next by Date: Re: Replace
• Previous by thread: Re: NDSolve solution does not fulfill boundary condition ??
• Next by thread: Re: Defective Mesh lines in ContourPlot3D