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

  a = addfile("/global/scratch/umtropea/conus/ctrl/2d/2012/wind/wrf2d_d01_CTRL_U_201210-201212.nc","r")
  b = addfile("/global/scratch/umtropea/conus/ctrl/2d/2012/wind/wrf2d_d01_CTRL_V_201210-201212.nc","r")


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

  u = wrf_user_getvar(a,"U",73)   ; U component of the wind
  v = wrf_user_getvar(b,"V",73)   ; V component of the wind

  res = True
  res@gsnDraw  = True    ; Forces the plot to be drawn
  res@gsnFrame = True    ; Frame advance
  vector = wrf_vector(a,wks,u,v,res)