Argh!!!! I sent the wrong version. Here is the one I meant to send. Sorry
Sorry :(

#declare R=.8;#declare S=1;#declare T=.7;#declare I=1;union{blob{threshold T
#while(I<=5)sphere{<-I,1,10>,R,S}sphere {<-I,-1, 10>,R,S}#declare I=I+1;#end
sphere{<-5,0,10>,R,S}}blob{threshold T
sphere{<5,1,10>,R,S}sphere{<5,0,10>,R,S}
sphere{<3,0,10>,R,S}sphere{<1,0,10>,R,S}sphere{<1,1,10>,R,S}#declare
I=1;#while
(I<= 5)sphere{<I,-1,10>,R,S}#declare I=I + 1;#end}scale 20 pigment{rgb
10.0}}

Post a reply to this message