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","poly2a")     ; Open "poly2a.ps" file

  mpres              = True             ; No map resources desired.
  map = gsn_csm_map(wks,mpres)          ; Call gsn_csm_map to draw a map.
end