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

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

#declare tx_plastico =
  texture{
    pigment{ color rgb < 0.85, 0.95, 1.00 > filter 0.70 }
    finish{ diffuse 0.03 reflection 0.25 ambient 0.02 specular 0.25 roughness 0.005 }
  }

#declare tx_fosca =
  texture{
    pigment{ color rgb < 1.00, 0.80, 0.10 > }
    finish{ diffuse 0.9 ambient 0.1 }
  }

#declare tx_xadrez =
  texture{
    pigment{ checker color rgb < 0.10, 0.32, 0.60 >, color rgb < 1.00, 0.97, 0.80 > }
    finish{ diffuse 0.9 ambient 0.1 }
    scale 2.0
  }

#declare raio = 2.000;

#macro meiosofa()
   union {
      #local A=array[4][4]
      #local A[0][0] = <0,0,0  >;
      #local A[0][1] = <1,0,0  >;
      #local A[0][2] = <2,0,1.5>;
      #local A[0][3] = <3,0,1.5>;
      #local A[1][0] = <0,1,0  >;
      #local A[1][1] = <1,1,0  >;
      #local A[1][2] = <2,1,1.5>;
      #local A[1][3] = <3,1,1.5>;
      #local A[2][0] = <0,2,0  >;
      #local A[2][1] = <1,2,0  >;
      #local A[2][2] = <2,2,1.5>;
      #local A[2][3] = <3,2,1.5>;
      #local A[3][0] = <0,3,0  >;
      #local A[3][1] = <1,3,0  >;
      #local A[3][2] = <2,3,1.5>;
      #local A[3][3] = <3,3,1.5>;

      #local B=array[4][4]
      #local B[0][0] = A[0][3];
      #local B[0][1] = <3.5,0,1  >;
      #local B[0][2] = <3.5,0,0.5>;
      #local B[0][3] = <3  ,0,0  >;
      #local B[1][0] = A[1][3];
      #local B[1][1] = <3.5,1,1  >;
      #local B[1][2] = <3.5,1,0.5>;
      #local B[1][3] = <3  ,1,0  >;
      #local B[2][0] = A[2][3];
      #local B[2][1] = <3.5,2,1  >;
      #local B[2][2] = <3.5,2,0.5>;
      #local B[2][3] = <3  ,2,0  >;
      #local B[3][0] = A[3][3];
      #local B[3][1] = <3.5,3,1  >;
      #local B[3][2] = <3.5,3,0.5>;
      #local B[3][3] = <3  ,3,0  >;

      #local C=array[4][4]
      #local C[0][0] = <0,0,-1.5>;
      #local C[0][1] = <1,0,-1.5>;
      #local C[0][2] = <2,0,0   >;
      #local C[0][3] = B[0][3];
      #local C[1][0] = <0,1,-1.5>;
      #local C[1][1] = <1,1,-1.5>;
      #local C[1][2] = <2,1,0   >;
      #local C[1][3] = B[1][3];
      #local C[2][0] = <0,2,-1.5>;
      #local C[2][1] = <1,2,-1.5>;
      #local C[2][2] = <2,2,0   >;
      #local C[2][3] = B[2][3];
      #local C[3][0] = <0,3,-1.5>;
      #local C[3][1] = <1,3,-1.5>;
      #local C[3][2] = <2,3,0   >;
      #local C[3][3] = B[3][3];

     object{ retalho(A[0][0], A[0][1], A[0][2], A[0][3],
                     A[1][0], A[1][1], A[1][2], A[1][3],
                     A[2][0], A[2][1], A[2][2], A[2][3],
                     A[3][0], A[3][1], A[3][2], A[3][3],
                     0.1,
                     tx_plastico,tx_fosca)
                     }

     object{ retalho(B[0][0], B[0][1], B[0][2], B[0][3],
                     B[1][0], B[1][1], B[1][2], B[1][3],
                     B[2][0], B[2][1], B[2][2], B[2][3],
                     B[3][0], B[3][1], B[3][2], B[3][3],
                     0.1,
                     tx_plastico,tx_fosca)
                     }

     object{ retalho(C[0][0], C[0][1], C[0][2], C[0][3],
                     C[1][0], C[1][1], C[1][2], C[1][3],
                     C[2][0], C[2][1], C[2][2], C[2][3],
                     C[3][0], C[3][1], C[3][2], C[3][3],
                     0.1,
                     tx_plastico,tx_fosca)
                     }
   }
#end

#declare chao =
  box{ <-20,-20,-1>, <+20,+20,0> }

#include "eixos.inc"
#include "retalho.inc"

union{

  object{ eixos(3.00) }

  object{ chao  translate < 0,0,-5 > texture{ tx_xadrez } }

  object{meiosofa()}
  object{meiosofa() scale<-1,+1,+1>}
}
#include "camlight.inc"
#declare centro_cena = < +2.00, +4.00, -2.00 >;
#declare raio_cena = 9.0;
#declare dir_camera = < -1.00, -2.00, 2.00 >;
#declare dist_camera = 20.0;
#declare intens_luz = 1.00;
camlight(centro_cena, raio_cena, dir_camera, dist_camera , z, intens_luz)