// Last edited on 2005-08-29 23:55:13 by stolfi
// A solar heater for homes, designed by Remigio Lazo Franco
// Cutaway view

#include "cutaway-params.inc" 
#include "lights-detail.inc" 

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

#include "heater.inc"
#include "grid.inc" 

#declare M = 16; // Number of slices

#local tx_dull =
  texture {
    pigment { color rgb < 1.000, 0.980, 0.960 > }
    finish { ambient 0.70 diffuse 0.30 }
  }

#local tx_cut =
  texture {
    pigment { color rgb < 0.000, 0.200, 1.000 > }
    finish { ambient 0.70 diffuse 0.30 }
  }

intersection {
  object { 
    heater(profile, colltype, M)
    texture {  }
    texture { tx_dull }
  }
  plane { y,0 texture { tx_cut } }
}

// Camera parameters
#declare camera_ctr = < 00.000, 00.000, -0.500 >;
#declare camera_dir = < +0.000, +1.000, +0.000 >;
#declare camera_dst = 200.0; 
#declare camera_upp = z; 
#declare scene_radius = 1.200;
#include "camera.inc" 

object { grid(12,12,0.1) translate -20*y }