---

Step * of Lemma bag-deq_wf

∀[T:Type]. ∀[eq:EqDecider(T)].  (bag-deq(eq) ∈ EqDecider(bag(T)))
BY
{ (ProveWfLemma THEN Unfold `deq` 0 THEN MemTypeCD THEN Reduce 0 THEN Try (RW assert_pushdownC 0⋅) THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].    (bag-deq(eq)  \mmember{}  EqDecider(bag(T)))


By

---

Latex:
(ProveWfLemma
  THEN  Unfold  `deq`  0
  THEN  MemTypeCD
  THEN  Reduce  0
  THEN  Try  (RW  assert\_pushdownC  0\mcdot{})
  THEN  Auto)

---

Home Index