---

Step * 1 3 of Lemma bag-decomp_wf

.....wf..... 
1. T : Type
2. bs : Base
3. b1 : Base
4. bs = b1 ∈ (as,bs:T List//permutation(T;as;bs))
5. bs ∈ T List
6. b1 ∈ T List
7. f : ℕ||bs|| ⟶ ℕ||bs||
8. Inj(ℕ||bs||;ℕ||bs||;f) ∧ (b1 = (bs o f) ∈ (T List))
9. f1 : ℕ||map(λn.remove-nth(n;bs);upto(||bs||))|| ⟶ ℕ||map(λn.remove-nth(n;bs);upto(||bs||))||
⊢ istype(Inj(ℕ||map(λn.remove-nth(n;bs);upto(||bs||))||;ℕ||map(λn.remove-nth(n;bs);upto(||bs||))||;f1)
∧ (map(λn.remove-nth(n;b1);upto(||b1||)) = (map(λn.remove-nth(n;bs);upto(||bs||)) o f1) ∈ ((T × bag(T)) List)))
BY
{ Auto }

---

Latex:

---

Latex:
.....wf..... 
1.  T  :  Type
2.  bs  :  Base
3.  b1  :  Base
4.  bs  =  b1
5.  bs  \mmember{}  T  List
6.  b1  \mmember{}  T  List
7.  f  :  \mBbbN{}||bs||  {}\mrightarrow{}  \mBbbN{}||bs||
8.  Inj(\mBbbN{}||bs||;\mBbbN{}||bs||;f)  \mwedge{}  (b1  =  (bs  o  f))
9.  f1  :  \mBbbN{}||map(\mlambda{}n.remove-nth(n;bs);upto(||bs||))||  {}\mrightarrow{}  \mBbbN{}||map(\mlambda{}n.remove-nth(n;bs);upto(||bs||))||
\mvdash{}  istype(Inj(\mBbbN{}||map(\mlambda{}n.remove-nth(n;bs);upto(||bs||))||;\mBbbN{}||map(\mlambda{}n.remove-nth(n;bs);
                                                                                                                              upto(||bs||))||;f1)
\mwedge{}  (map(\mlambda{}n.remove-nth(n;b1);upto(||b1||))  =  (map(\mlambda{}n.remove-nth(n;bs);upto(||bs||))  o  f1)))


By

---

Latex:
Auto

---

Home Index