---

Step * of Lemma xxorder_split

∀[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].
  (order(T;R) ⇒ (∀x,y:T.  Dec(x = y ∈ T)) ⇒ (∀a,b:T.  (R a b ⇐⇒ ((R\) a b) ∨ (a = b ∈ T))))
BY
{ AssertLemma `order_split` [] }

1
1. ∀[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].
     (Order(T;x,y.R[x;y])
     ⇒ (∀x,y:T.  Dec(x = y ∈ T))
     ⇒ (∀a,b:T.  (R[a;b] ⇐⇒ strict_part(x,y.R[x;y];a;b) ∨ (a = b ∈ T))))
⊢ ∀[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].
    (order(T;R) ⇒ (∀x,y:T.  Dec(x = y ∈ T)) ⇒ (∀a,b:T.  (R a b ⇐⇒ ((R\) a b) ∨ (a = b ∈ T))))

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[R:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].
    (order(T;R)  {}\mRightarrow{}  (\mforall{}x,y:T.    Dec(x  =  y))  {}\mRightarrow{}  (\mforall{}a,b:T.    (R  a  b  \mLeftarrow{}{}\mRightarrow{}  ((R\mbackslash{})  a  b)  \mvee{}  (a  =  b))))


By

---

Latex:
AssertLemma  `order\_split`  []

---

Home Index