program B

  implicit none
  integer H
  integer N
  integer i
  integer sum
  integer,allocatable, dimension(:) :: A
  read *, H,N
  sum = 0
  allocate(A(N))
  A = 0
  read *, A
  do i = 1, N
      sum = sum + A(i)
      ! print *, sum
  end do
  if ( sum < H ) then
    print '(a)', 'No'
  else
    print '(a)', 'Yes'
  end if

end program B
