;
; Title exercise 2.
;

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

begin
  npts = 500
  y = 500.+.9* ispan(0,npts-1,1)*sin(0.031415926535898*ispan(0,npts-1,1))

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

  res = True                           ; Plot options desired.
  res@tiMainString  = "This is a main title"

  res@tiXAxisString = "X Axis String"      ; X axis title
  res@tiYAxisString = "Y Axis String"      ; Y axis title

  res@tiXAxisFontHeightF = 0.03            ; Increase size of fonts
  res@tiYAxisFontHeightF = 0.03

  plot = gsn_csm_y(wks,y,res)

end