simp
case cons
F : Type u_1
inst✝⁵ : LogicalConnective F
inst✝⁴ : DecidableEq F
S : Type u_2
inst✝³ : System F S
𝓢 : S
inst✝² : Minimal 𝓢
p q✝ r : F
Γ Δ : List F
inst✝¹ : System.NegationEquiv 𝓢
inst✝ : HasEFQ 𝓢
q : F
ih : List F
tail_ih✝ : 𝓢 ⊢! p ⟶ (q✝ :: ih).disj' ↔ 𝓢 ⊢! p ⟶ q✝ ⋎ ih.disj'
⊢ 𝓢 ⊢! p ⟶ (q✝ :: q :: ih).disj' ↔ 𝓢 ⊢! p ⟶ q✝ ⋎ (q :: ih).disj'
no goals