# Deco-Cube Implicit Surface

By manipulating several algebraic equation of torus, we can create equations of surfaces with a desired genus, also for the esthetic appeal. This surface is generated by arranging six circles positioned as the faces of a cube.

cc = 2; m = 13; pp = 19; ContourPlot3D[ ((x^2 + y^2 - cc^2)^2 + (z - 1)^2*(z + 1)^2)*((y^2 + z^2 - cc^2)^2 + (x - 1)^2*(x + 1)^2)*((z^2 + x^2 - cc^2)^2 + (y - 1)^2*(y + 1)^2), {x, -m, m}, {y, -m, m}, {z, -m, m}, PlotPoints -> {pp, pp}, Contours -> {3}]

See also: orthocircles.

http://3d-xplormath.org/j/applets/en/vmm-surface-implicit-DecoCube.html