intro v h
case cons.true.ht
V : Type u_1
p : PropAssignment V → Bool
τ : PropAssignment V
inst✝ : DecidableEq V
L : List V
hc : ∀ (v : V), v ∈ L
head : V
tail : List V
ih :
  ∀ {passn : (v : V) → v ∉ tail → Bool},
    (∀ (v : V) (h : v ∉ tail), passn v h = τ v) → eval τ (ofFun.aux p tail passn) = p τ
passn : (v : V) → v ∉ head :: tail → Bool
ht : ∀ (v : V) (h : v ∉ head :: tail), passn v h = τ v
hhead : τ head = true
⊢ ∀ (v : V) (h : v ∉ tail), (if h : v = head then true else passn v ⋯) = τ v
case cons.true.ht
V : Type u_1
p : PropAssignment V → Bool
τ : PropAssignment V
inst✝ : DecidableEq V
L : List V
hc : ∀ (v : V), v ∈ L
head : V
tail : List V
ih :
  ∀ {passn : (v : V) → v ∉ tail → Bool},
    (∀ (v : V) (h : v ∉ tail), passn v h = τ v) → eval τ (ofFun.aux p tail passn) = p τ
passn : (v : V) → v ∉ head :: tail → Bool
ht : ∀ (v : V) (h : v ∉ head :: tail), passn v h = τ v
hhead : τ head = true
v : V
h : v ∉ tail
⊢ (if h : v = head then true else passn v ⋯) = τ v