Users' Mathboxes Mathbox for ML < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  csbrdgg Structured version   Visualization version   GIF version

Theorem csbrdgg 33146
Description: Move class substitution in and out of the recursive function generator. (Contributed by ML, 25-Oct-2020.)
Assertion
Ref Expression
csbrdgg (𝐴𝑉𝐴 / 𝑥rec(𝐹, 𝐼) = rec(𝐴 / 𝑥𝐹, 𝐴 / 𝑥𝐼))

Proof of Theorem csbrdgg
Dummy variable 𝑔 is distinct from all other variables.
StepHypRef Expression
1 csbrecsg 33145 . . 3 (𝐴𝑉𝐴 / 𝑥recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔)))))) = recs(𝐴 / 𝑥(𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔)))))))
2 csbmpt2 5001 . . . . 5 (𝐴𝑉𝐴 / 𝑥(𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔))))) = (𝑔 ∈ V ↦ 𝐴 / 𝑥if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔))))))
3 csbif 4129 . . . . . . 7 𝐴 / 𝑥if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔)))) = if([𝐴 / 𝑥]𝑔 = ∅, 𝐴 / 𝑥𝐼, 𝐴 / 𝑥if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔))))
4 sbcg 3497 . . . . . . . 8 (𝐴𝑉 → ([𝐴 / 𝑥]𝑔 = ∅ ↔ 𝑔 = ∅))
5 csbif 4129 . . . . . . . . 9 𝐴 / 𝑥if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔))) = if([𝐴 / 𝑥]Lim dom 𝑔, 𝐴 / 𝑥 ran 𝑔, 𝐴 / 𝑥(𝐹‘(𝑔 dom 𝑔)))
6 sbcg 3497 . . . . . . . . . 10 (𝐴𝑉 → ([𝐴 / 𝑥]Lim dom 𝑔 ↔ Lim dom 𝑔))
7 csbconstg 3539 . . . . . . . . . 10 (𝐴𝑉𝐴 / 𝑥 ran 𝑔 = ran 𝑔)
8 csbfv12 6218 . . . . . . . . . . 11 𝐴 / 𝑥(𝐹‘(𝑔 dom 𝑔)) = (𝐴 / 𝑥𝐹𝐴 / 𝑥(𝑔 dom 𝑔))
9 csbconstg 3539 . . . . . . . . . . . 12 (𝐴𝑉𝐴 / 𝑥(𝑔 dom 𝑔) = (𝑔 dom 𝑔))
109fveq2d 6182 . . . . . . . . . . 11 (𝐴𝑉 → (𝐴 / 𝑥𝐹𝐴 / 𝑥(𝑔 dom 𝑔)) = (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔)))
118, 10syl5eq 2666 . . . . . . . . . 10 (𝐴𝑉𝐴 / 𝑥(𝐹‘(𝑔 dom 𝑔)) = (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔)))
126, 7, 11ifbieq12d 4104 . . . . . . . . 9 (𝐴𝑉 → if([𝐴 / 𝑥]Lim dom 𝑔, 𝐴 / 𝑥 ran 𝑔, 𝐴 / 𝑥(𝐹‘(𝑔 dom 𝑔))) = if(Lim dom 𝑔, ran 𝑔, (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔))))
135, 12syl5eq 2666 . . . . . . . 8 (𝐴𝑉𝐴 / 𝑥if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔))) = if(Lim dom 𝑔, ran 𝑔, (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔))))
144, 13ifbieq2d 4102 . . . . . . 7 (𝐴𝑉 → if([𝐴 / 𝑥]𝑔 = ∅, 𝐴 / 𝑥𝐼, 𝐴 / 𝑥if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔)))) = if(𝑔 = ∅, 𝐴 / 𝑥𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔)))))
153, 14syl5eq 2666 . . . . . 6 (𝐴𝑉𝐴 / 𝑥if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔)))) = if(𝑔 = ∅, 𝐴 / 𝑥𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔)))))
1615mpteq2dv 4736 . . . . 5 (𝐴𝑉 → (𝑔 ∈ V ↦ 𝐴 / 𝑥if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔))))) = (𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴 / 𝑥𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔))))))
172, 16eqtrd 2654 . . . 4 (𝐴𝑉𝐴 / 𝑥(𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔))))) = (𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴 / 𝑥𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔))))))
18 recseq 7455 . . . 4 (𝐴 / 𝑥(𝑔 ∈ 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 𝑔)))))))
1917, 18syl 17 . . 3 (𝐴𝑉 → recs(𝐴 / 𝑥(𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔)))))) = recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴 / 𝑥𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔)))))))
201, 19eqtrd 2654 . 2 (𝐴𝑉𝐴 / 𝑥recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔)))))) = recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴 / 𝑥𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔)))))))
21 df-rdg 7491 . . 3 rec(𝐹, 𝐼) = recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔))))))
2221csbeq2i 3984 . 2 𝐴 / 𝑥rec(𝐹, 𝐼) = 𝐴 / 𝑥recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐹‘(𝑔 dom 𝑔))))))
23 df-rdg 7491 . 2 rec(𝐴 / 𝑥𝐹, 𝐴 / 𝑥𝐼) = recs((𝑔 ∈ V ↦ if(𝑔 = ∅, 𝐴 / 𝑥𝐼, if(Lim dom 𝑔, ran 𝑔, (𝐴 / 𝑥𝐹‘(𝑔 dom 𝑔))))))
2420, 22, 233eqtr4g 2679 1 (𝐴𝑉𝐴 / 𝑥rec(𝐹, 𝐼) = rec(𝐴 / 𝑥𝐹, 𝐴 / 𝑥𝐼))
Colors of variables: wff setvar class
Syntax hints:  wi 4   = wceq 1481  wcel 1988  Vcvv 3195  [wsbc 3429  csb 3526  c0 3907  ifcif 4077   cuni 4427  cmpt 4720  dom cdm 5104  ran crn 5105  Lim wlim 5712  cfv 5876  recscrecs 7452  reccrdg 7490
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1720  ax-4 1735  ax-5 1837  ax-6 1886  ax-7 1933  ax-8 1990  ax-9 1997  ax-10 2017  ax-11 2032  ax-12 2045  ax-13 2244  ax-ext 2600  ax-sep 4772  ax-nul 4780  ax-pow 4834  ax-pr 4897
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1038  df-tru 1484  df-fal 1487  df-ex 1703  df-nf 1708  df-sb 1879  df-eu 2472  df-mo 2473  df-clab 2607  df-cleq 2613  df-clel 2616  df-nfc 2751  df-ne 2792  df-ral 2914  df-rex 2915  df-rab 2918  df-v 3197  df-sbc 3430  df-csb 3527  df-dif 3570  df-un 3572  df-in 3574  df-ss 3581  df-nul 3908  df-if 4078  df-sn 4169  df-pr 4171  df-op 4175  df-uni 4428  df-br 4645  df-opab 4704  df-mpt 4721  df-xp 5110  df-cnv 5112  df-dm 5114  df-rn 5115  df-res 5116  df-ima 5117  df-pred 5668  df-iota 5839  df-fv 5884  df-wrecs 7392  df-recs 7453  df-rdg 7491
This theorem is referenced by:  csbfinxpg  33196
  Copyright terms: Public domain W3C validator