// Quinto Exercicio de MC930
// Editado em 07/11
// Fabio Yuasa Niizu RA:962325

background{ color rgb < 1,1, 1 > }

light_source {
  < 5.00, -20.00, 5.00 >
  color rgb < 1.00, 1.00, 1.00 >
}

camera {
  location  <  50.00, -20.00, 0.00 >
  right     < -1.20, 0.00, 0.00 >
  up        <  0.00, 0.00, 0.90 >
  sky       <  0.00, 0.00, 1.00 >
  look_at   <  0.00, 0.00, 0.00 >
}

#declare A1 = < 0,  9, 0>;
#declare A2 = < 0,  8, 0>;
#declare A3 = < 0,  6, 0>;
#declare A4 = < 0,  0, 0>;
#declare B1 = < 0,  9, 0>;
#declare B2 = < 0,  8, 5.5>;
#declare B3 = < 0,  6, 11>;
#declare B4 = < 0,  0, 11>;
#declare C1 = < 4,  9, 0>;
#declare C2 = < 4,  8, 5>;
#declare C3 = < 4,  6, 12>;
#declare C4 = < 4,  0, 12>;
#declare D1 = < 15,  9, 0>;
#declare D2 = < 15,  8, 5.5>;
#declare D3 = < 15,  6, 11>;
#declare D4 = < 15,  0, 11>;
#declare E1 = < 19,  9, 0>;
#declare E2 = < 19,  8, -1.5>;
#declare E3 = < 19,  6, -3>;
#declare E4 = < 19,  0, -3>;
#declare F1 = < 23,  9, 0>;
#declare F2 = < 23,  8, 5>;
#declare F3 = < 23,  6, 10>;
#declare F4 = < 23,  0, 10>;
#declare G1 = < 26,  9, 0>;
#declare G2 = < 26,  8, 0>;
#declare G3 = < 26,  6, 0>;
#declare G4 = < 26,  0, 0>;

#declare patchA = 
  bicubic_patch{
  type 1 u_steps 5 v_steps 5
  flatness 0.1
  A1, A2, A3, A4
  B1, B2, B3, B4
  C1, C2, C3, C4
  D1, D2, D3, D4
  texture {
    pigment { color rgb < 1, 0, 0 > }}
  }

#declare patchB = 
  bicubic_patch{
  type 1 u_steps 5 v_steps 5
  flatness 0.1
  D1, D2, D3, D4
  E1, E2, E3, E4
  F1, F2, F3, F4
  G1, G2, G3, G4
  texture {
    pigment { color rgb < 1, 0, 0 > }}
  }

sphere{ A1, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ A2, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ A3, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ A4, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ B1, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ B2, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ B3, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ B4, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ C1, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ C2, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ C3, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ C4, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ D1, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ D2, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ D3, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ D4, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ E1, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ E2, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ E3, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ E4, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ F1, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ F2, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ F3, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ F3, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ G1, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ G2, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ G3, 0.1 texture{pigment{ color rgb <0,0,1>}}}
sphere{ G4, 0.1 texture{pigment{ color rgb <0,0,1>}}}


// Aqui está a cena, finalmente:

     object {patchA}
     object {patchB}
     object {patchA
             scale <1,-1,1>}
     object {patchB
             scale <1,-1,1>}