Theorem bnj60 29137

Description: Well-founded recursion, part 1 of 3. The proof has been taken from Chapter 4 of Don Monk's notes on Set Theory. See http://euclid.colorado.edu/~monkd/setth.pdf. (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)

Hypotheses

Ref	Expression
bnj60.1	|- B = { d | ( d C_ A /\ A. x e. d pred ( x , A , R ) C_ d ) }
bnj60.2	|- Y = <. x , ( f |` pred ( x , A , R ) ) >.
bnj60.3	|- C = { f | E. d e. B ( f Fn d /\ A. x e. d ( f ` x ) = ( G ` Y ) ) }
bnj60.4	|- F = U. C

Assertion

Ref	Expression
bnj60	|- ( R FrSe A -> F Fn A )

Distinct variable groups:   A, d, f, x   B, f   G, d, f, x   R, d, f, x

Allowed substitution hints:   B( x, d)   C( x, f, d)   F( x, f, d)   Y( x, f, d)

Proof of Theorem bnj60

Dummy variables g h are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		bnj60.1	. . . . 5 |- B = { d | ( d C_ A /\ A. x e. d pred ( x , A , R ) C_ d ) }
2		bnj60.2	. . . . 5 |- Y = <. x , ( f |` pred ( x , A , R ) ) >.
3		bnj60.3	. . . . 5 |- C = { f | E. d e. B ( f Fn d /\ A. x e. d ( f ` x ) = ( G ` Y ) ) }
4	1, 2, 3	bnj1497 29135	. . . 4 |- A. g e. C Fun g
5		eqid 2404	. . . . . . . 8 |- ( dom g i^i dom h ) = ( dom g i^i dom h )
6	1, 2, 3, 5	bnj1311 29099	. . . . . . 7 |- ( ( R FrSe A /\ g e. C /\ h e. C ) -> ( g |` ( dom g i^i dom h ) ) = ( h |` ( dom g i^i dom h ) ) )
7	6	3expia 1155	. . . . . 6 |- ( ( R FrSe A /\ g e. C ) -> ( h e. C -> ( g |` ( dom g i^i dom h ) ) = ( h |` ( dom g i^i dom h ) ) ) )
8	7	ralrimiv 2748	. . . . 5 |- ( ( R FrSe A /\ g e. C ) -> A. h e. C ( g |` ( dom g i^i dom h ) ) = ( h |` ( dom g i^i dom h ) ) )
9	8	ralrimiva 2749	. . . 4 |- ( R FrSe A -> A. g e. C A. h e. C ( g |` ( dom g i^i dom h ) ) = ( h |` ( dom g i^i dom h ) ) )
10		biid 228	. . . . 5 |- ( A. g e. C Fun g <-> A. g e. C Fun g )
11		biid 228	. . . . 5 |- ( ( A. g e. C Fun g /\ A. g e. C A. h e. C ( g |` ( dom g i^i dom h ) ) = ( h |` ( dom g i^i dom h ) ) ) <-> ( A. g e. C Fun g /\ A. g e. C A. h e. C ( g |` ( dom g i^i dom h ) ) = ( h |` ( dom g i^i dom h ) ) ) )
12	10, 5, 11	bnj1383 28909	. . . 4 |- ( ( A. g e. C Fun g /\ A. g e. C A. h e. C ( g |` ( dom g i^i dom h ) ) = ( h |` ( dom g i^i dom h ) ) ) -> Fun U. C )
13	4, 9, 12	sylancr 645	. . 3 |- ( R FrSe A -> Fun U. C )
14		bnj60.4	. . . 4 |- F = U. C
15	14	funeqi 5433	. . 3 |- ( Fun F <-> Fun U. C )
16	13, 15	sylibr 204	. 2 |- ( R FrSe A -> Fun F )
17	1, 2, 3, 14	bnj1498 29136	. 2 |- ( R FrSe A -> dom F = A )
18	16, 17	bnj1422 28915	1 |- ( R FrSe A -> F Fn A )

Syntax hints:   -> wi 4   /\ wa 359   = wceq 1649   e. wcel 1721   {cab 2390   A.wral 2666   E.wrex 2667   i^i cin 3279   C_ wss 3280   <.cop 3777   U.cuni 3975   dom cdm 4837   |` cres 4839   Fun wfun 5407   Fn wfn 5408   ` cfv 5413   predc-bnj14 28758   FrSe w-bnj15 28762

This theorem is referenced by:  bnj1501  29142  bnj1523  29146

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1552  ax-5 1563  ax-17 1623  ax-9 1662  ax-8 1683  ax-13 1723  ax-14 1725  ax-6 1740  ax-7 1745  ax-11 1757  ax-12 1946  ax-ext 2385  ax-rep 4280  ax-sep 4290  ax-nul 4298  ax-pow 4337  ax-pr 4363  ax-un 4660  ax-reg 7516  ax-inf2 7552

This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3or 937  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2258  df-mo 2259  df-clab 2391  df-cleq 2397  df-clel 2400  df-nfc 2529  df-ne 2569  df-ral 2671  df-rex 2672  df-reu 2673  df-rab 2675  df-v 2918  df-sbc 3122  df-csb 3212  df-dif 3283  df-un 3285  df-in 3287  df-ss 3294  df-pss 3296  df-nul 3589  df-if 3700  df-pw 3761  df-sn 3780  df-pr 3781  df-tp 3782  df-op 3783  df-uni 3976  df-iun 4055  df-br 4173  df-opab 4227  df-mpt 4228  df-tr 4263  df-eprel 4454  df-id 4458  df-po 4463  df-so 4464  df-fr 4501  df-we 4503  df-ord 4544  df-on 4545  df-lim 4546  df-suc 4547  df-om 4805  df-xp 4843  df-rel 4844  df-cnv 4845  df-co 4846  df-dm 4847  df-rn 4848  df-res 4849  df-ima 4850  df-iota 5377  df-fun 5415  df-fn 5416  df-f 5417  df-f1 5418  df-fo 5419  df-f1o 5420  df-fv 5421  df-1o 6683  df-bnj17 28757  df-bnj14 28759  df-bnj13 28761  df-bnj15 28763  df-bnj18 28765  df-bnj19 28767