Step
*
of Lemma
lattice-le-iff
∀[l:Lattice]. ∀[a,b:Point(l)].  uiff(a ≤ b;b = a ∨ b ∈ Point(l))
BY
{ ((Auto THEN (Assert l ∈ Lattice BY Auto))
   THEN Auto
   THEN All (RepUR ``lattice-le``)⋅
   THEN D 1
   THEN Auto
   THEN RWO "-2" 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[l:Lattice].  \mforall{}[a,b:Point(l)].    uiff(a  \mleq{}  b;b  =  a  \mvee{}  b)
By
Latex:
((Auto  THEN  (Assert  l  \mmember{}  Lattice  BY  Auto))
  THEN  Auto
  THEN  All  (RepUR  ``lattice-le``)\mcdot{}
  THEN  D  1
  THEN  Auto
  THEN  RWO  "-2"  0
  THEN  Auto)
Home
Index