program beautiful_strings
  implicit none
  character(100) :: w
  integer        :: n, i, a(26), k
  read(*,*) w
  w = adjustl(w)
  n = len_trim(w)
  a = 0
  do i = 1, n
    k = ichar(w(i:i))-96
    a(k) = a(k) + 1
  end do
  do i = 1, 26
    if (mod(a(i),2).eq.0) cycle
    write(*,'(a)') "No"
    stop
  end do
  write(*,'(a)') "Yes"
  stop
end program beautiful_strings