// Setimo trabalho de computacao grafica.
// Isana Luzia Seabra de Campos - RA006374
// Last edited on 2001-07-31 11:35:29 by stolfi

#include "colors.inc"

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

camera {
  location  <  20.00, 20.00, 21.00 >
  right     < -1.20, 0.00, 0.00 >
  up        <  0.00, 0.00, 0.90 >
  sky       <  0.00, 0.00, 1.00 >
  look_at   < +5.00, 0.00, 3.0 >
}

light_source {
  	< 17.00, 19.00, 22.00 >
  color rgb < 1.00, 1.00, 1.00 >
} 

#declare A01 = <-22,0,0>;
#declare A02 = <-22,-2,0>;
#declare A03 = <-22,-4,0>;
#declare A04 = <-22,-6,0>;
#declare A05 = <-18,-9,4>;
#declare A06 = <-18,-6,4>;
#declare A07 = <-18,-3,2>;
#declare A08 = <-18,0,0>;
#declare A09 = <-12,-9,5>;
#declare A10 = <-12,-6,5>;
#declare A11 = <-12,-3,3>;
#declare A12 = <-12,0,0>;
#declare A13 = <0,-9,6>;
#declare A14 = <0,-6,6>;
#declare A15 = <0,-3,4>;
#declare A16 = <0,0,0>;

#declare B01 = <0,-9,6>;
#declare B02 = <0,-6,6>;
#declare B03 = <0,-3,4>;
#declare B04 = <0,0,0>;
#declare B05 = <6,0,8>;
#declare B06 = <6,-3,8>;
#declare B07 = <6,-6,6>;
#declare B08 = <6,-6,4>;
#declare B09 = <13,0,7>;
#declare B10 = <13,-3,7>;
#declare B11 = <13,-6,5>;
#declare B12 = <13,-6,3>;
#declare B13 = <19,-9,6>;
#declare B14 = <19,-6,6>;
#declare B15 = <19,-3,2>;
#declare B16 = <19,0,0>;

#declare patchA = 
	bicubic_patch{ type 1
		flatness 0.001 u_steps 5 v_steps 5 
		A01, A02, A03, A04,
		A05, A06, A07, A08,
		A09, A10, A11, A12,
		A13, A14, A15, A16 texture{ pigment {Yellow}} 
	}


#declare patchB = 
	bicubic_patch{ type 1
		flatness 0.001 u_steps 5 v_steps 5 
		B01, B02, B03, B04,
		B05, B06, B07, B08,
		B09, B10, B11, B12,
		B13, B14, B15, B16 texture{ pigment {Red}} 
	}

//box { <0.0, 0.0, 0.0>, < 9.0, 0.0, 0.1 > texture{ preto } }
//box { <0.0, 0.0, 0.0>, < 0.0, 9.0, 0.1 > texture{ preto } }
//box { <0.0, 0.0, 0.0>, < 0.1, 0.0, 9.0 > texture{ preto } }

#declare braio = 0.3

sphere{A01, braio texture{ pigment{Black}}}
sphere{A02, braio texture{ pigment{Red}}}
sphere{A03, braio texture{ pigment{Green}}}
sphere{A04, braio texture{ pigment{Blue}}}
sphere{A05, braio texture { pigment{Black}}}
sphere{A06, braio texture { pigment{Red}}}
sphere{A07, braio texture { pigment{Green}}}
sphere{A08, braio texture { pigment{Blue}}}
sphere{A09, braio texture { pigment{Black}}}
sphere{A10, braio texture { pigment{Red}}}
sphere{A11, braio texture { pigment{Green}}}
sphere{A12, braio texture { pigment{Blue}}}
sphere{A13, braio texture { pigment{Black}}}
sphere{A14, braio texture { pigment{Red}}}
sphere{A15, braio texture { pigment{Green}}}
sphere{A16, braio texture { pigment{Blue}}}

sphere{B01, braio texture{ pigment{Black}}}
sphere{B02, braio texture{ pigment{Red}}}
sphere{B03, braio texture{ pigment{Green}}}
sphere{B04, braio texture{ pigment{Blue}}}
sphere{B05, braio texture { pigment{Black}}}
sphere{B06, braio texture { pigment{Red}}}
sphere{B07, braio texture { pigment{Green}}}
sphere{B08, braio texture { pigment{Blue}}}
sphere{B09, braio texture { pigment{Black}}}
sphere{B10, braio texture { pigment{Red}}}
sphere{B11, braio texture { pigment{Green}}}
sphere{B12, braio texture { pigment{Blue}}}
sphere{B13, braio texture { pigment{Black}}}
sphere{B14, braio texture { pigment{Red}}}
sphere{B15, braio texture { pigment{Green}}}
sphere{B16, braio texture { pigment{Blue}}}


plane{<0,0,1>,0  pigment {checker <0.95,0.95,0.95>,<0.9,0.9,0.9> } translate -3*z}

//plane{<0,1,0>,0  pigment {checker <0.95,0.95,0.95>,<0.9,0.9,0.9> }}
//plane{<1,0,1>,0  pigment {checker <0.95,0.95,0.95>,<0.9,0.9,0.9> }}


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