intro ⟨hz, hs⟩ i
case succ.mp
β : Type ?u.59199
α : Type u_1
inst✝³ : LogicalConnective α
inst✝² : LogicalConnective β
F : Type u_2
inst✝¹ : FunLike F α Prop
inst✝ : LogicalConnective.HomClass F α Prop
f : F
n : ℕ
ih : ∀ (v : Fin n → α), f (conj v) = ∀ (i : Fin n), f (v i)
v : Fin (n + 1) → α
⊢ (f (v 0) ∧ ∀ (i : Fin n), f (vecTail v i)) → ∀ (i : Fin (n + 1)), f (v i)
case succ.mp
β : Type ?u.59199
α : Type u_1
inst✝³ : LogicalConnective α
inst✝² : LogicalConnective β
F : Type u_2
inst✝¹ : FunLike F α Prop
inst✝ : LogicalConnective.HomClass F α Prop
f : F
n : ℕ
ih : ∀ (v : Fin n → α), f (conj v) = ∀ (i : Fin n), f (v i)
v : Fin (n + 1) → α
hz : f (v 0)
hs : ∀ (i : Fin n), f (vecTail v i)
i : Fin (n + 1)
⊢ f (v i)