Step
*
of Lemma
lattice-fset-meet-is-glb
∀[l:BoundedLattice]. ∀[eq:EqDecider(Point(l))].
  ((∀[s:fset(Point(l))]. ∀[x:Point(l)].  /\(s) ≤ x supposing x ∈ s)
  ∧ (∀[s:fset(Point(l))]. ∀[v:Point(l)].  ((∀x:Point(l). (x ∈ s 
⇒ v ≤ x)) 
⇒ v ≤ /\(s))))
BY
{ (RepeatFor 4 ((D 0 THENA Auto)) THEN MoveToConcl (-1)) }
1
1. l : BoundedLattice
2. eq : EqDecider(Point(l))
⊢ ∀s:fset(Point(l)). ∀[x:Point(l)]. /\(s) ≤ x supposing x ∈ s
2
1. l : BoundedLattice
2. eq : EqDecider(Point(l))
⊢ ∀s:fset(Point(l)). ∀[v:Point(l)]. ((∀x:Point(l). (x ∈ s 
⇒ v ≤ x)) 
⇒ v ≤ /\(s))
Latex:
Latex:
\mforall{}[l:BoundedLattice].  \mforall{}[eq:EqDecider(Point(l))].
    ((\mforall{}[s:fset(Point(l))].  \mforall{}[x:Point(l)].    /\mbackslash{}(s)  \mleq{}  x  supposing  x  \mmember{}  s)
    \mwedge{}  (\mforall{}[s:fset(Point(l))].  \mforall{}[v:Point(l)].    ((\mforall{}x:Point(l).  (x  \mmember{}  s  {}\mRightarrow{}  v  \mleq{}  x))  {}\mRightarrow{}  v  \mleq{}  /\mbackslash{}(s))))
By
Latex:
(RepeatFor  4  ((D  0  THENA  Auto))  THEN  MoveToConcl  (-1))
Home
Index