f = addfile("$NCARG_ROOT/lib/ncarg/data/cdf/uv300.nc","r")

  file_atts = getvaratts(f)

  print(file_atts)

  if(.not.any(ismissing(file_atts))) then
    do i=0,dimsizes(file_atts)-1
      print("Attribute " + file_atts(i) + " = " + f@$file_atts(i)$)
   end do
  end if