light_source{<.5,0,8>,1.2*(x+y)}light_source{<-.5,0,8>,2*(z)}fog{distance 6 rgbf<.4,.5,.5,.3>}cylinder{<0,-99,20>,<0,99,20>11 pigment{rgbft<1.2,1,1,.2,1.1>}interior{ior 1.6}}#local A=0;#while(A<2*pi)#local e=0;#while(e<.1)#local p=A-e+clock*pi*.2829;#local w=1+.15*cos(p*25);sphere{0,.4-.05*sin(p*40)pigment{rgb<3,2,1>}finish{ambient.5}normal{granite scale 3}translate<w*5*sin(p*4),w*3.3*cos(p*3),15+6*sin(p)>}#local e=e+.002;#end#local A=A+pi*.2857;#end