program main

  implicit none
  integer :: h, n
  integer, allocatable :: a(:)
  integer :: i, j, k

  read(*,*) h, n
  allocate(a(n))
  read(*,*) a
  
  if ( sum(a) >= h )then 
    print*, "Yes"
  else
    print*, "No"
  endif
end program main
