---

Step * 1 of Lemma eq_mset_iff_eq_counts


1. s : DSet
2. as : |s| List
3. bs : |s| List
4. as ≡(|s|) bs
5. v : |s| List
6. v1 : |s| List
7. v ≡(|s|) v1
⊢ as = v ∈ MSet{s} ⇐⇒ ∀x:|s|. ((x #∈ as) = (x #∈ v) ∈ ℤ)
BY
{ % need to insert the coercions for the next lemma % 
Assert mk_mset(as) = mk_mset(v) ∈ MSet{s} ⇐⇒ ∀x:|s|. ((x #∈ as) = (x #∈ v) ∈ ℤ) 
THENM ((Unfold `mk_mset` (-1)) THEN Auto) }

1
.....assertion..... 
1. s : DSet
2. as : |s| List
3. bs : |s| List
4. as ≡(|s|) bs
5. v : |s| List
6. v1 : |s| List
7. v ≡(|s|) v1
⊢ mk_mset(as) = mk_mset(v) ∈ MSet{s} ⇐⇒ ∀x:|s|. ((x #∈ as) = (x #∈ v) ∈ ℤ)

---

Latex:

---

Latex:

1.  s  :  DSet
2.  as  :  |s|  List
3.  bs  :  |s|  List
4.  as  \mequiv{}(|s|)  bs
5.  v  :  |s|  List
6.  v1  :  |s|  List
7.  v  \mequiv{}(|s|)  v1
\mvdash{}  as  =  v  \mLeftarrow{}{}\mRightarrow{}  \mforall{}x:|s|.  ((x  \#\mmember{}  as)  =  (x  \#\mmember{}  v))


By

---

Latex:
\%  need  to  insert  the  coercions  for  the  next  lemma  \% 
Assert  mk\_mset(as)  =  mk\_mset(v)  \mLeftarrow{}{}\mRightarrow{}  \mforall{}x:|s|.  ((x  \#\mmember{}  as)  =  (x  \#\mmember{}  v)) 
THENM  ((Unfold  `mk\_mset`  (-1))  THEN  Auto)

---

Home Index