// Last edited on 2003-12-11 01:30:58 by stolfi

#declare bz_name = "Penadinho"

#include "colors.inc"

#declare A11 = <1,-3, 2>;
#declare A12 = <1,-1, 2>;
#declare A13 = <1, 1, 2>;
#declare A14 = <1, 3, 2>;

#declare A21 = <1,-6, .7>;
#declare A22 = <4,-1, .7>;
#declare A23 = <4, 1, .7>;
#declare A24 = <1, 6, .7>;

#declare A31 = <1,-6,-.7>;
#declare A32 = <4,-1,-.7>;
#declare A33 = <4, 1,-.7>;
#declare A34 = <1, 6,-.7>;

#declare A41 = <.5,-3,-2>;
#declare A42 = <.5,-1,-2>;
#declare A43 = <.5, 1,-2>;
#declare A44 = <.5, 3,-2>;

#declare B11 = <-1,-3, 3>;
#declare B12 = <-1,-1, 3>;
#declare B13 = <-1, 1, 3>;
#declare B14 = <-1, 3, 3>;

#declare B21 = <-0.5,-3.2, 3>;
#declare B22 = <-0.5,-3, 7>;
#declare B23 = <-0.5, 3, 7>;
#declare B24 = <-0.5, 3.2, 3>;

#declare B31 = <0.5, -3.2, 3>;
#declare B32 = <0.5, -3, 7>;
#declare B33 = <0.5   3, 7>;
#declare B34 = <0.5,  3.2, 3>;

#declare B41 = A11;
#declare B42 = A12;
#declare B43 = A13;
#declare B44 = A14;

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

//PEDACOS

#declare bochecha=
  union{
    bicubic_patch{
        type 1 flatness 0.001
        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 }
        // texture { pigment{color White }}
    }
    object{ bz_grid_A }
  }

#declare cucuruco=
  union{
    bicubic_patch{
        type 1 flatness 0.001
        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 }
        // texture { pigment{color White } }
    }
    object{ bz_grid_B }
  }

#declare scene =
  union{
    union{
      object{bochecha }
      object{bochecha scale <-1,1,1> }
      object{cucuruco}
      rotate -90*x
      translate -1.8*y
      rotate +45*y
    }
    // object{ bz_axes }
  }

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