// Last edited on 2005-01-05 21:59:16 by stolfi
// Processed by remove-cam-lights

background{ color rgb < 0.75, 0.80, 0.85 > }

#declare raio = 2.000;

#declare cristal = < 0.10, 0.80, 1.00 >;
#declare tinta_A =
  texture {
    finish { diffuse 0.1 specular 1 roughness 0.001 ambient 0.1 }
    pigment { rgb cristal filter 1 }
  }

#declare espelho = < 1.00, 0.80, 0.5 >;
#declare tinta_B =
  texture {
    pigment { color rgb espelho }
    finish { diffuse 0.05 specular 1.2 roughness 0.05 ambient 0.05 reflection espelho }
  }

#declare centro =
  torus {
    0.3, 0.1
    rotate -45*z
    translate <2.8,2.8,1.4>
    texture { tinta_A }
    interior { ior 1.5 }
  }

#declare partedir =
  lathe {
    linear_spline
    6,
    <4,0>, <4,0.4>, <4.2,0.6>, <4,0.8>, <4.2,1>, <4,1.2>
    finish {
      ambient .3
      phong .75
    }
    texture { tinta_B }
    rotate 90*x
  }

#declare c1 =
  cylinder {
    <0,0,0>,
    <0,0,3>,
    3.95
    open
    texture { tinta_B }
  }

#declare c2 =
  cylinder {
    <0,0,-0.1>,
    <0,0,3.1>,
    3.8
    open
    texture { tinta_B }
  }

#declare p1 =
  box {
    <-4.1,-1,-1>
    <4.1,1,1>
    rotate 45*x
    rotate 45*z
    translate <0,0,2.6>

    texture { tinta_B }
  }

plane {z,0
  texture {
    pigment{ checker <0.5,0.5,0.5>, <1,1,1> }
    finish { ambient 0.6 diffuse 0.4 }
    scale 0.5
  }
  rotate 45*x

  translate <0,0,-9>

}

   object{partedir}
   object{centro}
   object{centro rotate -30*z}
   object{centro rotate -60*z}
   object{centro rotate -90*z}
   object{centro rotate -120*z}
   object{centro rotate -150*z}
   object{centro rotate 30*z}
   object{centro rotate 60*z}
   object{centro rotate 90*z}
   object{centro rotate 120*z}
   object{centro rotate 150*z}
   difference {
     object {c1}
     object {c2}
     object {p1}
     object {p1 rotate -30*z}
     object {p1 rotate -60*z}
     object {p1 rotate -90*z}
     object {p1 rotate -120*z}
     object {p1 rotate -150*z}

   }

#include "camlight.inc"
camlight(<0,0,0>,<8.0,8.00,4.00>,1.15,z,1.0)