Built-In Planes
Use different sets of parallel and intersecting planes as slices.
show complete Wolfram Language input
In[3]:=
![Click for copyable input](assets.en/built-in-planes/In_11.png)
Grid[Partition[
Table[SliceContourPlot3D[
1/Sqrt[(1 + x)^2 + (1 + y)^2 + z^2] - 1/
Sqrt[(-1 + x)^2 + (-1 + y)^2 + z^2],
slice, {x, -2, 2}, {y, -2, 2}, {z, -2, 2},
Contours -> Range[-2.5, 2.5, 0.5], Evaluate@opts], {slice,
slices}], 3]]
Out[3]=
![](assets.en/built-in-planes/O_7.png)