;
; Basic graphics exercise 6.
;

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

begin
  ii = ispan(0,100,1)                 ; 101 points
  y1 = sin(0.0628*ii)                 ; Generate a sine curve w/101 points
  y2 = cos(0.0628*ii)                 ; Generate a cosine curve w/101 points

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

  res = True                           ; Plot options desired
  res@gsnFrame = False                 ; Don't advance frame
  plot = gsn_csm_y(wks,y1,res)         ; Will be drawn in first frame

  res@gsnFrame = True                  ; delete(res@gsnFrame) will also work
  plot = gsn_csm_y(wks,y2,res)         ; Will be drawn in first frame
end