---

Step * 2 of Lemma mset_map_char


1. s : DSet
2. s' : DSet
3. f : |s| ⟶ |s'|
4. a : |s|
5. as : |s| List
6. msmap{s,s'}(f;mk_mset(as)) = mk_mset(map(f;as)) ∈ MSet{s'}
⊢ msmap{s,s'}(f;mk_mset([a / as])) = mk_mset([f a / map(f;as)]) ∈ MSet{s'}
BY
{ ((RWH (LemmaC `mk_mset_cons`) 0 
THENM Unfold `mset_map` 0 
THENM Reduce 0 
THENM Fold `mset_map` 0) THENA Auto) }

1
1. s : DSet
2. s' : DSet
3. f : |s| ⟶ |s'|
4. a : |s|
5. as : |s| List
6. msmap{s,s'}(f;mk_mset(as)) = mk_mset(map(f;as)) ∈ MSet{s'}
⊢ (mset_inj{s'}(f a) + msmap{s,s'}(f;mk_mset(as))) = (mset_inj{s'}(f a) + mk_mset(map(f;as))) ∈ MSet{s'}

---

Latex:

---

Latex:

1.  s  :  DSet
2.  s'  :  DSet
3.  f  :  |s|  {}\mrightarrow{}  |s'|
4.  a  :  |s|
5.  as  :  |s|  List
6.  msmap\{s,s'\}(f;mk\_mset(as))  =  mk\_mset(map(f;as))
\mvdash{}  msmap\{s,s'\}(f;mk\_mset([a  /  as]))  =  mk\_mset([f  a  /  map(f;as)])


By

---

Latex:
((RWH  (LemmaC  `mk\_mset\_cons`)  0 
THENM  Unfold  `mset\_map`  0 
THENM  Reduce  0 
THENM  Fold  `mset\_map`  0)  THENA  Auto)

---

Home Index