//A Deflating Ellipsoid //by Adam Coffman camera { location <-3.7,0,-3.7> look_at <0.03, -0.02, 0.5> } #include "colors.inc" #declare T=1/2*(1-cos(2*pi*(clock+0.01))); background{White} box{<2.1,-2.1,2.1>,<-100,100,-100> texture{ pigment{checker White, Thistle scale 0.5 } finish{ambient 0.5} } } poly{2, <(1+T)*(1+T),0,0,0,(1-T)*(1-T),0,0,(1-T*T)*(1-T*T),0,-(1-T*T)*(1-T*T)> sturm pigment{Orange} finish{ phong 0.6 phong_size 70 ambient 0.7 } bounded_by{ poly{2,<0,0,0,0,1/4,0,0,1,0,-1> } } clipped_by{ bounded_by } } light_source{<0.1,40,0.1> White} light_source{<-40,-0.4,0.02> White} light_source{<0.1,-0.1,-40> White}