Step * of Lemma order-preserving-map-is-lattice-hom

No Annotations
[l1,l2:Lattice]. ∀[f:Point(l1) ⟶ Point(l2)].
  f ∈ Hom(l1;l2) 
  supposing (∀x,y:Point(l1).  (x ≤  x ≤ y))
  ∧ (∀a,b:Point(l1).  a ∧ b ≤ a ∧ b)
  ∧ (∀a,b:Point(l1).  a ∨ b ≤ a ∨ b)
BY
(Auto
   THEN ((InstLemma `lattice-le-order` [⌜l2⌝]⋅ THENA Auto)
         THEN -1
         THEN InstLemma `order-preserving-map-lattice-lemma` [⌜l1⌝;⌜l2⌝;⌜f⌝]⋅
         THEN Auto)
   THEN MemTypeCD
   THEN Auto) }


Latex:


Latex:
No  Annotations
\mforall{}[l1,l2:Lattice].  \mforall{}[f:Point(l1)  {}\mrightarrow{}  Point(l2)].
    f  \mmember{}  Hom(l1;l2) 
    supposing  (\mforall{}x,y:Point(l1).    (x  \mleq{}  y  {}\mRightarrow{}  f  x  \mleq{}  f  y))
    \mwedge{}  (\mforall{}a,b:Point(l1).    f  a  \mwedge{}  f  b  \mleq{}  f  a  \mwedge{}  b)
    \mwedge{}  (\mforall{}a,b:Point(l1).    f  a  \mvee{}  b  \mleq{}  f  a  \mvee{}  f  b)


By


Latex:
(Auto
  THEN  ((InstLemma  `lattice-le-order`  [\mkleeneopen{}l2\mkleeneclose{}]\mcdot{}  THENA  Auto)
              THEN  D  -1
              THEN  InstLemma  `order-preserving-map-lattice-lemma`  [\mkleeneopen{}l1\mkleeneclose{};\mkleeneopen{}l2\mkleeneclose{};\mkleeneopen{}f\mkleeneclose{}]\mcdot{}
              THEN  Auto)
  THEN  MemTypeCD
  THEN  Auto)




Home Index