Leopold
Equation
\[ 1000 x^2y^2z^2 + 3x^2+3y^2+z^2=1 \]
Properties:
- degree 6
- closed
- smooth
Some story
Decomposed with default bertini and bertini_real settings. Often, I have to increase the setting sharpendigits
so that points which are near each other are identified as such. But this smooth surface is so nice that it just popped right out.
The first one I printed almost failed. I very slightly underestimated the amount of filament on the spool, and it ran out at the top. So, I used a little from a different color to finish it off, having left it on the printer.
input