/* Remco de Korte remcodek@xs4all.nl */
#declare bow=blob{ threshold .7

#declare i=90;
#while(i<270)
  cylinder{<.4*sin(i*pi/90)+.9*cos(i*pi/180),-.9*cos(i*pi/180)-.05*sin((i-45)*pi/90),-.5>,
           <.4*sin(i*pi/90)+.9*cos(i*pi/180),-.9*cos(i*pi/180)-.05*sin((i-45)*pi/90),.5>,.05,1} 
  cylinder{<-.4*sin(i*pi/90)-.9*cos(i*pi/180),-.9*cos(i*pi/180)-.05*sin((i-45)*pi/90),-.5>,
           <-.4*sin(i*pi/90)-.9*cos(i*pi/180),-.9*cos(i*pi/180)-.05*sin((i-45)*pi/90),.5>,.05,1}
  #declare i=i+1;
#end

#declare i=0;
#while (i<64)
  cylinder{<1.6-i/40,.32-i/200-sin((i+4)*pi/32)/8,-.5>,
           <1.6-i/40,.32-i/200-sin((i+8)*pi/32)/8,.5>,.05,1}
  cylinder{<-1.6+i/40,.32-i/200-sin((i+4)*pi/32)/8,-.5>,
           <-1.6+i/40,.32-i/200-sin((i+8)*pi/32)/8,.5>,.05,1}
  #declare i=i+1;
#end

pigment{rgb<1,.4,0>}
finish{
  phong .25
  phong_size 25
  reflection .75
  specular 1
  metallic}
  normal{ripples.5 turbulence .7 scale .3}
 }