// Last edited on 2001-07-31 19:02:31 by stolfi

#include "colors.inc"
#declare ctr = < 0, 50, 100 >; 
camera {
  location  ctr + 0.65*<  -2000.00, 2300.00, 2300.00 > //CIMA
  right     < -0.60, 0.00, 0.00 >
  up        <  0.00, 0.00, 0.80 >
  sky       <  0.00, 0.00, 1.00 >
  look_at   ctr
} 
  
background { color White } //LUZ DE CIMA 
light_source{ <-2200, -2600,4500> color 1.2 * White }
  

#declare cor_cristal = <1,0,0>;
#declare txt_cristal = 
   texture { 
    finish {
       ambient 0.1 diffuse 0.1
       reflection 0.25
       specular 1 roughness 0.001
      }
      pigment { color cor_cristal filter 1 }
   }


#declare cor_espelho = <0.5,0.9,.9>;
#declare txt_espelho =
   texture {
      pigment { rgb cor_espelho }
    finish {
       ambient 0.05 diffuse 0.5
       reflection 0.5*cor_espelho
       specular 0.2 roughness 0.05
      }
   }


#declare plano =   plane { <0, 0, 1>, 0
    pigment {
      checker color White, color Orange
    }
  }

#declare B01 = <-300,-450, 0>;
#declare B02 = <-200,-450, 100>;
#declare B03 = <-100,-450, 310>;
#declare B04 = < 0,  -450, 310>;

#declare B05 = <-300,-200,0>;
#declare B06 = <-200,-200,100>;
#declare B07 = <-100,-200,360>;
#declare B08 = <   0,-200,360>;

#declare B09 = <-300,100,0>;
#declare B10 = <-200,100,100>;
#declare B11 = <-100,100,380>;
#declare B12 = <-  0,100,380>;

#declare B13 = <-300,450,0>;
#declare B14 = <-200,450,100>;
#declare B15 = <-200,450,250>;
#declare B16 = <   0,450,250>;

#declare C01 = B13;
#declare C02 = B14;
#declare C03 = B15;
#declare C04 = B16;

#declare C05 = <-300, 550, 0>;
#declare C06 = <-200, 550, 100>;
#declare C07 = <-100, 550, 215>;
#declare C08 = < 0,   550, 215>;

#declare C09 = <-300, 650, 0>;
#declare C10 = <-200, 650, 80>;
#declare C11 = <-100, 650, 185>;
#declare C12 = < 0,   650, 185>;

#declare C13 = <-300, 700, 0>;
#declare C14 = <-200, 700, 25>;
#declare C15 = <-100, 700, 100>;
#declare C16 = < 0,   700, 100>;


#declare A01 = <-300, -700, 0>;
#declare A02 = <-250, -700, 700>;
#declare A03 = <-200, -700, 300>;
#declare A04 = <200, -700,  300>;

#declare A05 = <-300, -600, 0>;
#declare A06 = <-200, -600, 680>;
#declare A07 = <-100, -600, 300>;
#declare A08 = <   0, -600, 300>;

#declare A09 = <-300, -500, 0>;
#declare A10 = <-220, -500, 200>;
#declare A11 = <-150, -500, 320>;
#declare A12 = < 0 ,  -500, 320>;

#declare A13 = B01;
#declare A14 = B02;
#declare A15 = B03;
#declare A16 = B04;

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

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

#declare patchC =
  bicubic_patch {
     type 1
     flatness 0.01
     u_steps 5
     v_steps 5
     C01, C02, C03, C04, C05,C06,C07,C08,C09,C10,C11,C12,C13,C14,C15,C16
}

sphere {A01, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A02, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A03, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A04, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A05, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A06, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A07, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A08, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A09, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A10, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A11, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A12, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A13, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A14, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A15, 10 texture { pigment {color rgb <0,1,0>}}}
sphere {A16, 10 texture { pigment {color rgb <0,1,0>}}}

sphere {B01, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B02, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B03, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B04, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B05, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B06, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B07, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B08, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B09, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B10, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B11, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B12, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B13, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B14, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B15, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {B16, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {C01, 10 texture { pigment {color rgb <1,0,0>}}}
sphere {C02, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C03, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C04, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C05, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C06, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C07, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C08, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C09, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C10, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C11, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C12, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C13, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C14, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C15, 10 texture { pigment {color rgb <0,0,0>}}}
sphere {C16, 10 texture { pigment {color rgb <0,0,0>}}}

union
{
  object {patchA texture {txt_espelho}}
  object {patchA scale <-1,1,1> texture {txt_espelho}}
  object {patchB texture {txt_espelho}}
  object {patchB scale <-1,1,1> texture {txt_espelho}}
  object {patchC texture {txt_espelho}}
  object {patchC scale <-1,1,1> texture {txt_espelho}}
  object {plano scale 50 translate <0,0,-1> }
  object {plano scale 50 scale <1,1,-1> translate <0,0,100> scale 10000 }

}