# How to plot a hole in a hole in a hole?

There is an image from this book.(page 22)

I want to plot it, but I don't know equation of this surface.

Anyone have an idea about it and how to plot it with Mathematica?

• while interesting, I feel like this is more of a math question on how to parametrize that surface – glS Mar 1 '17 at 14:45
• You might look at the parametric plot of a Klein bottle, it has similar properties (not the same though). See this link. – Phil Neumiller Mar 1 '17 at 15:19
• You could get a shape of the right topology at least by using RegionUnion, RegionDifference etc. on a Sphere, some Cylinder's, and a torus (as an ImplicitRegion perhaps). – user484 Mar 1 '17 at 15:20
• I could not find anything relevant but may be these links are useful. kleinbottle.com/gallery/Hole-through-a-Hole-in-a-Hole kleinbottle.com/gallery/Spivak_Hole_Pix youtube.com/watch?v=k8Rxep2Mkp8 Especially the video. – Dimitris Mar 1 '17 at 15:54