---

Step * 1 1 2 1 2 1 of Lemma bag-count-bag-lub


1. T : Type
2. eq : EqDecider(T)
3. as : bag(T)
4. bs : bag(T)
5. x : T
6. x ↓∈ bag-to-set(eq;as + bs)
7. [x1∈bag-to-set(eq;as + bs)|eq x x1] = {x} ∈ bag(T)
8. x1 : T
9. x1 ↓∈ bag-to-set(eq;as + bs)
10. ↑(eq x x1)
11. x = x1 ∈ T
⊢ 1 ≤ imax((#x1 in as);(#x1 in bs))
BY
{ xxx((RWO "member-bag-to-set<" (-3) THENA Auto)
      THEN (RWO "bag-member-append" (-3) THENA Auto)
      THEN D (-3)
      THEN Unhide
      THEN Auto)xxx }

1
1. T : Type
2. eq : EqDecider(T)
3. as : bag(T)
4. bs : bag(T)
5. x : T
6. x ↓∈ bag-to-set(eq;as + bs)
7. [x1∈bag-to-set(eq;as + bs)|eq x x1] = {x} ∈ bag(T)
8. x1 : T
9. x1 ↓∈ as ∨ x1 ↓∈ bs
10. ↑(eq x x1)
11. x = x1 ∈ T
⊢ 1 ≤ imax((#x1 in as);(#x1 in bs))

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  as  :  bag(T)
4.  bs  :  bag(T)
5.  x  :  T
6.  x  \mdownarrow{}\mmember{}  bag-to-set(eq;as  +  bs)
7.  [x1\mmember{}bag-to-set(eq;as  +  bs)|eq  x  x1]  =  \{x\}
8.  x1  :  T
9.  x1  \mdownarrow{}\mmember{}  bag-to-set(eq;as  +  bs)
10.  \muparrow{}(eq  x  x1)
11.  x  =  x1
\mvdash{}  1  \mleq{}  imax((\#x1  in  as);(\#x1  in  bs))


By

---

Latex:
xxx((RWO  "member-bag-to-set<"  (-3)  THENA  Auto)
        THEN  (RWO  "bag-member-append"  (-3)  THENA  Auto)
        THEN  D  (-3)
        THEN  Unhide
        THEN  Auto)xxx

---

Home Index