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

begin
  f    = addfile ("TestData.xy3.nc" , "r")
  p    = f->P(0,0:35)                 ; read in left  variable (y1)
  t    = f->T(0,0:35)                 ; read in right variable (y2)
  time = f->time(0:35)                ; this is our x

  wks = gsn_open_wks("x11","plot") 

  resL				= True
  resL@gsnMaximize		= True

  resL@tmXBOn		= False  ; turns off bottom 
  resL@tmXTOn		= False  ; turns off top
  resL@tmYLOn           = False  ; turns off left

  resR			= True
  resR@tmYROn		= False  ; turns off right


  plot = gsn_csm_xy2(wks,time,t,p,resL,resR)

end