---

Step * 1 1 2 1 1 2 1 of Lemma parallel-as-bind

.....subterm..... T:t
1:n
1. A : Type
2. Info : Type
3. X : EClass(A)
4. Y : EClass(A)
5. x : EO+(Info)
6. x1 : E
7. u : {a:E| loc(a) = loc(x1) ∈ Id} 
8. v : {a:E| loc(a) = loc(x1) ∈ Id}  List
9. ≤loc(x1) = [u / v] ∈ ({a:E| loc(a) = loc(x1) ∈ Id}  List)@i
⊢ u = es-init(x;x1) ∈ E
BY
{ Assert ⌜u = hd(≤loc(x1)) ∈ E⌝⋅ }

1
.....assertion..... 
1. A : Type
2. Info : Type
3. X : EClass(A)
4. Y : EClass(A)
5. x : EO+(Info)
6. x1 : E
7. u : {a:E| loc(a) = loc(x1) ∈ Id} 
8. v : {a:E| loc(a) = loc(x1) ∈ Id}  List
9. ≤loc(x1) = [u / v] ∈ ({a:E| loc(a) = loc(x1) ∈ Id}  List)@i
⊢ u = hd(≤loc(x1)) ∈ E

2
1. A : Type
2. Info : Type
3. X : EClass(A)
4. Y : EClass(A)
5. x : EO+(Info)
6. x1 : E
7. u : {a:E| loc(a) = loc(x1) ∈ Id} 
8. v : {a:E| loc(a) = loc(x1) ∈ Id}  List
9. ≤loc(x1) = [u / v] ∈ ({a:E| loc(a) = loc(x1) ∈ Id}  List)@i
10. u = hd(≤loc(x1)) ∈ E
⊢ u = es-init(x;x1) ∈ E

---

Latex:

---

Latex:
.....subterm.....  T:t
1:n
1.  A  :  Type
2.  Info  :  Type
3.  X  :  EClass(A)
4.  Y  :  EClass(A)
5.  x  :  EO+(Info)
6.  x1  :  E
7.  u  :  \{a:E|  loc(a)  =  loc(x1)\} 
8.  v  :  \{a:E|  loc(a)  =  loc(x1)\}    List
9.  \mleq{}loc(x1)  =  [u  /  v]@i
\mvdash{}  u  =  es-init(x;x1)


By

---

Latex:
Assert  \mkleeneopen{}u  =  hd(\mleq{}loc(x1))\mkleeneclose{}\mcdot{}

---

Home Index