---

Step * of Lemma mrec-label-cases1

∀s:MutualRectypeSpec. ∀n:Atom. ∀lbl:{lbl:Atom| 0 < ||mrec-spec(s;lbl;n)||} .
  (lbl ∈ eager-map(λp.(fst(p));outl(apply-alist(AtomDeq;s;n))))
BY
{ (InstLemma `mrec-label-cases` [] THEN RepeatFor 3 (ParallelLast') THEN Auto) }

---

Latex:

---

Latex:
\mforall{}s:MutualRectypeSpec.  \mforall{}n:Atom.  \mforall{}lbl:\{lbl:Atom|  0  <  ||mrec-spec(s;lbl;n)||\}  .
    (lbl  \mmember{}  eager-map(\mlambda{}p.(fst(p));outl(apply-alist(AtomDeq;s;n))))


By

---

Latex:
(InstLemma  `mrec-label-cases`  []  THEN  RepeatFor  3  (ParallelLast')  THEN  Auto)

---

Home Index