---

Step * 1 1 of Lemma assert_of_eq_mset


1. s : DSet@i'
2. a : MSet{s}@i
3. b : MSet{s}@i
⊢ Ax = Ax ∈ (↓↑eq_mset{s}(a,b) ⇐⇒ a = b ∈ MSet{s})
BY
{ ((DVar `a' THEN Try (DVar `b')) THENA Auto) }

1
1. s : DSet@i'
2. a : Base
3. a1 : Base
4. a = a1 ∈ pertype(λas,bs. ((as ∈ |s| List) ∧ (bs ∈ |s| List) ∧ (as ≡(|s|) bs)))
5. a ∈ |s| List
6. a1 ∈ |s| List
7. a ≡(|s|) a1
8. b : Base
9. b1 : Base
10. b = b1 ∈ pertype(λas,bs. ((as ∈ |s| List) ∧ (bs ∈ |s| List) ∧ (as ≡(|s|) bs)))
11. b ∈ |s| List
12. b1 ∈ |s| List
13. b ≡(|s|) b1
⊢ Ax = Ax ∈ (↓↑eq_mset{s}(a,b) ⇐⇒ a = b ∈ MSet{s})

---

Latex:

---

Latex:

1.  s  :  DSet@i'
2.  a  :  MSet\{s\}@i
3.  b  :  MSet\{s\}@i
\mvdash{}  Ax  =  Ax


By

---

Latex:
((DVar  `a'  THEN  Try  (DVar  `b'))  THENA  Auto)

---

Home Index