// Last edited on DATE TIME by USER
// Processed by remove-cam-lights

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

#declare raio = 2.000;

  plane { y, -2
   texture {
    pigment { checker color rgb < 0.40, 0.20, 0.30 >, color rgb < 0.50, 0.20, 0.40 > }
    finish { ambient 0.1 diffuse 0.9 }
   scale 0.5
   }
  }

#macro arvore(a,b,c)
union{
sphere{
<a,b,c>,0.3
pigment{ color rgb <0.5,0.6,0.3>}
}
#if(b>0)

cylinder{
<a,b,c>,
<a+b*b,b-1,c>,0.1
pigment{ color rgb <0.8,0.2,0.2>}
}
object{arvore(a+b*b,b-1,c)}

cylinder{
<a,b,c>,
<a,b-1,c-b*b>,0.1
pigment{ color rgb <0.2,0.2,0.8>}
}
object{arvore(a,b-1,c-b*b)}

cylinder{
<a,b,c>,
<a-b*b,b-1,c>,0.1
pigment{ color rgb <0.2,0.8,0.2>}
}
object{arvore(a-b*b,b-1,c)}

cylinder{
<a,b,c>,
<a,b-1,c+b*b>,0.1
pigment{ color rgb <0.7,0.7,0.7>}
}
object{arvore(a,b-1,c+b*b)}

#end
}
#end

object{arvore(0,5,0)}

#include "camlight.inc"
camlight(<0,0,0>,<10.00,20.00,50.00>,1.00,y,1.0)