Theorem rdgeq1 8379

Description: Equality theorem for the recursive definition generator. (Contributed by NM, 9-Apr-1995.) (Revised by Mario Carneiro, 9-May-2015.)

Assertion

Ref	Expression
rdgeq1	⊢ (𝐹 = 𝐺 → rec(𝐹, 𝐴) = rec(𝐺, 𝐴))

Proof of Theorem rdgeq1

Dummy variable 𝑔 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		fveq1 6857	. . . . . 6 ⊢ (𝐹 = 𝐺 → (𝐹‘(𝑔‘∪ dom 𝑔)) = (𝐺‘(𝑔‘∪ dom 𝑔)))
2	1	ifeq2d 4509	. . . . 5 ⊢ (𝐹 = 𝐺 → if(Lim dom 𝑔, ∪ ran 𝑔, (𝐹‘(𝑔‘∪ dom 𝑔))) = if(Lim dom 𝑔, ∪ ran 𝑔, (𝐺‘(𝑔‘∪ dom 𝑔))))
3	2	ifeq2d 4509	. . . 4 ⊢ (𝐹 = 𝐺 → if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐹‘(𝑔‘∪ dom 𝑔)))) = if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐺‘(𝑔‘∪ dom 𝑔)))))
4	3	mpteq2dv 5201	. . 3 ⊢ (𝐹 = 𝐺 → (𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐹‘(𝑔‘∪ dom 𝑔))))) = (𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐺‘(𝑔‘∪ dom 𝑔))))))
5		recseq 8342	. . 3 ⊢ ((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐹‘(𝑔‘∪ dom 𝑔))))) = (𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐺‘(𝑔‘∪ dom 𝑔))))) → recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐹‘(𝑔‘∪ dom 𝑔)))))) = recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐺‘(𝑔‘∪ dom 𝑔)))))))
6	4, 5	syl 17	. 2 ⊢ (𝐹 = 𝐺 → recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐹‘(𝑔‘∪ dom 𝑔)))))) = recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐺‘(𝑔‘∪ dom 𝑔)))))))
7		df-rdg 8378	. 2 ⊢ rec(𝐹, 𝐴) = recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐹‘(𝑔‘∪ dom 𝑔))))))
8		df-rdg 8378	. 2 ⊢ rec(𝐺, 𝐴) = recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴, if(Lim dom 𝑔, ∪ ran 𝑔, (𝐺‘(𝑔‘∪ dom 𝑔))))))
9	6, 7, 8	3eqtr4g 2789	1 ⊢ (𝐹 = 𝐺 → rec(𝐹, 𝐴) = rec(𝐺, 𝐴))

Syntax hints:   → wi 4   = wceq 1540  Vcvv 3447  ∅c0 4296  ifcif 4488  ∪ cuni 4871   ↦ cmpt 5188  dom cdm 5638  ran crn 5639  Lim wlim 6333  ‘cfv 6511  recscrecs 8339  reccrdg 8377

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-ext 2701

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-sb 2066  df-clab 2708  df-cleq 2721  df-clel 2803  df-ral 3045  df-rab 3406  df-v 3449  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-nul 4297  df-if 4489  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4872  df-br 5108  df-opab 5170  df-mpt 5189  df-xp 5644  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6274  df-iota 6464  df-fv 6519  df-ov 7390  df-frecs 8260  df-wrecs 8291  df-recs 8340  df-rdg 8378

This theorem is referenced by:  rdgeq12  8381  rdgsucmpt2  8398  frsucmpt2  8408  seqomlem0  8417  omv  8476  oev  8478  dffi3  9382  hsmex  10385  axdc  10474  seqeq2  13970  seqval  13977  precsexlemcbv  28108  seqsval  28182  seqsfn  28203  seqsp1  28205  constrcbvlem  33745  neibastop2  36349  rdgssun  37366  exrecfnlem  37367  dffinxpf  37373  finxpeq1  37374