n = gets.to_s.to_i
L = gets.to_s.split.map { |e| e.to_i }.sort

ans = 0
L.each do |s|
  L.each do |m|
    next if s >= m
    L.each do |l|
      next if (m >= l || s >= l) || (m + s <= l)
      ans += 1
    end
  end
end

puts ans