---

Step * of Lemma glb-com

∀[T:Type]. ∀[R:T ⟶ T ⟶ ℙ].
  ∀[glb:T ⟶ T ⟶ T]
    ∀[a,b:T].  ((glb a b) = (glb b a) ∈ T) supposing ∀[a,b:T].  greatest-lower-bound(T;x,y.R[x;y];a;b;glb a b) 
  supposing Order(T;x,y.R[x;y])
BY
{ (Auto
   THEN (Assert greatest-lower-bound(T;x,y.R[x;y];a;b;glb a b) BY
               Auto)
   THEN (Assert greatest-lower-bound(T;x,y.R[x;y];b;a;glb b a) BY
               Auto)
   THEN FLemma `greatest-lower-bound-com` [-1;-2]
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[R:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].
    \mforall{}[glb:T  {}\mrightarrow{}  T  {}\mrightarrow{}  T]
        \mforall{}[a,b:T].    ((glb  a  b)  =  (glb  b  a)) 
        supposing  \mforall{}[a,b:T].    greatest-lower-bound(T;x,y.R[x;y];a;b;glb  a  b) 
    supposing  Order(T;x,y.R[x;y])


By

---

Latex:
(Auto
  THEN  (Assert  greatest-lower-bound(T;x,y.R[x;y];a;b;glb  a  b)  BY
                          Auto)
  THEN  (Assert  greatest-lower-bound(T;x,y.R[x;y];b;a;glb  b  a)  BY
                          Auto)
  THEN  FLemma  `greatest-lower-bound-com`  [-1;-2]
  THEN  Auto)

---

Home Index