Step
*
1
1
2
1
2
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)
⊢ 1 ≤ (#x in bag-rep(imax((#x1 in as);(#x1 in bs));x1))
BY
{ ((RWO "bag-count-rep" 0 THEN Auto)⋅ THEN AutoSplit) }
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 ↓∈ bag-to-set(eq;as + 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)
\mvdash{}  1  \mleq{}  (\#x  in  bag-rep(imax((\#x1  in  as);(\#x1  in  bs));x1))
By
Latex:
((RWO  "bag-count-rep"  0  THEN  Auto)\mcdot{}  THEN  AutoSplit)
Home
Index