load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_code.ncl"
load "$NCARG_ROOT/lib/ncarg/nclscripts/csm/gsn_csm.ncl"

begin
  wks = gsn_open_wks("ps","maponly")

  res = True

  res@gsnPaperOrientation = "portrait"
  res@gsnMaximize = True
  res@gsnDraw     = False
  res@gsnFrame    = False

  res@mpOutlineOn         = False
  res@mpFillOn            = False
  res@mpMaxLatF           = 25.0
  res@mpMinLatF           = 5.0
  res@mpMinLonF           = -95.0
  res@mpMaxLonF           = -60.0
  plot  = gsn_csm_map_ce(wks,res)

;
; Use a shapefile from:
;
;      http://pubs.usgs.gov/of/2006/1187/basemaps/continents/
;
; to fill in the areas of interest.
;
  gnres             = True
  gnres@gsFillColor = "gray35"
  id = gsn_add_shapefile_polygons(wks,plot,"continent.shp",gnres)
  draw(plot)
  frame(wks)


end