# frozen_string_literal: true

loop do
  n, x = readline.split(' ').map(&:to_i)
  break if n.zero? && x.zero?

  count = 0
  (1..n).each do |i|
    ((i + 1)..n).each do |j|
      k = x - (i + j)
      count += 1 if k <= n && k > j
    end
  end
  puts count
end

