ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  resfunexg Unicode version

Theorem resfunexg 5403
Description: The restriction of a function to a set exists. Compare Proposition 6.17 of [TakeutiZaring] p. 28. (Contributed by NM, 7-Apr-1995.) (Revised by Mario Carneiro, 22-Jun-2013.)
Assertion
Ref Expression
resfunexg  |-  ( ( Fun  A  /\  B  e.  C )  ->  ( A  |`  B )  e. 
_V )

Proof of Theorem resfunexg
Dummy variable  x is distinct from all other variables.
StepHypRef Expression
1 funres 4961 . . . . 5  |-  ( Fun 
A  ->  Fun  ( A  |`  B ) )
2 funfvex 5212 . . . . . 6  |-  ( ( Fun  ( A  |`  B )  /\  x  e.  dom  ( A  |`  B ) )  -> 
( ( A  |`  B ) `  x
)  e.  _V )
32ralrimiva 2434 . . . . 5  |-  ( Fun  ( A  |`  B )  ->  A. x  e.  dom  ( A  |`  B ) ( ( A  |`  B ) `  x
)  e.  _V )
4 fnasrng 5364 . . . . 5  |-  ( A. x  e.  dom  ( A  |`  B ) ( ( A  |`  B ) `  x )  e.  _V  ->  ( x  e.  dom  ( A  |`  B ) 
|->  ( ( A  |`  B ) `  x
) )  =  ran  ( x  e.  dom  ( A  |`  B ) 
|->  <. x ,  ( ( A  |`  B ) `
 x ) >.
) )
51, 3, 43syl 17 . . . 4  |-  ( Fun 
A  ->  ( x  e.  dom  ( A  |`  B )  |->  ( ( A  |`  B ) `  x ) )  =  ran  ( x  e. 
dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. ) )
65adantr 270 . . 3  |-  ( ( Fun  A  /\  B  e.  C )  ->  (
x  e.  dom  ( A  |`  B )  |->  ( ( A  |`  B ) `
 x ) )  =  ran  ( x  e.  dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. ) )
71adantr 270 . . . . 5  |-  ( ( Fun  A  /\  B  e.  C )  ->  Fun  ( A  |`  B ) )
8 funfn 4951 . . . . 5  |-  ( Fun  ( A  |`  B )  <-> 
( A  |`  B )  Fn  dom  ( A  |`  B ) )
97, 8sylib 120 . . . 4  |-  ( ( Fun  A  /\  B  e.  C )  ->  ( A  |`  B )  Fn 
dom  ( A  |`  B ) )
10 dffn5im 5240 . . . 4  |-  ( ( A  |`  B )  Fn  dom  ( A  |`  B )  ->  ( A  |`  B )  =  ( x  e.  dom  ( A  |`  B ) 
|->  ( ( A  |`  B ) `  x
) ) )
119, 10syl 14 . . 3  |-  ( ( Fun  A  /\  B  e.  C )  ->  ( A  |`  B )  =  ( x  e.  dom  ( A  |`  B ) 
|->  ( ( A  |`  B ) `  x
) ) )
12 imadmrn 4698 . . . . 5  |-  ( ( x  e.  dom  ( A  |`  B )  |->  <.
x ,  ( ( A  |`  B ) `  x ) >. ) " dom  ( x  e. 
dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. ) )  =  ran  ( x  e. 
dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. )
13 vex 2604 . . . . . . . . 9  |-  x  e. 
_V
14 opexg 3983 . . . . . . . . 9  |-  ( ( x  e.  _V  /\  ( ( A  |`  B ) `  x
)  e.  _V )  -> 
<. x ,  ( ( A  |`  B ) `  x ) >.  e.  _V )
1513, 2, 14sylancr 405 . . . . . . . 8  |-  ( ( Fun  ( A  |`  B )  /\  x  e.  dom  ( A  |`  B ) )  ->  <. x ,  ( ( A  |`  B ) `  x ) >.  e.  _V )
1615ralrimiva 2434 . . . . . . 7  |-  ( Fun  ( A  |`  B )  ->  A. x  e.  dom  ( A  |`  B )
<. x ,  ( ( A  |`  B ) `  x ) >.  e.  _V )
17 dmmptg 4838 . . . . . . 7  |-  ( A. x  e.  dom  ( A  |`  B ) <. x ,  ( ( A  |`  B ) `  x
) >.  e.  _V  ->  dom  ( x  e.  dom  ( A  |`  B ) 
|->  <. x ,  ( ( A  |`  B ) `
 x ) >.
)  =  dom  ( A  |`  B ) )
181, 16, 173syl 17 . . . . . 6  |-  ( Fun 
A  ->  dom  ( x  e.  dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. )  =  dom  ( A  |`  B ) )
1918imaeq2d 4688 . . . . 5  |-  ( Fun 
A  ->  ( (
x  e.  dom  ( A  |`  B )  |->  <.
x ,  ( ( A  |`  B ) `  x ) >. ) " dom  ( x  e. 
dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. ) )  =  ( ( x  e. 
dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. ) " dom  ( A  |`  B ) ) )
2012, 19syl5reqr 2128 . . . 4  |-  ( Fun 
A  ->  ( (
x  e.  dom  ( A  |`  B )  |->  <.
x ,  ( ( A  |`  B ) `  x ) >. ) " dom  ( A  |`  B ) )  =  ran  ( x  e. 
dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. ) )
2120adantr 270 . . 3  |-  ( ( Fun  A  /\  B  e.  C )  ->  (
( x  e.  dom  ( A  |`  B ) 
|->  <. x ,  ( ( A  |`  B ) `
 x ) >.
) " dom  ( A  |`  B ) )  =  ran  ( x  e.  dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. ) )
226, 11, 213eqtr4d 2123 . 2  |-  ( ( Fun  A  /\  B  e.  C )  ->  ( A  |`  B )  =  ( ( x  e. 
dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. ) " dom  ( A  |`  B ) ) )
23 funmpt 4958 . . 3  |-  Fun  (
x  e.  dom  ( A  |`  B )  |->  <.
x ,  ( ( A  |`  B ) `  x ) >. )
24 dmresexg 4652 . . . 4  |-  ( B  e.  C  ->  dom  ( A  |`  B )  e.  _V )
2524adantl 271 . . 3  |-  ( ( Fun  A  /\  B  e.  C )  ->  dom  ( A  |`  B )  e.  _V )
26 funimaexg 5003 . . 3  |-  ( ( Fun  ( x  e. 
dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. )  /\  dom  ( A  |`  B )  e.  _V )  -> 
( ( x  e. 
dom  ( A  |`  B )  |->  <. x ,  ( ( A  |`  B ) `  x
) >. ) " dom  ( A  |`  B ) )  e.  _V )
2723, 25, 26sylancr 405 . 2  |-  ( ( Fun  A  /\  B  e.  C )  ->  (
( x  e.  dom  ( A  |`  B ) 
|->  <. x ,  ( ( A  |`  B ) `
 x ) >.
) " dom  ( A  |`  B ) )  e.  _V )
2822, 27eqeltrd 2155 1  |-  ( ( Fun  A  /\  B  e.  C )  ->  ( A  |`  B )  e. 
_V )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 102    = wceq 1284    e. wcel 1433   A.wral 2348   _Vcvv 2601   <.cop 3401    |-> cmpt 3839   dom cdm 4363   ran crn 4364    |` cres 4365   "cima 4366   Fun wfun 4916    Fn wfn 4917   ` cfv 4922
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-io 662  ax-5 1376  ax-7 1377  ax-gen 1378  ax-ie1 1422  ax-ie2 1423  ax-8 1435  ax-10 1436  ax-11 1437  ax-i12 1438  ax-bndl 1439  ax-4 1440  ax-14 1445  ax-17 1459  ax-i9 1463  ax-ial 1467  ax-i5r 1468  ax-ext 2063  ax-coll 3893  ax-sep 3896  ax-pow 3948  ax-pr 3964
This theorem depends on definitions:  df-bi 115  df-3an 921  df-tru 1287  df-nf 1390  df-sb 1686  df-eu 1944  df-mo 1945  df-clab 2068  df-cleq 2074  df-clel 2077  df-nfc 2208  df-ral 2353  df-rex 2354  df-reu 2355  df-rab 2357  df-v 2603  df-sbc 2816  df-csb 2909  df-un 2977  df-in 2979  df-ss 2986  df-pw 3384  df-sn 3404  df-pr 3405  df-op 3407  df-uni 3602  df-iun 3680  df-br 3786  df-opab 3840  df-mpt 3841  df-id 4048  df-xp 4369  df-rel 4370  df-cnv 4371  df-co 4372  df-dm 4373  df-rn 4374  df-res 4375  df-ima 4376  df-iota 4887  df-fun 4924  df-fn 4925  df-f 4926  df-f1 4927  df-fo 4928  df-f1o 4929  df-fv 4930
This theorem is referenced by:  fnex  5404  ofexg  5736  cofunexg  5758  rdgivallem  5991  frecex  6004  frecsuclem3  6013
  Copyright terms: Public domain W3C validator