// MC930 - Trabalho prático 13 - 2s2003
// Luciano Ludka Cordeiro - ra992077
// título: rosto do gaguinho (porco da turma do pernalonga)

#include "colors.inc"

#declare A11 = <1.00, 1.00, 1.00>;
#declare A12 = <0.75, 2.00, 1.00>;
#declare A13 = <0.75, 3.00, 1.00>;
#declare A14 = <1.00, 4.00, 1.00>;
#declare A21 = <2.00, 0.50, 1.00>;
#declare A22 = <1.80, 2.00, 0.50>;
#declare A23 = <2.00, 3.00, 0.70>;
#declare A24 = <2.00, 4.50, 1.00>;
#declare A31 = <3.00, 0.50, 1.00>;
#declare A32 = <3.20, 2.00, 0.50>;
#declare A33 = <3.00, 3.00, 0.70>;
#declare A34 = <3.00, 4.50, 1.00>;
#declare A41 = <4.00, 1.00, 1.00>;
#declare A42 = <4.25, 2.00, 1.00>;
#declare A43 = <4.25, 3.00, 1.00>;
#declare A44 = <4.00, 4.00, 1.00>;

#declare B11 = A14;
#declare B12 = <1.00, 4.50, 2.00>;
#declare B13 = <1.00, 4.50, 3.00>;
#declare B14 = <1.00, 4.20, 4.00>;
#declare B21 = A24;
#declare B22 = <2.00, 4.70, 2.00>;
#declare B23 = <2.00, 5.20, 3.00>;
#declare B24 = <2.00, 4.50, 4.00>;
#declare B31 = A34;
#declare B32 = <3.00, 4.70, 2.00>;
#declare B33 = <3.00, 5.20, 3.00>;
#declare B34 = <3.00, 4.50, 4.00>;
#declare B41 = A44;
#declare B42 = <4.00, 4.50, 2.00>;
#declare B43 = <4.00, 4.50, 3.00>;
#declare B44 = <4.00, 4.20, 4.00>;

#declare C11 = A41;
#declare C12 = A42;
#declare C13 = A43;
#declare C14 = A44;
#declare C21 = <4.00, 1.00, 2.00>;
#declare C22 = <4.50, 2.00, 2.00>;
#declare C23 = <4.50, 3.00, 2.00>;
#declare C24 = B42;
#declare C31 = <4.00, 1.00, 3.00>;
#declare C32 = <4.50, 2.00, 3.00>;
#declare C33 = <4.50, 3.00, 3.00>;
#declare C34 = B43;
#declare C41 = <4.00, 1.00, 4.00>;
#declare C42 = <4.00, 2.00, 4.00>;
#declare C43 = <4.00, 3.00, 4.00>;
#declare C44 = B44;

#declare D11 = A11;
#declare D12 = A12;
#declare D13 = A13;
#declare D14 = A14;
#declare D21 = <1.00, 1.00, 2.00>;
#declare D22 = <0.50, 2.00, 2.00>;
#declare D23 = <0.50, 3.00, 2.00>;
#declare D24 = B12;
#declare D31 = <1.00, 1.00, 3.00>;
#declare D32 = <0.50, 2.00, 3.00>;
#declare D33 = <0.50, 3.00, 3.00>;
#declare D34 = B13;
#declare D41 = <1.00, 1.00, 4.00>;
#declare D42 = <1.00, 2.00, 4.00>;
#declare D43 = <1.00, 3.00, 4.00>;
#declare D44 = B14;

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

#declare A =
  union{
    bicubic_patch {
      type 0
      flatness 0.03
      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 B =
  union{
    bicubic_patch {
        type 0
        flatness 0.03
        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 C =
  union{
    bicubic_patch {
        type 0
        flatness 0.03
        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 D =
  union{
    bicubic_patch {
        type 0
        flatness 0.03
        u_steps 4
        v_steps 4
        D11, D12, D13, D14,
        D21, D22, D23, D24,
        D31, D32, D33, D34,
        D41, D42, D43, D44
        texture { bz_tx_D }
      }
    object { bz_grid_D }
  }

#declare rosto =
  union {
    object {A}
    object {B}
    object {C}
    object {D}
  }

#declare angulox = 0;
#declare anguloy = 0;

#declare scene =
  union{
    object {rosto scale <1, 1, -1> rotate<angulox,anguloy,0>}
  }

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