| Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > MPE Home > Th. List > seqomeq12 | Structured version Visualization version GIF version | ||
| Description: Equality theorem for seqω. (Contributed by Stefan O'Rear, 1-Nov-2014.) |
| Ref | Expression |
|---|---|
| seqomeq12 | ⊢ ((𝐴 = 𝐵 ∧ 𝐶 = 𝐷) → seqω(𝐴, 𝐶) = seqω(𝐵, 𝐷)) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | oveq 7425 | . . . . . 6 ⊢ (𝐴 = 𝐵 → (𝑎𝐴𝑏) = (𝑎𝐵𝑏)) | |
| 2 | 1 | opeq2d 4847 | . . . . 5 ⊢ (𝐴 = 𝐵 → 〈suc 𝑎, (𝑎𝐴𝑏)〉 = 〈suc 𝑎, (𝑎𝐵𝑏)〉) |
| 3 | 2 | mpoeq3dv 7498 | . . . 4 ⊢ (𝐴 = 𝐵 → (𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐴𝑏)〉) = (𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐵𝑏)〉)) |
| 4 | fveq2 6885 | . . . . 5 ⊢ (𝐶 = 𝐷 → ( I ‘𝐶) = ( I ‘𝐷)) | |
| 5 | 4 | opeq2d 4847 | . . . 4 ⊢ (𝐶 = 𝐷 → 〈∅, ( I ‘𝐶)〉 = 〈∅, ( I ‘𝐷)〉) |
| 6 | rdgeq12 8406 | . . . 4 ⊢ (((𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐴𝑏)〉) = (𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐵𝑏)〉) ∧ 〈∅, ( I ‘𝐶)〉 = 〈∅, ( I ‘𝐷)〉) → rec((𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐴𝑏)〉), 〈∅, ( I ‘𝐶)〉) = rec((𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐵𝑏)〉), 〈∅, ( I ‘𝐷)〉)) | |
| 7 | 3, 5, 6 | syl2an 608 | . . 3 ⊢ ((𝐴 = 𝐵 ∧ 𝐶 = 𝐷) → rec((𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐴𝑏)〉), 〈∅, ( I ‘𝐶)〉) = rec((𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐵𝑏)〉), 〈∅, ( I ‘𝐷)〉)) |
| 8 | 7 | imaeq1d 6063 | . 2 ⊢ ((𝐴 = 𝐵 ∧ 𝐶 = 𝐷) → (rec((𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐴𝑏)〉), 〈∅, ( I ‘𝐶)〉) “ ω) = (rec((𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐵𝑏)〉), 〈∅, ( I ‘𝐷)〉) “ ω)) |
| 9 | df-seqom 8441 | . 2 ⊢ seqω(𝐴, 𝐶) = (rec((𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐴𝑏)〉), 〈∅, ( I ‘𝐶)〉) “ ω) | |
| 10 | df-seqom 8441 | . 2 ⊢ seqω(𝐵, 𝐷) = (rec((𝑎 ∈ ω, 𝑏 ∈ V ↦ 〈suc 𝑎, (𝑎𝐵𝑏)〉), 〈∅, ( I ‘𝐷)〉) “ ω) | |
| 11 | 8, 9, 10 | 3eqtr4g 2825 | 1 ⊢ ((𝐴 = 𝐵 ∧ 𝐶 = 𝐷) → seqω(𝐴, 𝐶) = seqω(𝐵, 𝐷)) |
| Colors of variables: wff setvar class |
| This proof depends on syntax axioms: → wi 4 ∧ wa 401 = wceq 1570 Vcvv 3457 ∅c0 4286 〈cop 4597 I cid 5557 “ cima 5666 suc csuc 6366 ‘cfv 6540 (class class class)co 7419 ∈ cmpo 7421 ωcom 7868 reccrdg 8402 seqωcseqom 8440 |
| This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2148 ax-9 2156 ax-ext 2737 |
| This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-sb 2100 df-clab 2744 df-cleq 2757 df-clel 2840 df-ral 3082 df-rab 3419 df-v 3459 df-dif 3909 df-un 3911 df-in 3913 df-ss 3923 df-nul 4287 df-if 4490 df-sn 4592 df-pr 4594 df-op 4598 df-uni 4875 df-br 5112 df-opab 5176 df-mpt 5195 df-xp 5669 df-cnv 5671 df-co 5672 df-dm 5673 df-rn 5674 df-res 5675 df-ima 5676 df-pred 6306 df-iota 6496 df-fv 6548 df-ov 7422 df-oprab 7423 df-mpo 7424 df-frecs 8284 df-wrecs 8315 df-recs 8364 df-rdg 8403 df-seqom 8441 |
| This theorem is used by: cantnffval 9639 cantnfval 9644 cantnfres 9653 cnfcomlem 9675 cnfcom2 9678 fin23lem33 10344 |
| Copyright terms: Public domain | W3C validator |