/*
 *	Visualisation en 3d d'une tentative de champ gravitationnel
 *
 *	tTh novembre 2022
 */

#version 3.7;
global_settings {
		ambient_light rgb <0.07, 0.05, 0.05>
		assumed_gamma 1.0
		max_trace_level 6
		}


#include  "colors.inc"

// ----------------------------------------------------------------------

#declare HFDIR  = "WS/";
#declare HFCK   = mod(clock, 2000);

#declare HFNAME = concat(HFDIR, str(HFCK , -5, 0), ".pgm");

#debug concat("- - - - - - - ", HFNAME, "\n")

#declare GravityField = object
{
height_field {
        pgm	HFNAME
        smooth    // on
        translate <-0.5, 0, -0.5>
	}
texture {
	pigment { color Gray80 }
	finish { phong 2.0 }
	}
}

object { GravityField scale <4, 1, 4> }

// ----------------------------------------------------------------------

light_source { < -2, 9.3, -7>	color Gray90			}
light_source { < -5, 9.3, -7>	color Orange*0.75		}
light_source { < -15, 2.3, 17>	color Blue*0.50			}

// ----------------------------------------------------------------------

camera	{
	location	<-8, 4, 3>
	look_at		<0, 0, 0>
	right		x*image_width/image_height
	angle		35
	}

// ----------------------------------------------------------------------