---

Step * of Lemma sub-bag-lub

∀[T:Type]
  ∀eq:EqDecider(T). ∀as,bs,cs:bag(T).  ((sub-bag(T;cs;as) ∨ sub-bag(T;cs;bs)) ⇒ sub-bag(T;cs;bag-lub(eq;as;bs)))
BY
{ (InstLemma `bag-lub-property` [] THEN RepeatFor 4 (ParallelLast') THEN Auto THEN D -1 THEN RelRST THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T:Type]
    \mforall{}eq:EqDecider(T).  \mforall{}as,bs,cs:bag(T).
        ((sub-bag(T;cs;as)  \mvee{}  sub-bag(T;cs;bs))  {}\mRightarrow{}  sub-bag(T;cs;bag-lub(eq;as;bs)))


By

---

Latex:
(InstLemma  `bag-lub-property`  []
  THEN  RepeatFor  4  (ParallelLast')
  THEN  Auto
  THEN  D  -1
  THEN  RelRST
  THEN  Auto)

---

Home Index