specialize h (a.comp σ) (testvecs_perm ha σ)
n d : ℕ
inst✝ : NeZero d
w w' : Weight n d
σ : Equiv.Perm (Fin (Nat.succ n))
h : ∀ a ∈ testvecs n d, E w ≤ E w' - pair w' (Weight.comp a σ⁻¹) + pair w (Weight.comp a σ⁻¹)
a : Weight n d
ha : a ∈ testvecs n d
⊢ E w ≤ E w' - pair w' a + pair w a
n d : ℕ
inst✝ : NeZero d
w w' : Weight n d
σ : Equiv.Perm (Fin (Nat.succ n))
a : Weight n d
ha : a ∈ testvecs n d
h : E w ≤ E w' - pair w' (Weight.comp (Weight.comp a σ) σ⁻¹) + pair w (Weight.comp (Weight.comp a σ) σ⁻¹)
⊢ E w ≤ E w' - pair w' a + pair w a