induction data <;> simp_all [toPropFun, PropFun.all]
case mk
L : Type u
ν : Type v
inst✝² : LitVar L ν
inst✝¹ inst✝ : DecidableEq ν
x : ν
data : List (Clause L)
h : x ∈ PropFun.semVars (toPropFun { data := data })
⊢ ∃ C ∈ data, x ∈ PropFun.semVars (Clause.toPropFun C)
case mk.cons
L : Type u
ν : Type v
inst✝² : LitVar L ν
inst✝¹ inst✝ : DecidableEq ν
x : ν
head✝ : Clause L
tail✝ : List (Clause L)
tail_ih✝ :
  x ∈ PropFun.semVars (List.foldr (fun x x_1 => x ⊓ x_1) ⊤ (List.map Clause.toPropFun tail✝)) →
    ∃ C ∈ tail✝, x ∈ PropFun.semVars (Clause.toPropFun C)
h : x ∈ PropFun.semVars (Clause.toPropFun head✝ ⊓ List.foldr (fun x x_1 => x ⊓ x_1) ⊤ (List.map Clause.toPropFun tail✝))
⊢ x ∈ PropFun.semVars (Clause.toPropFun head✝) ∨ ∃ a ∈ tail✝, x ∈ PropFun.semVars (Clause.toPropFun a)