---

Step * of Lemma prec-label_wf

∀[P:Type]. ∀[a:Atom ⟶ P ⟶ ((P + P + Type) List)]. ∀[i:P]. ∀[x:prec(lbl,p.a[lbl;p];i)].
  (prec-label(x) ∈ {lbl:Atom| 0 < ||a[lbl;i]||} )
BY
{ (InstLemma `dest-prec_wf` [] THEN RepeatFor 4 (ParallelLast') THEN Unfold `dest-prec` -1 THEN ProveWfLemma) }

---

Latex:

---

Latex:
\mforall{}[P:Type].  \mforall{}[a:Atom  {}\mrightarrow{}  P  {}\mrightarrow{}  ((P  +  P  +  Type)  List)].  \mforall{}[i:P].  \mforall{}[x:prec(lbl,p.a[lbl;p];i)].
    (prec-label(x)  \mmember{}  \{lbl:Atom|  0  <  ||a[lbl;i]||\}  )


By

---

Latex:
(InstLemma  `dest-prec\_wf`  []
  THEN  RepeatFor  4  (ParallelLast')
  THEN  Unfold  `dest-prec`  -1
  THEN  ProveWfLemma)

---

Home Index