---

Step * 1 1 2 1 of Lemma fun-connected-step-back


1. T : Type
2. f : T ⟶ T
3. x : T
4. y : T
5. L : T List
6. x=f*(y) via L
7. ¬(x = y ∈ T)
8. ¬↑null(L)
9. u : T
10. v : T List
11. v1 : T
12. last(L) = v1 ∈ T
13. L = ([u / v] @ [v1]) ∈ (T List)
⊢ x=f*(f y) via [u / v]
BY
{ Assert ⌜x=f*(y) via [u / v] @ [v1]⌝⋅ }

1
.....assertion..... 
1. T : Type
2. f : T ⟶ T
3. x : T
4. y : T
5. L : T List
6. x=f*(y) via L
7. ¬(x = y ∈ T)
8. ¬↑null(L)
9. u : T
10. v : T List
11. v1 : T
12. last(L) = v1 ∈ T
13. L = ([u / v] @ [v1]) ∈ (T List)
⊢ x=f*(y) via [u / v] @ [v1]

2
1. T : Type
2. f : T ⟶ T
3. x : T
4. y : T
5. L : T List
6. x=f*(y) via L
7. ¬(x = y ∈ T)
8. ¬↑null(L)
9. u : T
10. v : T List
11. v1 : T
12. last(L) = v1 ∈ T
13. L = ([u / v] @ [v1]) ∈ (T List)
14. x=f*(y) via [u / v] @ [v1]
⊢ x=f*(f y) via [u / v]

---

Latex:

---

Latex:

1.  T  :  Type
2.  f  :  T  {}\mrightarrow{}  T
3.  x  :  T
4.  y  :  T
5.  L  :  T  List
6.  x=f*(y)  via  L
7.  \mneg{}(x  =  y)
8.  \mneg{}\muparrow{}null(L)
9.  u  :  T
10.  v  :  T  List
11.  v1  :  T
12.  last(L)  =  v1
13.  L  =  ([u  /  v]  @  [v1])
\mvdash{}  x=f*(f  y)  via  [u  /  v]


By

---

Latex:
Assert  \mkleeneopen{}x=f*(y)  via  [u  /  v]  @  [v1]\mkleeneclose{}\mcdot{}

---

Home Index