Step * of Lemma lattice-hom-fset-join

[l1,l2:BoundedLattice]. ∀[eq1:EqDecider(Point(l1))]. ∀[eq2:EqDecider(Point(l2))]. ∀[f:Hom(l1;l2)].
[s:fset(Point(l1))].
  ((f \/(s)) \/(f"(s)) ∈ Point(l2))
BY
(Auto THEN QuotientElimForEquality (-1)) }

1
1. l1 BoundedLattice
2. l2 BoundedLattice
3. eq1 EqDecider(Point(l1))
4. eq2 EqDecider(Point(l2))
5. Hom(l1;l2)
6. Base
7. s1 Base
8. s1 ∈ (x,y:Point(l1) List//set-equal(Point(l1);x;y))
9. s ∈ Point(l1) List
10. s1 ∈ Point(l1) List
11. set-equal(Point(l1);s;s1)
⊢ (f \/(s)) \/(f"(s1)) ∈ Point(l2)


Latex:


Latex:
\mforall{}[l1,l2:BoundedLattice].  \mforall{}[eq1:EqDecider(Point(l1))].  \mforall{}[eq2:EqDecider(Point(l2))].  \mforall{}[f:Hom(l1;l2)].
\mforall{}[s:fset(Point(l1))].
    ((f  \mbackslash{}/(s))  =  \mbackslash{}/(f"(s)))


By


Latex:
(Auto  THEN  QuotientElimForEquality  (-1))




Home Index