| Step |
Hyp |
Ref |
Expression |
| 0 |
|
csseq |
⊢ seqstr |
| 1 |
|
vm |
⊢ 𝑚 |
| 2 |
|
cvv |
⊢ V |
| 3 |
|
vf |
⊢ 𝑓 |
| 4 |
1
|
cv |
⊢ 𝑚 |
| 5 |
|
clsw |
⊢ lastS |
| 6 |
|
chash |
⊢ ♯ |
| 7 |
4 6
|
cfv |
⊢ ( ♯ ‘ 𝑚 ) |
| 8 |
|
vx |
⊢ 𝑥 |
| 9 |
|
vy |
⊢ 𝑦 |
| 10 |
8
|
cv |
⊢ 𝑥 |
| 11 |
|
cconcat |
⊢ ++ |
| 12 |
3
|
cv |
⊢ 𝑓 |
| 13 |
10 12
|
cfv |
⊢ ( 𝑓 ‘ 𝑥 ) |
| 14 |
13
|
cs1 |
⊢ 〈“ ( 𝑓 ‘ 𝑥 ) ”〉 |
| 15 |
10 14 11
|
co |
⊢ ( 𝑥 ++ 〈“ ( 𝑓 ‘ 𝑥 ) ”〉 ) |
| 16 |
8 9 2 2 15
|
cmpo |
⊢ ( 𝑥 ∈ V , 𝑦 ∈ V ↦ ( 𝑥 ++ 〈“ ( 𝑓 ‘ 𝑥 ) ”〉 ) ) |
| 17 |
|
cn0 |
⊢ ℕ0 |
| 18 |
4 12
|
cfv |
⊢ ( 𝑓 ‘ 𝑚 ) |
| 19 |
18
|
cs1 |
⊢ 〈“ ( 𝑓 ‘ 𝑚 ) ”〉 |
| 20 |
4 19 11
|
co |
⊢ ( 𝑚 ++ 〈“ ( 𝑓 ‘ 𝑚 ) ”〉 ) |
| 21 |
20
|
csn |
⊢ { ( 𝑚 ++ 〈“ ( 𝑓 ‘ 𝑚 ) ”〉 ) } |
| 22 |
17 21
|
cxp |
⊢ ( ℕ0 × { ( 𝑚 ++ 〈“ ( 𝑓 ‘ 𝑚 ) ”〉 ) } ) |
| 23 |
16 22 7
|
cseq |
⊢ seq ( ♯ ‘ 𝑚 ) ( ( 𝑥 ∈ V , 𝑦 ∈ V ↦ ( 𝑥 ++ 〈“ ( 𝑓 ‘ 𝑥 ) ”〉 ) ) , ( ℕ0 × { ( 𝑚 ++ 〈“ ( 𝑓 ‘ 𝑚 ) ”〉 ) } ) ) |
| 24 |
5 23
|
ccom |
⊢ ( lastS ∘ seq ( ♯ ‘ 𝑚 ) ( ( 𝑥 ∈ V , 𝑦 ∈ V ↦ ( 𝑥 ++ 〈“ ( 𝑓 ‘ 𝑥 ) ”〉 ) ) , ( ℕ0 × { ( 𝑚 ++ 〈“ ( 𝑓 ‘ 𝑚 ) ”〉 ) } ) ) ) |
| 25 |
4 24
|
cun |
⊢ ( 𝑚 ∪ ( lastS ∘ seq ( ♯ ‘ 𝑚 ) ( ( 𝑥 ∈ V , 𝑦 ∈ V ↦ ( 𝑥 ++ 〈“ ( 𝑓 ‘ 𝑥 ) ”〉 ) ) , ( ℕ0 × { ( 𝑚 ++ 〈“ ( 𝑓 ‘ 𝑚 ) ”〉 ) } ) ) ) ) |
| 26 |
1 3 2 2 25
|
cmpo |
⊢ ( 𝑚 ∈ V , 𝑓 ∈ V ↦ ( 𝑚 ∪ ( lastS ∘ seq ( ♯ ‘ 𝑚 ) ( ( 𝑥 ∈ V , 𝑦 ∈ V ↦ ( 𝑥 ++ 〈“ ( 𝑓 ‘ 𝑥 ) ”〉 ) ) , ( ℕ0 × { ( 𝑚 ++ 〈“ ( 𝑓 ‘ 𝑚 ) ”〉 ) } ) ) ) ) ) |
| 27 |
0 26
|
wceq |
⊢ seqstr = ( 𝑚 ∈ V , 𝑓 ∈ V ↦ ( 𝑚 ∪ ( lastS ∘ seq ( ♯ ‘ 𝑚 ) ( ( 𝑥 ∈ V , 𝑦 ∈ V ↦ ( 𝑥 ++ 〈“ ( 𝑓 ‘ 𝑥 ) ”〉 ) ) , ( ℕ0 × { ( 𝑚 ++ 〈“ ( 𝑓 ‘ 𝑚 ) ”〉 ) } ) ) ) ) ) |