inp = gets.split.map!(&:to_i)
apple = []  #美味しさの配列
inp[0].times do |i|
  apple << inp[1]+(i+1)-1  #インデックスとりんごの番号は１ズレてる
end
apple.sort!

ans = 0
1.upto(apple.length-1) do |x|
  ans += apple[x]
end

puts ans
