n, m = gets.chomp.split.map(&:to_i)
ab = []
n.times do |i|
  ab[i] = gets.chomp.split.map(&:to_i)
end

ab.sort_by! { |a, b| -1000000*b - a }

flag = Array.new(m, 0)
ans = 0
ab.each do |a, b|
  while flag[a-1] != 0 && a-1 < m
    a += 1
  end
  next if a > m
  ans += b
  flag[a-1] = 1
end

puts(ans)