// Last edited on 2003-06-21 22:12:55 by stolfi
// Amandio Sena
// RA 007998
//
//  Trabalho 11 de MC930
//  Sardinha
//

#include "textures.inc"
#include "colors.inc"    // The include files contain
#include "stones.inc"    // pre-defined scene elements
#include "metals.inc"
#include "woods.inc"
#include "finish.inc"

#declare A11=<0,.5,0>;
#declare A12=<.3,.55,.1>;
#declare A13=<.3,.57,.1>;
#declare A14=<0,.6,0>;

#declare A21=<0,.1,.5>;
#declare A22=<.5,.5,.5>;
#declare A23=<.5,.8,.5>;
#declare A24=<0,1,.5>;

#declare A31=<0,0,1>;
#declare A32=<.8,.5,1>;
#declare A33=<.7,.9,1>;
#declare A34=<0,1.2,1>;

#declare A41=<0,.2,1.5>;
#declare A42=<1,.6,1.5>;
#declare A43=<.9,.9,1.5>;
#declare A44=<0,1.1,1.5>;

#declare B11=A41;
#declare B12=A42;
#declare B13=A43;
#declare B14=A44;

#declare B21=<0,.4,2>;
#declare B22=<1.2,.7,2>;
#declare B23=<1.1,.9,2>;
#declare B24=<0,1,2>;

#declare B31=<0,.3,2.5>;
#declare B32=<.8,.6,2.5>;
#declare B33=<.7,.7,2.5>;
#declare B34=<0,.8,2.5>;

#declare B41=<0,.2,3>;
#declare B42=<0.1,.5,3>;
#declare B43=<0.1,.6,3>;
#declare B44=<0,.7,3>;

#declare C11=B41;
#declare C12=B42;
#declare C13=B43;
#declare C14=B44;

#declare C21=<0,.1,3.5>;
#declare C22=<-.5,.4,3.5>;
#declare C23=<-.5,.5,3.5>;
#declare C24=<0,.6,3.5>;

#declare C31=<0,-2,4.2>;
#declare C32=<.1,-1,4.5>;
#declare C33=<.4,0,4.4>;
#declare C34=<0,1,4.2>;

#declare C41=<0,-3,5.2>;
#declare C42=<.3,-1.5,5.7>;
#declare C43=<.7,0,5.5>;
#declare C44=<0,1.5,5.2>;

// RETALHOS

#declare bz_scale = 0.125;
#include "../../bz-things.inc"

#declare retalhoA =
  union{
    bicubic_patch {
      type 1 flatness 0.000
      u_steps 4 v_steps 4
      A11,A12,A13,A14,
      A21,A22,A23,A24,
      A31,A32,A33,A34,
      A41,A42,A43,A44
      texture { bz_tx_A }
    }
    object { bz_grid_A }
  }

#declare retalhoB =
  union{
    bicubic_patch {
      type 1 flatness 0.000
      u_steps 4 v_steps 4
      B11,B12,B13,B14,
      B21,B22,B23,B24,
      B31,B32,B33,B34,
      B41,B42,B43,B44
      texture { bz_tx_B }
    }
    object { bz_grid_B }
  }

#declare retalhoC =
  union{
    bicubic_patch {
      type 1 flatness 0.000
      u_steps 4 v_steps 4
      C11,C12,C13,C14,
      C21,C22,C23,C24,
      C31,C32,C33,C34,
      C41,C42,C43,C44
      texture { bz_tx_C }
    }
    object { bz_grid_C }
  }

#declare scene = 
  union {
    union {
      object { retalhoA }
      object { retalhoB }
      object { retalhoC }  // Acrescentado por Stolfi
      object { retalhoA scale x*-1}
      object { retalhoB scale x*-1}
      object { retalhoC scale x*-1}
      translate <0,-0.4,-2.5>
      rotate -110*y
    }
    // object { bz_axes }
  }

object{ bz_checker_bg }
object{ scene translate bz_rite_pos }
object{ scene rotate -90*y translate bz_left_pos }