// Last edited on 2005-01-05 17:11:08 by stolfi
// Processed by remove-cam-lights

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

#declare raio = 2.000;

#declare tinta_A =
  texture {
    pigment { color rgb < 0.10, 0.80, 1.00 > }
    finish { diffuse 0.8 specular 0.4 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B =
  texture {
    pigment { color rgb < 1.00, 0.80, 0.5 > }
    finish { diffuse 0.8 specular 0.4 roughness 0.005 ambient 0.1 }
  }

#declare centro =
  box {
    < -1, -2, 0 >,
    < 1, 2, 3.15 >
    texture { tinta_A }
  }

#declare partedir =
  cone {
    <0, 2, 2>, 1
    <0, 4.5, 2>, 0
    texture { tinta_B}
    translate <-1, -2, 0>
    rotate -25*z
    translate <1, 2, 0>
  }

#declare encaixedir =
  cone {
    <1, 2.1, 2>, 1
    <1, -0.5, 2>, 0
    texture { tinta_B}
  }

#declare parteesq =
  box {
    < -1, -3.5, 1 >,
    < 1, -2, 3 >
    texture { tinta_B }
  }

#declare chanfro  =
  box {
    < -1.1, -5, 1 >,
    < 1.1, -2, 3 >
    texture { tinta_B }
    translate <0, 2, -3>
    rotate -35*x
    translate <0, -2, 1>
  }

#declare encaixeesq =
  box {
    < -1.5, -2, 1 >,
    < 0.5, -0.5, 3 >
    texture { tinta_B }
  }

#declare chanfroenc  =
  box {
    < -1.6, -2, 1 >,
    < 0.5, 0.5, 3 >
    texture { tinta_B }
    translate <0, 2, -3>
    rotate 35*x
    translate <0, -2, 1>
  }

   difference{
     union{
       object { centro }
       object { partedir }
       difference {
         object { parteesq }
         object { chanfro }
         translate <1, 2, 0>
         rotate -25*z
         translate <-1, -2, 0>
       }
     }
       difference {
         object { encaixeesq }
         object { chanfroenc }
       }

   }

#include "camlight.inc"
camlight(<0.00,-0.50,1.30>,<-9.00,-4.55,6.85>,0.90,z,1.0)