Step
*
1
of Lemma
fset-subtype2
.....wf..... 
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)
⊢ s1 ∈ {z:T| ↑z ∈b s}  List
BY
{ (SubsumeC  ⌜{z:T| (z ∈ s1)}  List⌝⋅ THEN Auto) }
Latex:
Latex:
.....wf..... 
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{}  s1  \mmember{}  \{z:T|  \muparrow{}z  \mmember{}\msubb{}  s\}    List
By
Latex:
(SubsumeC    \mkleeneopen{}\{z:T|  (z  \mmember{}  s1)\}    List\mkleeneclose{}\mcdot{}  THEN  Auto)
Home
Index