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

;
; The poly1* series of examples shows how to add various annotations
; to a plot, like markers, text, polygons, and lines.  There are
; two different data spaces you can use for adding this stuff: NDC
; space, or data space.  Both will be shown.
;
begin
  wks = gsn_open_wks("ps","poly1c")          ; Open PS file "poly1c.ps"
  gsn_define_colormap(wks,"uniform")         ; Color map w/lots of colors

  mpres                      = True          ; Plot options desired.

  mpres@mpProjection         = "Orthographic"
  mpres@mpEllipticalBoundary = True
  mpres@mpCenterLatF         = 20.0
  mpres@mpCenterLonF         = 14.0

  mpres@mpLandFillColor      = 52      ; a brownish color

  mpres@mpLimitMode          = "LatLon"
  mpres@mpMinLatF            = -40
  mpres@mpMaxLatF            =  42
  mpres@mpMinLonF            = -20
  mpres@mpMaxLonF            =  60

  mpres@tiMainString         = "Orthographic projection"        ; Main title

  map = gsn_csm_map(wks,mpres)              ; Draw plot
end