/* Here is a quick do of a klein-bottle. It is generated with the poly command in PoV . The formula is: (x^2+y^2+z^2+2*y-1)*((x^2+y^2+z^2-2*y-1)^2-8*z^2)+ 16*x*z*(x^2+y^2+z^2-2*y-1)=0 Fool around with it, and let me know what you think. T. Nordstrand tore@maxwell.fi.uib.no or nfytn@alf.uib.no */ #include "colors.inc" #include "textures.inc" /* #declare Peel2 = texture { pigment {gradient < 1, 1, 0 > color_map { [0.00, 0.01 color Orange color Orange] [0.01, 0.9 color Clear color Clear] [0.9, 1.001 color Orange color Orange] } } } */ camera { location <0, 0,-8> direction <0, 0, 1> up <0, 1, 0> right <4/3, 0, 0> look_at <0, 1, 0> } light_source {<10, 20, -30> color White} light_source {<-10, 5, 0> color White} light_source {<7, 8, -20> color White} // Sky sphere sphere { <0, 0, 0>, 10000 pigment {color Gray60} finish {Luminous} } // Floor plane plane { y,-10 pigment {NeonBlue} finish {ambient 0.15 diffuse 0.8} } object { poly{6, < 1, 0, 0, 0, 3, 0, -2, 3, 0, -3, 0, 0, 0, 0, 0, 0, 0, 0, 16, 0, 3, 0, -4, 6, 0, -10, 0, -4, 0, 4, 3, 0, -14, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 16, 0, 0, 0, 0, -32, 0, 0, 0, 16, 0, -16, 0, 1, 0, -2, 3, 0, -7, 0, -4, 0, 12, 3, 0, -18, 0, 7, 0, -2, 0, -12, 0, -2, 1, 0, -11, 0, 11, 0, -1> texture{pigment{Orange} } rotate <27 260 0> } }