Function FakeData, xsize, ysize
If N_Elements(xsize) EQ 0 THEN xsize=181
If N_Elements(ysize) EQ 0 THEN ysize=91

seed = 1L
image = RandomU(seed, 100,100)
FOR j=0,5 DO image = Smooth(image, 5)
image = image(5:95, 5:95)
image = BytScl(Congrid(image, xsize, ysize), Top=!D.N_Colors)
Return, image
END