//A Deformation of affine Steiner surfaces //by Adam Coffman camera { location <-2.2, 0,-3.5> look_at <0.03, -0.02, 0.1> } #include "colors.inc" #declare p = cos(2*pi*clock)/sqrt(3); #declare q = sin(2*pi*clock); background{White} poly{4, < 0, 0, 0, 0, -1, 0, 0, -1, 0, 0, 0, 0, 3*p-q, 0, 0, 0, 0, p-q, 0, 0, 1+2*p*q-2*p*p, 0, 0, 2-8*p*p, 0, 2*(q*p-p*p), 0, 0, 0, 0, 1-2*p*q-2*p*p, 0, 0, 0, 0 > sturm pigment { crackle color_map { [0.02 color Black ] [0.17 color Orange ] [0.5 color OrangeRed ] [0.75 color Black ] [0.77 color White ] [1 color Orange] } scale .6} finish { ambient 0.6 phong 1 phong_size 80 } bounded_by { cylinder{<20,0,0> <-20,0,0> 1.8} } clipped_by { bounded_by } rotate z*90 } light_source{<0.1,20,0.1> White} light_source{<-40,-0.02,0.02> White} light_source{<-10,10,-40> White} light_source{<0.1,-0.1,-20> White}