---

Step * 1 of Lemma remove1_functionality_wrt_permr


1. s : DSet
2. a : |s|
3. a' : |s|
4. bs : |s| List
5. bs' : |s| List
6. a = a' ∈ |s|
7. bs ≡(|s|) bs'
⊢ (bs \ a) ≡(|s|) (bs' \ a')
BY
{ ((((RWH (RevHypC 6) 0 THENA Auto) THEN (Decide ↑(a ∈b bs) THENA Auto)) THEN CopyToEnd (-1))
   THEN (RWH (HypC 7) (-1) THENA Auto)
   ) }

1
1. s : DSet
2. a : |s|
3. a' : |s|
4. bs : |s| List
5. bs' : |s| List
6. a = a' ∈ |s|
7. bs ≡(|s|) bs'
8. ↑(a ∈b bs)
9. ↑(a ∈b bs')
⊢ (bs \ a) ≡(|s|) (bs' \ a)

2
1. s : DSet
2. a : |s|
3. a' : |s|
4. bs : |s| List
5. bs' : |s| List
6. a = a' ∈ |s|
7. bs ≡(|s|) bs'
8. ¬↑(a ∈b bs)
9. ¬↑(a ∈b bs')
⊢ (bs \ a) ≡(|s|) (bs' \ a)

---

Latex:

---

Latex:

1.  s  :  DSet
2.  a  :  |s|
3.  a'  :  |s|
4.  bs  :  |s|  List
5.  bs'  :  |s|  List
6.  a  =  a'
7.  bs  \mequiv{}(|s|)  bs'
\mvdash{}  (bs  \mbackslash{}  a)  \mequiv{}(|s|)  (bs'  \mbackslash{}  a')


By

---

Latex:
((((RWH  (RevHypC  6)  0  THENA  Auto)  THEN  (Decide  \muparrow{}(a  \mmember{}\msubb{}  bs)  THENA  Auto))  THEN  CopyToEnd  (-1))
  THEN  (RWH  (HypC  7)  (-1)  THENA  Auto)
  )

---

Home Index