have := bal_turan_bd (turan_bal iN)
case a
α : Type u_1
inst✝¹ : Fintype α
inst✝ : DecidableEq α
M N : MultiPart α
hA : N.A = M.A
ht : N.t = M.t
iN : Balanced N.t fun i => card (MultiPart.P N i)
sN : mpDsum M ≤ mpDsum N
⊢ mpDsum N = 2 * turanNumb N.t (card N.A)
case a
α : Type u_1
inst✝¹ : Fintype α
inst✝ : DecidableEq α
M N : MultiPart α
hA : N.A = M.A
ht : N.t = M.t
iN : Balanced N.t fun i => card (MultiPart.P N i)
sN : mpDsum M ≤ mpDsum N
this : (sumSq N.t fun i => card (MultiPart.P N i)) + 2 * turanNumb N.t (card N.A) = card N.A ^ 2
⊢ mpDsum N = 2 * turanNumb N.t (card N.A)