---

Step * 1 2 1 1 1 2 of Lemma bag-summation-partitions-primes-general


1. r : CRng
2. h : ℕ+ ⟶ ℕ+ ⟶ |r|
3. b : bag(Prime)
4. IntDeq ∈ EqDecider(Prime)
5. 0 < Π(b)
6. [1, Π(b) + 1) ∈ bag(ℕ+Π(b) + 1)
7. bag-no-repeats(ℕ+ × ℕ+;bag-map(λp.<Π(fst(p)), Π(snd(p))>;bag-partitions(IntDeq;b)))
⊢ bag-no-repeats(ℕ+ × ℕ+;bag-map(λi.<i, Π(b) ÷ i>;[i∈[1, Π(b) + 1)|(Π(b) rem i =z 0)]))
BY
{ xxx(BLemma `bag-map-no-repeats` THEN Auto)xxx }

1
1. r : CRng
2. h : ℕ+ ⟶ ℕ+ ⟶ |r|
3. b : bag(Prime)
4. IntDeq ∈ EqDecider(Prime)
5. 0 < Π(b)
6. [1, Π(b) + 1) ∈ bag(ℕ+Π(b) + 1)
7. bag-no-repeats(ℕ+ × ℕ+;bag-map(λp.<Π(fst(p)), Π(snd(p))>;bag-partitions(IntDeq;b)))
⊢ Inj({i:ℕ+Π(b) + 1| ↑(Π(b) rem i =z 0)} ;ℕ+ × ℕ+;λi.<i, Π(b) ÷ i>)

2
1. r : CRng
2. h : ℕ+ ⟶ ℕ+ ⟶ |r|
3. b : bag(Prime)
4. IntDeq ∈ EqDecider(Prime)
5. 0 < Π(b)
6. [1, Π(b) + 1) ∈ bag(ℕ+Π(b) + 1)
7. bag-no-repeats(ℕ+ × ℕ+;bag-map(λp.<Π(fst(p)), Π(snd(p))>;bag-partitions(IntDeq;b)))
⊢ bag-no-repeats({i:ℕ+Π(b) + 1| ↑(Π(b) rem i =z 0)} ;[i∈[1, Π(b) + 1)|(Π(b) rem i =z 0)])

---

Latex:

---

Latex:

1.  r  :  CRng
2.  h  :  \mBbbN{}\msupplus{}  {}\mrightarrow{}  \mBbbN{}\msupplus{}  {}\mrightarrow{}  |r|
3.  b  :  bag(Prime)
4.  IntDeq  \mmember{}  EqDecider(Prime)
5.  0  <  \mPi{}(b)
6.  [1,  \mPi{}(b)  +  1)  \mmember{}  bag(\mBbbN{}\msupplus{}\mPi{}(b)  +  1)
7.  bag-no-repeats(\mBbbN{}\msupplus{}  \mtimes{}  \mBbbN{}\msupplus{};bag-map(\mlambda{}p.<\mPi{}(fst(p)),  \mPi{}(snd(p))>bag-partitions(IntDeq;b)))
\mvdash{}  bag-no-repeats(\mBbbN{}\msupplus{}  \mtimes{}  \mBbbN{}\msupplus{};bag-map(\mlambda{}i.<i,  \mPi{}(b)  \mdiv{}  i>[i\mmember{}[1,  \mPi{}(b)  +  1)|(\mPi{}(b)  rem  i  =\msubz{}  0)]))


By

---

Latex:
xxx(BLemma  `bag-map-no-repeats`  THEN  Auto)xxx

---

Home Index