// Last edited on 2007-06-28 09:22:01 by stolfi
// Processed by remove-cam-lights

global_settings { max_trace_level 12 }

background { color rgb < 0.90, 0.95, 1.00 > }

#declare tinta_xadrez = 
  texture {
    pigment { checker color rgb < 0.20, 0.40, 0.60 >, color rgb <1.0,1.0,1.0> }
    finish { ambient 0.6 diffuse 0.4 }
  }

plane { z,0
  translate -4*z
  texture { tinta_xadrez }
}

#declare rubi = 
  texture {
    pigment { color rgb < 1.0, 0.00, 0.00 > filter 1.0 }
    finish { specular 0.5 roughness 0.005 }
  }

#declare esmeralda = 
  texture {
    pigment { color rgb < 0.00, 1.0, 0.0 > filter 0.5 }
    finish { specular 0.5 roughness 0.005 }
  }
  
#declare prata =
  texture {
    pigment { color rgb < 0.30, 0.30, 0.30 > }
    finish { specular 0.7 roughness 0.05 reflection 0.3 }
  }



#declare circulo1 =
  sphere {
    < 0, 0, 1.5 >
    1
    texture { prata }
  }

#declare circulo2 =
  sphere {
    < 0, 0, 1.5 >
    0.8
    texture { prata }
  }

#declare cilindro1 =
  cylinder {
    < 0, 0, 0 >
    < 0, 0, 1.5 >
    0.7
    texture { prata }
  }

#declare cilindro2 =
  cylinder {
    < 0, 0, -0.1 >
    < 0, 0, 1.5 >
    0.5
    texture { prata }
  }

#declare olho1 =
  cylinder {
    < 0.6, -0.5, 1.5 >
    < 1, -0.5, 1.5 >
    0.2
    texture { rubi }
    interior { ior 1.5 }
  }

#declare olho2 =
  cylinder {
    < 0.6, 0.5, 1.5 >
    < 1, 0.5, 1.5 >
    0.2
    texture { rubi }
    interior { ior 1.5 }
  }

#declare nariz =
  cone {
    < 0.9, 0, 0.8 > 0.2
    < 0.9, 0, 1.2 > 0.1
    texture { esmeralda }
    interior { ior 1.5 }
  }

#declare dente1 =
  union {
    box {
      < 0.7, -0.4, 0.2 >
      < 0.5, -0.2, 0.3 >
      texture { rubi }
      interior { ior 1.5 }
    }
    box {
      < 0.7, -0.4, 0.4 >
      < 0.5, -0.2, 0.5 >
      texture { rubi }
      interior { ior 1.5 }
    }
  }

#declare dente2 =
  union {
    box {
      < 0.8, -0.1, 0.2 >
      < 0.6, 0.1, 0.3 >
      texture { rubi }
      interior { ior 1.5 }
    }
    box {
      < 0.8, -0.1, 0.4 >
      < 0.6, 0.1, 0.5 >
      texture { rubi }
      interior { ior 1.5 }
    }
  }

#declare dente3 =
  union {
    box {
      < 0.7, 0.2, 0.2 >
      < 0.5, 0.4, 0.3 >
      texture { rubi }
      interior { ior 1.5 }
    }
    box {
      < 0.7, 0.2, 0.4 >
      < 0.5, 0.4, 0.5 >
      texture { rubi }
      interior { ior 1.5 }
    }
  }



difference {
  union {
    object { circulo1 }
    object { cilindro1 }
    object { olho1 }
    object { olho2 }
    object { nariz }
    object { dente1 }
    object { dente2 }
    object { dente3 }
  }
  union {
    object { circulo2 }
    object { cilindro2 }
  }
}

// Original camera parameters:
// #local cam_ctr = <0.00,0.00,1.50>
// #local cam_vec = (<5.00,0.00,2.00>-<0.00,0.00,1.50>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<0.00,0.00,1.20>,<10,3,3>,4.0,z,1.0)