;
; Basic graphics exercise 4.
;

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

begin
  y1 = sin(0.0628*ispan(0,100,1))     ; Generate a curve with 101 points.
  y2 = cos(0.0628*ispan(0,100,1))     ; Generate a 2nd curve with 101 points.

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

  res = False                          ; No plot options set.
  plot = gsn_csm_y(wks,y1,res)         ; Will be drawn in first frame
  plot = gsn_csm_y(wks,y2,res)         ; Will be drawn in second frame
end