#version 3.8;
global_settings {assumed_gamma 1.0}

#include "functions.inc"

camera {
	location <1, 1, -2>
	right x*image_width/image_height
	up y
	look_at <1, 0, 0>
}

light_source {<0, 1, -10> rgb 1}

sky_sphere {pigment {rgb 1}}

// use_alpha
// use_color
// use_index

#declare imageFunction = 
function {
	pigment {
		image_map {
"/home/oem/Documents/POV-Ray-3.8/ThirdParty/Yadgar/POV_Planet/PlanetCode/ImageMaps/GDEM-10km-BW.png"} 
	rotate -x*90
	//translate <-0.5, 0, -0.5>
	}
}


//#declare Lat = function (X, Y, Z) {f_ph (X, Y, Z)/pi}
//#declare Long = function (X, Y, Z) {f_th (X, Y, Z)/tau+0.5}

#declare Length = function (X, Y, Z)  {sqrt(pow(X,2)+pow(Y,2)+pow(Z,2))}
#declare Lat = function (X, Y, Z) {select (Length(X, 0, Z), 1, 1, acos (Y/Length(X, 0, Z)) )}
#declare Long = function (X, Y, Z) {atan2 (Z, X)}

/*
cylinder {<0, 0, 0> <1, 0, 0> 0.01 pigment {rgb 1}}
cylinder {<0, 1, 0> <1, 1, 0> 0.01 pigment {rgb 1}}
#for (ZZ, -0.5, 0.5, 0.1)
#for (YY, -0.5, 0.5, 0.01)
#for (XX, -0.5, 0.5, 0.1)
	//sphere {<0.5*(Long (XX,YY,ZZ)/pi+1), YY, 0> 0.015 pigment {rgb <1, 0, 0>}}
	sphere {<XX+0.5, Lat (XX,YY,ZZ)/pi, 0> 0.01 pigment {rgb <0, 1, 0>}}
#end
#end
#end
*/


#declare Gradient = 3;
#declare Min_factor= 0.7;
#declare ISO1 =
	isosurface {
		function {sqrt( pow(x,2)+pow(y,2)+pow(z,2) ) - 0.5 } //- 0.01*(imageFunction ( 0.5*(Long(x,y,z)/pi+1), y, Lat(x,y,z)/pi ).y)}
		threshold 0
		accuracy 0.01
		open
		max_gradient Gradient
		//evaluate Gradient*Min_factor,  sqrt(Gradient/(Gradient*Min_factor)),  min (0.7, 1.0)
		contained_by {box {<1, 1, 1>*-1, <1, 1, 1>} }
		texture {
			pigment {
			onion
				color_map {
				[0.00 rgb 0.0] 
				[0.50 rgb 0.0]
				[0.50 rgb 1]
				[1.00 rgb 1]
				}
			}
			finish {specular 0.1}	
		}
		
		scale 1
		rotate y*0
		rotate -x*0
		translate x*0.25
	} // end isosurface

object {ISO1}


sphere {<0, 0, 0>, 0.5
	texture {
		pigment {
			image_map {
				"/home/oem/Documents/POV-Ray-3.8/ThirdParty/Yadgar/POV_Planet/PlanetCode/ImageMaps/GDEM-10km-BW.png"
				gamma 1
				map_type 1     
				interpolate 4 // 0=none, 1=linear, 2=bilinear, normalized
				once
			} // end image map
		}
		normal {
			bump_map {

					"/home/oem/Documents/POV-Ray-3.8/ThirdParty/Yadgar/POV_Planet/PlanetCode/ImageMaps/GDEM-10km-BW.png"
					gamma 1
					map_type 1     
					interpolate 4 // 0=none, 1=linear, 2=bilinear, normalized
					once

			}
		}
		rotate -90*y 
	}
translate x*1.75
} // end sphere

//#error "Stopping no-object scene file before pointless render."