// Last edited on 2009-07-22 16:33:22 by stolfilocal
// 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.1 roughness 0.005 ambient 0.1 }
  }

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

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

 #declare p = 1.0/2.0;
 #declare n = 0;
 #declare r = 1;
 #macro sierp(n)

  #if ( n = 0 )
  sphere { < 0, 0, 0 >, r}
  #else
  union {
  sphere { < 0, 0, 0 >, r}
  
  
  object { sierp(n-1)
  scale < 0.5, 0.5, 0.5>
  translate <1.5*r, 0, 0> }
  object { sierp(n-1)
  scale < 0.5, 0.5, 0.5>
  translate <-1.5*r, 0, 0> }
  object { sierp(n-1)
  scale < 0.5, 0.5, 0.5>
  translate <0, 1.5*r, 0> }
  object { sierp(n-1)
  scale < 0.5, 0.5, 0.5>
  translate <0, -1.5*r, 0> }
  
   }
  
  #end
  texture{vermelho}
 #end

#declare N = 4;
object{sierp(N)}

// Original camera parameters:
// #local cam_ctr = <0,0,0>
// #local cam_vec = <5.00,5.00,7.00>
// #local cam_sky = z

#include "camlight.inc"
camlight(<0,0,0>,<10,10,15>,7.0,z,1.0)