---

Step * of Lemma pertype_wf

∀[R:Base ⟶ Base ⟶ ℙ]
  (pertype(R) ∈ Type) supposing ((∀x,y:Base.  (R[x;y] ⇒ R[y;x])) and (∀x,y,z:Base.  (R[x;y] ⇒ R[y;z] ⇒ R[x;z])))
BY
{ (Auto
   THEN Unfold `member` 0
   THEN Refine_pertypeEquality `u' `v' `w' `x' `y' 
   THEN All (Unfold `so_apply`)
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[R:Base  {}\mrightarrow{}  Base  {}\mrightarrow{}  \mBbbP{}]
    (pertype(R)  \mmember{}  Type)  supposing 
          ((\mforall{}x,y:Base.    (R[x;y]  {}\mRightarrow{}  R[y;x]))  and 
          (\mforall{}x,y,z:Base.    (R[x;y]  {}\mRightarrow{}  R[y;z]  {}\mRightarrow{}  R[x;z])))


By

---

Latex:
(Auto
  THEN  Unfold  `member`  0
  THEN  Refine\_pertypeEquality  `u'  `v'  `w'  `x'  `y' 
  THEN  All  (Unfold  `so\_apply`)
  THEN  Auto)

---

Home Index