/*
GRASS procedure:

#DEM export:
r.bilinear dtm.10meters out=dtm.2m
r.out.pov map=dtm.2m tga=dem.high.tga

#patch and export of orthophoto:
r.patch 060010.b,060020.b,060050.b,060060.b,060100.b out=blue.high
r.patch 060010.r,060020.r,060050.r,060060.r,060100.r out=red.high
r.patch 060010.g,060020.g,060050.g,060060.g,060100.g out=green.high
r.composite r=red.high b=blue.high g=green.high out=ortho.high
d.rast ortho.high
r.out.png in=ortho.high out=map.high.png

#Render with:
povray +Ipovscript2.pov +Opovview.png +D +P +W1100 +H900 +A0.5
*/

#include "shapes.inc"
#include "colors.inc"
#include "textures.inc"
#include "skies.inc"

#declare Sun = color rgb <0.8, 0.8, 0.8>;
#declare Scale = 1;


light_source { < 2063347, 120000, 5045000 > color White }

fog {
 fog_type 2 
 fog_offset 20 
 fog_alt 65 
 color rgb <0.80, 0.88, 0.82> 
 distance 80 
 up y }

camera {
   location < 1666941, 700, 5101681 >
   angle  50 // vertical camera aperture
   look_at < 1651825, 300, 5106345 >
}


height_field  {
   tga "dem.high.tga"
   smooth
   texture { 
      pigment { 
          image_map { // image is always projected from -z, with front facing +z, top to +Y  			
             png "map.high.png" 	     
	     once  	
	  } 
	  rotate x*90 // align map to height_field 
      } 
   }
   finish {
	  ambient 0.2         // Very dark shadows
	  diffuse 0.8         // Whiten the whites
	  phong 0.2          // shiny	  
	  phong_size 100.0    // with tight highlights
	  specular 0.5
	  roughness 0.05
   }
   scale  < 33365.000000, 65535, 25370.000000 > // region extend in meters
   translate  < 1650980, 0, 5089155 > // shift to Gauss Boaga (W,0,S - ?)
}


//background { color SkyBlue }


sky_sphere{
    pigment {planar colour_map{[0,rgb <0.9,0.9,1>][1, rgb <0.1,0.2,1>]}}
    pigment{P_Cloud4}
}