n, l = gets.split.map(&:to_i)
a = []
n.times {|i| a << i + l}
sum = 0
a.each {|i| sum += i}
if sum < 0
  puts sum + a.map{|i| i < 0 ? -1 * i : i}.sort.first
else
  puts sum - a.map{|i| i < 0 ? -1 * i : i}.sort.first
end