Proof of Theorem seqval
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | df-ima 5698 | . 2
⊢
(rec((𝑥 ∈ V,
𝑦 ∈ V ↦
〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉), 〈𝑀, (𝐹‘𝑀)〉) “ ω) = ran (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉), 〈𝑀, (𝐹‘𝑀)〉) ↾ ω) | 
| 2 |  | df-seq 14043 | . 2
⊢ seq𝑀( + , 𝐹) = (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉), 〈𝑀, (𝐹‘𝑀)〉) “ ω) | 
| 3 |  | seqval.1 | . . . 4
⊢ 𝑅 = (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑥(𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1))))𝑦)〉), 〈𝑀, (𝐹‘𝑀)〉) ↾ ω) | 
| 4 |  | eqid 2737 | . . . . . . 7
⊢ V =
V | 
| 5 |  | fvoveq1 7454 | . . . . . . . . . . 11
⊢ (𝑧 = 𝑥 → (𝐹‘(𝑧 + 1)) = (𝐹‘(𝑥 + 1))) | 
| 6 | 5 | oveq2d 7447 | . . . . . . . . . 10
⊢ (𝑧 = 𝑥 → (𝑤 + (𝐹‘(𝑧 + 1))) = (𝑤 + (𝐹‘(𝑥 + 1)))) | 
| 7 |  | oveq1 7438 | . . . . . . . . . 10
⊢ (𝑤 = 𝑦 → (𝑤 + (𝐹‘(𝑥 + 1))) = (𝑦 + (𝐹‘(𝑥 + 1)))) | 
| 8 |  | eqid 2737 | . . . . . . . . . 10
⊢ (𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1)))) = (𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1)))) | 
| 9 |  | ovex 7464 | . . . . . . . . . 10
⊢ (𝑦 + (𝐹‘(𝑥 + 1))) ∈ V | 
| 10 | 6, 7, 8, 9 | ovmpo 7593 | . . . . . . . . 9
⊢ ((𝑥 ∈ V ∧ 𝑦 ∈ V) → (𝑥(𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1))))𝑦) = (𝑦 + (𝐹‘(𝑥 + 1)))) | 
| 11 | 10 | el2v 3487 | . . . . . . . 8
⊢ (𝑥(𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1))))𝑦) = (𝑦 + (𝐹‘(𝑥 + 1))) | 
| 12 | 11 | opeq2i 4877 | . . . . . . 7
⊢
〈(𝑥 + 1),
(𝑥(𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1))))𝑦)〉 = 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉 | 
| 13 | 4, 4, 12 | mpoeq123i 7509 | . . . . . 6
⊢ (𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑥(𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1))))𝑦)〉) = (𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉) | 
| 14 |  | rdgeq1 8451 | . . . . . 6
⊢ ((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑥(𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1))))𝑦)〉) = (𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉) → rec((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑥(𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1))))𝑦)〉), 〈𝑀, (𝐹‘𝑀)〉) = rec((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉), 〈𝑀, (𝐹‘𝑀)〉)) | 
| 15 | 13, 14 | ax-mp 5 | . . . . 5
⊢
rec((𝑥 ∈ V,
𝑦 ∈ V ↦
〈(𝑥 + 1), (𝑥(𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1))))𝑦)〉), 〈𝑀, (𝐹‘𝑀)〉) = rec((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉), 〈𝑀, (𝐹‘𝑀)〉) | 
| 16 | 15 | reseq1i 5993 | . . . 4
⊢
(rec((𝑥 ∈ V,
𝑦 ∈ V ↦
〈(𝑥 + 1), (𝑥(𝑧 ∈ V, 𝑤 ∈ V ↦ (𝑤 + (𝐹‘(𝑧 + 1))))𝑦)〉), 〈𝑀, (𝐹‘𝑀)〉) ↾ ω) = (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉), 〈𝑀, (𝐹‘𝑀)〉) ↾ ω) | 
| 17 | 3, 16 | eqtri 2765 | . . 3
⊢ 𝑅 = (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉), 〈𝑀, (𝐹‘𝑀)〉) ↾ ω) | 
| 18 | 17 | rneqi 5948 | . 2
⊢ ran 𝑅 = ran (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ 〈(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))〉), 〈𝑀, (𝐹‘𝑀)〉) ↾ ω) | 
| 19 | 1, 2, 18 | 3eqtr4i 2775 | 1
⊢ seq𝑀( + , 𝐹) = ran 𝑅 |