// Last edited on 2009-07-23 17:13:11 by stolfilocal
// Processed by remove-cam-lights

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

#declare verdeclaro = 
  texture {
    pigment { color rgb < 0.70, 0.93, 0.70 > }
    finish { diffuse 0.8 ambient 0.2 }
  }

#declare vermelho = 
  texture {
    pigment { color rgb < 0.86, 0.08, 0.24 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

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

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

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

#declare cinzul = 
  texture {
    pigment { color rgb < 0.44, 0.5, 0.56 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#declare verde = 
  texture {
    pigment { color rgb < 0, 0.66, 0.42 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

#declare prata = 
  texture {
    pigment { color rgb < 1, 1, 0.5 > }
    finish { diffuse 0.1 ambient 0.1 reflection 0.8}
  }

#macro sierp(n)
  #if(n=0)
    union{
      box{<0,0,0>, <4,4,8> }
      box{<-4,0,0>, <-8,4,8> }
      box{<0,0,4>, <-4,4,8> }
    }
  #else
    union{
      box{<0,0,0>, <4,4,8> }
      box{<-4,0,0>, <-8,4,8> }
      box{<0,0,4>, <-4,4,8> }
      object{sierp(n-1) scale<0.75, 1, 0.75> translate<-0.75,0,8>}
      }
  #end
#end 

#declare N = 5;

object{ sierp(N) texture{ verdeclaro } }

// Original camera parameters:
// #local cam_ctr = <0.00,-0.50,0.00>
// #local cam_vec = (<20,-100,20>-<0.00,-0.50,0.00>)
// #local cam_sky = z

#include "camlight.inc"
camlight(<-2,2,6>,<10,7,5>,70.0,z,1.0)