read_gif,'patmap_2068.gif',image,redpat,greenpat,bluepat

newimage=congrid(image,360,180)
save,filename='patsmap2068.sav',image,newimage,redpat,greenpat,bluepat

stop
end