Theorem seqeq3 13959

Description: Equality theorem for the sequence builder operation. (Contributed by Mario Carneiro, 4-Sep-2013.)

Assertion

Ref	Expression
seqeq3	⊢ (𝐹 = 𝐺 → seq𝑀( + , 𝐹) = seq𝑀( + , 𝐺))

Proof of Theorem seqeq3

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fveq1 6833	. . . . . . 7 ⊢ (𝐹 = 𝐺 → (𝐹‘(𝑥 + 1)) = (𝐺‘(𝑥 + 1)))
2	1	oveq2d 7376	. . . . . 6 ⊢ (𝐹 = 𝐺 → (𝑦 + (𝐹‘(𝑥 + 1))) = (𝑦 + (𝐺‘(𝑥 + 1))))
3	2	opeq2d 4824	. . . . 5 ⊢ (𝐹 = 𝐺 → ⟨(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))⟩ = ⟨(𝑥 + 1), (𝑦 + (𝐺‘(𝑥 + 1)))⟩)
4	3	mpoeq3dv 7439	. . . 4 ⊢ (𝐹 = 𝐺 → (𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))⟩) = (𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐺‘(𝑥 + 1)))⟩))
5		fveq1 6833	. . . . 5 ⊢ (𝐹 = 𝐺 → (𝐹‘𝑀) = (𝐺‘𝑀))
6	5	opeq2d 4824	. . . 4 ⊢ (𝐹 = 𝐺 → ⟨𝑀, (𝐹‘𝑀)⟩ = ⟨𝑀, (𝐺‘𝑀)⟩)
7		rdgeq12 8345	. . . 4 ⊢ (((𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))⟩) = (𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐺‘(𝑥 + 1)))⟩) ∧ ⟨𝑀, (𝐹‘𝑀)⟩ = ⟨𝑀, (𝐺‘𝑀)⟩) → rec((𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))⟩), ⟨𝑀, (𝐹‘𝑀)⟩) = rec((𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐺‘(𝑥 + 1)))⟩), ⟨𝑀, (𝐺‘𝑀)⟩))
8	4, 6, 7	syl2anc 585	. . 3 ⊢ (𝐹 = 𝐺 → rec((𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))⟩), ⟨𝑀, (𝐹‘𝑀)⟩) = rec((𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐺‘(𝑥 + 1)))⟩), ⟨𝑀, (𝐺‘𝑀)⟩))
9	8	imaeq1d 6018	. 2 ⊢ (𝐹 = 𝐺 → (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))⟩), ⟨𝑀, (𝐹‘𝑀)⟩) “ ω) = (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐺‘(𝑥 + 1)))⟩), ⟨𝑀, (𝐺‘𝑀)⟩) “ ω))
10		df-seq 13955	. 2 ⊢ seq𝑀( + , 𝐹) = (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐹‘(𝑥 + 1)))⟩), ⟨𝑀, (𝐹‘𝑀)⟩) “ ω)
11		df-seq 13955	. 2 ⊢ seq𝑀( + , 𝐺) = (rec((𝑥 ∈ V, 𝑦 ∈ V ↦ ⟨(𝑥 + 1), (𝑦 + (𝐺‘(𝑥 + 1)))⟩), ⟨𝑀, (𝐺‘𝑀)⟩) “ ω)
12	9, 10, 11	3eqtr4g 2797	1 ⊢ (𝐹 = 𝐺 → seq𝑀( + , 𝐹) = seq𝑀( + , 𝐺))

Syntax hints:   → wi 4   = wceq 1542  Vcvv 3430  ⟨cop 4574   “ cima 5627  ‘cfv 6492  (class class class)co 7360   ∈ cmpo 7362  ωcom 7810  reccrdg 8341  1c1 11030   + caddc 11032  seqcseq 13954

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-ext 2709

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-sb 2069  df-clab 2716  df-cleq 2729  df-clel 2812  df-ral 3053  df-rab 3391  df-v 3432  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4275  df-if 4468  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-br 5087  df-opab 5149  df-mpt 5168  df-xp 5630  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-iota 6448  df-fv 6500  df-ov 7363  df-oprab 7364  df-mpo 7365  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8342  df-seq 13955

This theorem is referenced by:  seqeq3d  13962  cbvprod  15869  cbvprodv  15870  prodeq1i  15872  iprodmul  15959  geolim3  26316  leibpilem2  26918  basel  27067  faclim  35944  sumeq2si  36400  prodeq2si  36402  cbvprodvw2  36445  ovoliunnfl  37997  voliunnfl  37999  heiborlem10  38155  binomcxplemnn0  44794  binomcxplemdvsum  44800  binomcxp  44802  fourierdlem112  46664  fouriersw  46677  voliunsge0lem  46918