---

Step * 1 2 1 of Lemma cons_remove1_permr


1. s : DSet
2. a : |s|
3. b1 : |s|
4. bs' : |s| List
5. b : (↑(a ∈b bs')) ⇒ ([a / (bs' \ a)] ≡(|s|) bs')
6. b1 = a ∈ |s|
7. True
⊢ [a / bs'] ≡(|s|) [b1 / bs']
BY
{ ((HypSubst 6 0) THENA Auto) }

1
1. s : DSet
2. a : |s|
3. b1 : |s|
4. bs' : |s| List
5. b : (↑(a ∈b bs')) ⇒ ([a / (bs' \ a)] ≡(|s|) bs')
6. b1 = a ∈ |s|
7. True
⊢ [a / bs'] ≡(|s|) [a / bs']

---

Latex:

---

Latex:

1.  s  :  DSet
2.  a  :  |s|
3.  b1  :  |s|
4.  bs'  :  |s|  List
5.  b  :  (\muparrow{}(a  \mmember{}\msubb{}  bs'))  {}\mRightarrow{}  ([a  /  (bs'  \mbackslash{}  a)]  \mequiv{}(|s|)  bs')
6.  b1  =  a
7.  True
\mvdash{}  [a  /  bs']  \mequiv{}(|s|)  [b1  /  bs']


By

---

Latex:
((HypSubst  6  0)  THENA  Auto)

---

Home Index