// Last edited on 2003-12-13 21:33:53 by stolfi
#include "colors.inc"
background{White}
#declare ctr = <0,0,0>;
#declare camDir = <0,2,-10>;

camera {
  location   ctr + 0.50*camDir
  right      0.50*x
  up         0.50*y
  sky        y
  look_at    ctr
}

light_source { <10, 20, -10> color 1.3*White }

#declare est_planeta = "../txmaps/earth-land.png";
#declare fundo = "../txmaps/hubble-Sag-s5_l.jpg";    
  
# declare brasil =   
  blob {
    threshold .65
    sphere { < 0.0,  0.0, 0.0 >, .5, 1 } 
    sphere { < 0.5, -0.1, 0.0 >, .5, 1 } 
    sphere { < 0.0, -0.35, 0.0>, .5, 1 scale <1.2,1.5,1> } 
    pigment { Yellow } 
    scale<.4+(clock),.4+(clock),.1+(clock)>
    translate <0,0,-0.8>
  }

# declare planeta =
    sphere { 
    < 0.00, 0.00, 0.00 >, .8
    pigment {image_map { png  est_planeta map_type 1} } 
  }
 
union{
  object { planeta }
  object {brasil}
}
sky_sphere{ pigment {image_map { jpeg fundo}}}