Theorem frectfr 5924

Description: Lemma to connect transfinite recursion theorems with finite recursion. That is, given the conditions F Fn _V and A e. V on frec( F , A), we want to be able to apply tfri1d 5890 or tfri2d 5891, and this lemma lets us satisfy hypotheses of those theorems.

(Contributed by Jim Kingdon, 15-Aug-2019.)

Hypothesis

Ref	Expression
frectfr.1	|- G = (g e. _V |-> {x | (E. m e. om ( dom g = suc m /\ x e. ( F ` (g ` m))) \/ ( dom g = (/) /\ x e. A)) })

Assertion

Ref	Expression
frectfr	|- ((A.z( F ` z) e. _V /\ A e. V) -> A.y( Fun G /\ ( G ` y) e. _V))

Distinct variable groups:   g, m,x,y,A   z,g, F, m,x,y   g, V, m,y

Allowed substitution hints:   A(z)   G(x,y,z,g, m)   V(x,z)

Proof of Theorem frectfr

Step	Hyp	Ref	Expression
1		vex 2554	. . . . . . . 8 |- g e. _V
2	1	a1i 9	. . . . . . 7 |- ((A.z( F ` z) e. _V /\ A e. V) -> g e. _V)
3		simpl 102	. . . . . . 7 |- ((A.z( F ` z) e. _V /\ A e. V) -> A.z( F ` z) e. _V)
4		simpr 103	. . . . . . 7 |- ((A.z( F ` z) e. _V /\ A e. V) -> A e. V)
5	2, 3, 4	frecabex 5923	. . . . . 6 |- ((A.z( F ` z) e. _V /\ A e. V) -> {x | (E. m e. om ( dom g = suc m /\ x e. ( F ` (g ` m))) \/ ( dom g = (/) /\ x e. A)) } e. _V)
6	5	ralrimivw 2387	. . . . 5 |- ((A.z( F ` z) e. _V /\ A e. V) -> A.g e. _V {x | (E. m e. om ( dom g = suc m /\ x e. ( F ` (g ` m))) \/ ( dom g = (/) /\ x e. A)) } e. _V)
7		frectfr.1	. . . . . 6 |- G = (g e. _V |-> {x | (E. m e. om ( dom g = suc m /\ x e. ( F ` (g ` m))) \/ ( dom g = (/) /\ x e. A)) })
8	7	fnmpt 4968	. . . . 5 |- (A.g e. _V {x | (E. m e. om ( dom g = suc m /\ x e. ( F ` (g ` m))) \/ ( dom g = (/) /\ x e. A)) } e. _V -> G Fn _V)
9	6, 8	syl 14	. . . 4 |- ((A.z( F ` z) e. _V /\ A e. V) -> G Fn _V)
10		vex 2554	. . . 4 |- y e. _V
11		funfvex 5135	. . . . 5 |- (( Fun G /\ y e. dom G) -> ( G ` y) e. _V)
12	11	funfni 4942	. . . 4 |- (( G Fn _V /\ y e. _V) -> ( G ` y) e. _V)
13	9, 10, 12	sylancl 392	. . 3 |- ((A.z( F ` z) e. _V /\ A e. V) -> ( G ` y) e. _V)
14	7	funmpt2 4882	. . 3 |- Fun G
15	13, 14	jctil 295	. 2 |- ((A.z( F ` z) e. _V /\ A e. V) -> ( Fun G /\ ( G ` y) e. _V))
16	15	alrimiv 1751	1 |- ((A.z( F ` z) e. _V /\ A e. V) -> A.y( Fun G /\ ( G ` y) e. _V))

Syntax hints:   -> wi 4   /\ wa 97   \/ wo 628  A.wal 1240   = wceq 1242   e. wcel 1390   {cab 2023  A.wral 2300  E.wrex 2301   _Vcvv 2551   (/)c0 3218   |-> cmpt 3809   suc csuc 4068   omcom 4256   dom cdm 4288   Fun wfun 4839   Fn wfn 4840   ` cfv 4845

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-io 629  ax-5 1333  ax-7 1334  ax-gen 1335  ax-ie1 1379  ax-ie2 1380  ax-8 1392  ax-10 1393  ax-11 1394  ax-i12 1395  ax-bndl 1396  ax-4 1397  ax-13 1401  ax-14 1402  ax-17 1416  ax-i9 1420  ax-ial 1424  ax-i5r 1425  ax-ext 2019  ax-coll 3863  ax-sep 3866  ax-pow 3918  ax-pr 3935  ax-un 4136  ax-iinf 4254

This theorem depends on definitions:  df-bi 110  df-3an 886  df-tru 1245  df-nf 1347  df-sb 1643  df-eu 1900  df-mo 1901  df-clab 2024  df-cleq 2030  df-clel 2033  df-nfc 2164  df-ral 2305  df-rex 2306  df-reu 2307  df-rab 2309  df-v 2553  df-sbc 2759  df-csb 2847  df-un 2916  df-in 2918  df-ss 2925  df-pw 3353  df-sn 3373  df-pr 3374  df-op 3376  df-uni 3572  df-int 3607  df-iun 3650  df-br 3756  df-opab 3810  df-mpt 3811  df-id 4021  df-iom 4257  df-xp 4294  df-rel 4295  df-cnv 4296  df-co 4297  df-dm 4298  df-rn 4299  df-res 4300  df-ima 4301  df-iota 4810  df-fun 4847  df-fn 4848  df-f 4849  df-f1 4850  df-fo 4851  df-f1o 4852  df-fv 4853

This theorem is referenced by:  frecfnom  5925  frecsuclem1  5926  frecsuclemdm  5927  frecsuclem3  5929