have ha := tsub_add_cancel_of_le ((le_tsub_of_add_le_left hb.le).trans tsub_le_self : 1 ≤ a)
α : Type ?u.138093
inst✝¹ : Fintype α
inst✝ : DecidableEq α
b a n : ℕ
hb : b + 1 < a
hn : a + b ≤ n
⊢ a * (n - a) + b * (n - b) < (a - 1) * (n - a) + (a - 1) + (b * (n - b - 1) + (n - b - 1))
α : Type ?u.138093
inst✝¹ : Fintype α
inst✝ : DecidableEq α
b a n : ℕ
hb : b + 1 < a
hn : a + b ≤ n
ha : a - 1 + 1 = a
⊢ a * (n - a) + b * (n - b) < (a - 1) * (n - a) + (a - 1) + (b * (n - b - 1) + (n - b - 1))