---

Step * 2 1 of Lemma lattice-fset-meet-union


1. l : BoundedLattice
2. eq : EqDecider(Point(l))
3. s1 : fset(Point(l))
4. x : Point(l)
5. ∀s2:fset(Point(l)). (/\(s1 ⋃ s2) = /\(s1) ∧ /\(s2) ∈ Point(l))
6. ¬x ∈ s1
7. s2 : fset(Point(l))
⊢ x ∧ /\(s1) ∧ /\(s2) = /\(fset-add(eq;x;s1)) ∧ /\(s2) ∈ Point(l)
BY
{ (RWO "fset-add-as-cons" 0 THENA Auto) }

1
1. l : BoundedLattice
2. eq : EqDecider(Point(l))
3. s1 : fset(Point(l))
4. x : Point(l)
5. ∀s2:fset(Point(l)). (/\(s1 ⋃ s2) = /\(s1) ∧ /\(s2) ∈ Point(l))
6. ¬x ∈ s1
7. s2 : fset(Point(l))
⊢ x ∧ /\(s1) ∧ /\(s2) = /\([x / s1]) ∧ /\(s2) ∈ Point(l)

---

Latex:

---

Latex:

1.  l  :  BoundedLattice
2.  eq  :  EqDecider(Point(l))
3.  s1  :  fset(Point(l))
4.  x  :  Point(l)
5.  \mforall{}s2:fset(Point(l)).  (/\mbackslash{}(s1  \mcup{}  s2)  =  /\mbackslash{}(s1)  \mwedge{}  /\mbackslash{}(s2))
6.  \mneg{}x  \mmember{}  s1
7.  s2  :  fset(Point(l))
\mvdash{}  x  \mwedge{}  /\mbackslash{}(s1)  \mwedge{}  /\mbackslash{}(s2)  =  /\mbackslash{}(fset-add(eq;x;s1))  \mwedge{}  /\mbackslash{}(s2)


By

---

Latex:
(RWO  "fset-add-as-cons"  0  THENA  Auto)

---

Home Index