---

Step * of Lemma free-dlwc-join

∀[T,eq,a,b,cs:Top].  (a ∨ b ~ lub(λs.fset-contains-none(eq;s;x.cs[x]);a;b))
BY
{ (Auto
   THEN (RepUR ``lattice-join free-dist-lattice-with-constraints`` 0 THEN RepUR ``constrained-antichain-lattice`` 0)
   THEN RepUR ``mk-bounded-distributive-lattice mk-bounded-lattice`` 0
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T,eq,a,b,cs:Top].    (a  \mvee{}  b  \msim{}  lub(\mlambda{}s.fset-contains-none(eq;s;x.cs[x]);a;b))


By

---

Latex:
(Auto
  THEN  (RepUR  ``lattice-join  free-dist-lattice-with-constraints``  0
              THEN  RepUR  ``constrained-antichain-lattice``  0
              )
  THEN  RepUR  ``mk-bounded-distributive-lattice  mk-bounded-lattice``  0
  THEN  Auto)

---

Home Index