---

Step * of Lemma mrec-lt_wf

∀[L:MutualRectypeSpec]. ∀[x,y:mobj(L)].  (x < y ∈ ℙ)
BY
{ (Auto THEN Unfold `mrec-lt` 0 THEN MemCD) }

1
.....subterm..... T:t
1:n
1. L : MutualRectypeSpec
2. x : mobj(L)
3. y : mobj(L)
⊢ prec_sub+(Atom;lbl,p.mrec-spec(L;lbl;p)) x ∈ (i:Atom × prec(lbl,p.mrec-spec(L;lbl;p);i)) ⟶ ℙ

2
.....subterm..... T:t
2:n
1. L : MutualRectypeSpec
2. x : mobj(L)
3. y : mobj(L)
⊢ y ∈ i:Atom × prec(lbl,p.mrec-spec(L;lbl;p);i)

---

Latex:

---

Latex:
\mforall{}[L:MutualRectypeSpec].  \mforall{}[x,y:mobj(L)].    (x  <  y  \mmember{}  \mBbbP{})


By

---

Latex:
(Auto  THEN  Unfold  `mrec-lt`  0  THEN  MemCD)

---

Home Index