Theorem bnj1371 29846

Description: Technical lemma for bnj60 29879. This lemma may no longer be used or have become an indirect lemma of the theorem in question (i.e. a lemma of a lemma... of the theorem). (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)

Hypotheses

Ref	Expression
bnj1371.1	|- B = { d | ( d C_ A /\ A. x e. d pred ( x , A , R ) C_ d ) }
bnj1371.2	|- Y = <. x , ( f |` pred ( x , A , R ) ) >.
bnj1371.3	|- C = { f | E. d e. B ( f Fn d /\ A. x e. d ( f ` x ) = ( G ` Y ) ) }
bnj1371.4	|- ( ta <-> ( f e. C /\ dom f = ( { x } u. trCl ( x , A , R ) ) ) )
bnj1371.5	|- D = { x e. A | -. E. f ta }
bnj1371.6	|- ( ps <-> ( R FrSe A /\ D =/= (/) ) )
bnj1371.7	|- ( ch <-> ( ps /\ x e. D /\ A. y e. D -. y R x ) )
bnj1371.8	|- ( ta' <-> [. y / x ]. ta )
bnj1371.9	|- H = { f | E. y e. pred ( x , A , R ) ta' }
bnj1371.10	|- P = U. H
bnj1371.11	|- ( ta' <-> ( f e. C /\ dom f = ( { y } u. trCl ( y , A , R ) ) ) )

Assertion

Ref	Expression
bnj1371	|- ( f e. H -> Fun f )

Distinct variable groups:   f, d   y, f

Allowed substitution hints:   ps( x, y, f, d)   ch( x, y, f, d)   ta( x, y, f, d)   A( x, y, f, d)   B( x, y, f, d)   C( x, y, f, d)   D( x, y, f, d)   P( x, y, f, d)   R( x, y, f, d)   G( x, y, f, d)   H( x, y, f, d)   Y( x, y, f, d)   ta'( x, y, f, d)

Proof of Theorem bnj1371

Step	Hyp	Ref	Expression
1		bnj1371.9	. . . . . . 7 |- H = { f | E. y e. pred ( x , A , R ) ta' }
2	1	bnj1436 29659	. . . . . 6 |- ( f e. H -> E. y e. pred ( x , A , R ) ta' )
3		rexex 2879	. . . . . 6 |- ( E. y e. pred ( x , A , R ) ta' -> E. y ta' )
4	2, 3	syl 17	. . . . 5 |- ( f e. H -> E. y ta' )
5		bnj1371.11	. . . . . 6 |- ( ta' <-> ( f e. C /\ dom f = ( { y } u. trCl ( y , A , R ) ) ) )
6	5	exbii 1712	. . . . 5 |- ( E. y ta' <-> E. y ( f e. C /\ dom f = ( { y } u. trCl ( y , A , R ) ) ) )
7	4, 6	sylib 199	. . . 4 |- ( f e. H -> E. y ( f e. C /\ dom f = ( { y } u. trCl ( y , A , R ) ) ) )
8		exsimpl 1723	. . . 4 |- ( E. y ( f e. C /\ dom f = ( { y } u. trCl ( y , A , R ) ) ) -> E. y f e. C )
9	7, 8	syl 17	. . 3 |- ( f e. H -> E. y f e. C )
10		bnj1371.3	. . . . . . 7 |- C = { f | E. d e. B ( f Fn d /\ A. x e. d ( f ` x ) = ( G ` Y ) ) }
11	10	abeq2i 2544	. . . . . 6 |- ( f e. C <-> E. d e. B ( f Fn d /\ A. x e. d ( f ` x ) = ( G ` Y ) ) )
12	11	bnj1238 29626	. . . . 5 |- ( f e. C -> E. d e. B f Fn d )
13		fnfun 5691	. . . . 5 |- ( f Fn d -> Fun f )
14	12, 13	bnj31 29533	. . . 4 |- ( f e. C -> E. d e. B Fun f )
15	14	bnj1265 29632	. . 3 |- ( f e. C -> Fun f )
16	9, 15	bnj593 29563	. 2 |- ( f e. H -> E. y Fun f )
17	16	bnj937 29591	1 |- ( f e. H -> Fun f )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 187   /\ wa 370   /\ w3a 982   = wceq 1437   E.wex 1657   e. wcel 1872   {cab 2407   =/= wne 2614   A.wral 2771   E.wrex 2772   {crab 2775   [.wsbc 3299   u. cun 3434   C_ wss 3436   (/)c0 3761   {csn 3998   <.cop 4004   U.cuni 4219   class class class wbr 4423   dom cdm 4853   |` cres 4855   Fun wfun 5595   Fn wfn 5596   ` cfv 5601   predc-bnj14 29501   FrSe w-bnj15 29505   trClc-bnj18 29507

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1663  ax-4 1676  ax-5 1752  ax-6 1798  ax-7 1843  ax-12 1909  ax-ext 2401

This theorem depends on definitions:  df-bi 188  df-an 372  df-tru 1440  df-ex 1658  df-sb 1791  df-clab 2408  df-cleq 2414  df-clel 2417  df-ral 2776  df-rex 2777  df-fn 5604

This theorem is referenced by:  bnj1384  29849