// Last edited on 2009-07-22 17:13:42 by stolfilocal
// Processed by remove-cam-lights
#include "colors.inc"
#include "textures.inc"
#include "shapes.inc"
#include "metals.inc"
#include "glass.inc"
#include "woods.inc"
#include "skies.inc"
#include "woods.inc"

background{ color rgb < 0.75, 0.80, 0.85 > }
             
// plane { <0,1,0>, 0 pigment { checker color Coral, color Yellow }}

#declare e=0.1;
#declare te=10/30;

#macro coisa(n)
 #if (n=0)
 sphere { <0,2,e> 1 texture { pigment { Red }}}
 #else

 union{
   object { coisa (n-1) translate <0,0,-1>}
   object { coisa (n-1) translate <1,0,-1>}
   object { coisa (n-1) translate <1,2,-1>}
   object { coisa (n-1) translate <2,1,-1>}
   object { coisa (n-1) translate <2,2,-1>}
   sphere { <0,2,e> 2 texture { pigment {White}}}
   scale <te,te,te>
 }

#end
#end

#declare N = 3;
object { coisa (N) rotate <0,45,0>}

// Original camera parameters:
// #local cam_ctr = <0,0,0>
// #local cam_vec = <0,3,-6>
// #local cam_sky = y

#include "camlight.inc"
camlight(<0.7,0.3,0.3>,<-10,3,-10>,3.5,y,1.0)