device,decompose=0

	c1=indgen(256)
	c2=intarr(256)
	c3=intarr(256)

	tvlct,c1,c2,c3

	d=findgen(10)
	plot,d,color=100
	oplot,d-2,color=150
	oplot,d-4,color=250

	d=dist(100,100)
	contour,d,levels=[10,30,50],c_colors=[100,175,254],/fill

	end