// Last edited on 2005-01-05 18:00:06 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.00, 0.10 > }
    finish { diffuse 0.8 specular 0.4 roughness 0.005 ambient 0.1 }
  }

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

#declare bola =
  sphere {
    < 0.00, 0.00, 0.00 >, 2.00
    texture { tinta_B }
  }

#declare meio =
  cylinder {
    < 1.00, 2.00, 1.00 >,
    < 1.00, 2.00, 1.50 >,
    1.00
    texture { tinta_B}
  }

#declare meio_dobra =
  cylinder {
    < 1.00, 2.00, 1.50 >,
    < 1.00, 2.00, 2.00 >,
    1.00
    texture { tinta_B }
  }

#declare pino =
  cylinder {
    < -2.00, +2.00, -1.00 >,
    < +2.00, -2.00, +1.00 >,
    0.75
    texture { tinta_A }
  }

#declare base =
  box {
    < 2.00, 0.00, 0.00 >,
    < 0.00, 4.00, 1.00 >
    texture {tinta_C}
    }

#declare face =
  box{
    <2.00, -1.00, 2.00>
    <0.00, 6.00, 3.00>
    texture {tinta_A}
    }

#declare face1 =
  box{
    <2.00, -5.00, 2.00>
    <0.00, 6.00, 3.00>
    texture {tinta_A}
    }

#declare bico =
  cone{
  <1.00, -1.00, 3.00>, 2.00
  <1.00, -5.00, 3.00>, 0
  texture { tinta_A }
  }

union{
object {base}
object {meio}
   union{
      object {meio_dobra}
      object {face}
      intersection{
         object {face1}
         object {bico}
      }
      translate <0.00, 0.00, -1.50>
      rotate -60*y
      translate <0.00, 0.00, 1.50>
   }
}

#include "camlight.inc"
camlight(<1.00,2.00,2.00>,<6.50,6.50,4.00>,1.20,z,1.0)