pro poly_plot 

; set co-ords for polygon in degrees

lat = [0,10,0,-10,0] 
lon = [-10,0,10,0,-10] 

map_set,10,0,/ortho,/cont,/noborder 
loadct,5 

; plot polygon 
polyfill,lon,lat,color=50 

; now put polygon at edge of plot 

lon = lon + 85.0 

polyfill,lon,lat,color=100

stop

end