congr
case cons.succ
t : Prop
l : List Prop
ih : ∀ {j : Nat} (hj : j < l.length), (orN (l.eraseIdx j) ∨ l[j]) = orN l
j : Nat
hj : j + 1 < (t :: l).length
⊢ (t ∨ orN (l.eraseIdx j) ∨ l[j]) = (t ∨ orN l)
case cons.succ.e_b
t : Prop
l : List Prop
ih : ∀ {j : Nat} (hj : j < l.length), (orN (l.eraseIdx j) ∨ l[j]) = orN l
j : Nat
hj : j + 1 < (t :: l).length
⊢ (orN (l.eraseIdx j) ∨ l[j]) = orN l