---

Step * 2 of Lemma fset-subtype2

.....antecedent..... 
1. T : Type
2. eq : EqDecider(T)
3. s : Base
4. s1 : Base
5. s = s1 ∈ (x,y:T List//set-equal(T;x;y))
6. s ∈ T List
7. s1 ∈ T List
8. set-equal(T;s;s1)
⊢ set-equal({z:T| ↑z ∈b s} ;s;s1)
BY
{ RepeatFor 2 (ParallelLast) }

1
1. T : Type
2. eq : EqDecider(T)
3. s : Base
4. s1 : Base
5. s = s1 ∈ (x,y:T List//set-equal(T;x;y))
6. s ∈ T List
7. s1 ∈ T List
8. ∀t:T. ((t ∈ s) ⇐⇒ (t ∈ s1))
9. t : {z:T| ↑z ∈b s} 
10. (t ∈ s) ⇐⇒ (t ∈ s1)
⊢ (t ∈ s) ⇐⇒ (t ∈ s1)

---

Latex:

---

Latex:
.....antecedent..... 
1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  s  :  Base
4.  s1  :  Base
5.  s  =  s1
6.  s  \mmember{}  T  List
7.  s1  \mmember{}  T  List
8.  set-equal(T;s;s1)
\mvdash{}  set-equal(\{z:T|  \muparrow{}z  \mmember{}\msubb{}  s\}  ;s;s1)


By

---

Latex:
RepeatFor  2  (ParallelLast)

---

Home Index