
#----------------------------------------------------------------
#
#  Test code
#         ------- topographical data the Indian Rev near Tucson
#

graph list {
	mount = sur{["mountain.data"][samp=150:153]};
	mount_cont=cont{["mountain.data"][samp=150:153][number_of_contours=20]}
	}
mount_mat = material{
		emission 0.0 0.0 0.0
		diffuse  0.3 0.6 0.2
		specular 0.5 0.5 0.5
		shininess 4
		alpha 0.3
	       }
mountain = object{
		mat mount_mat
		mount
		push translate 0.0,0.0,-1000.0
		mount_cont
		popmatrix
		};

	
#----------------------------------------------------
plot mountain;
#----------------------------------------------------
