;
; XY plot exercise 4.
;

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

begin
  y = sin(0.0628*ispan(0,100,1))     ; Generate a curve with 101 points.

  wks = gsn_open_wks("x11","xy_ex04")  ; Open an X11 window

  letter = "p"
  font   = 35
  xoff   = 0.0
  yoff   = 0.0
  ratio  = 1.0
  size   = 1.0
  angle  = 0.0

  ii = NhlNewMarker(wks, letter, font, xoff, yoff, ratio, size, angle)

  res = True                           ; Plot options desired
  res@xyMarkLineMode = "Markers"       ; Use markers.
  res@xyMarker       = ii              ; "clubs" marker

  plot = gsn_csm_y(wks,y(::3),res)     ; Plot every third value

end