MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  fsn Structured version   Unicode version

Theorem fsn 6057
Description: A function maps a singleton to a singleton iff it is the singleton of an ordered pair. (Contributed by NM, 10-Dec-2003.)
Hypotheses
Ref Expression
fsn.1  |-  A  e. 
_V
fsn.2  |-  B  e. 
_V
Assertion
Ref Expression
fsn  |-  ( F : { A } --> { B }  <->  F  =  { <. A ,  B >. } )

Proof of Theorem fsn
Dummy variables  x  y are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 opelf 5745 . . . . . . . 8  |-  ( ( F : { A }
--> { B }  /\  <.
x ,  y >.  e.  F )  ->  (
x  e.  { A }  /\  y  e.  { B } ) )
2 elsn 4041 . . . . . . . . 9  |-  ( x  e.  { A }  <->  x  =  A )
3 elsn 4041 . . . . . . . . 9  |-  ( y  e.  { B }  <->  y  =  B )
42, 3anbi12i 697 . . . . . . . 8  |-  ( ( x  e.  { A }  /\  y  e.  { B } )  <->  ( x  =  A  /\  y  =  B ) )
51, 4sylib 196 . . . . . . 7  |-  ( ( F : { A }
--> { B }  /\  <.
x ,  y >.  e.  F )  ->  (
x  =  A  /\  y  =  B )
)
65ex 434 . . . . . 6  |-  ( F : { A } --> { B }  ->  ( <. x ,  y >.  e.  F  ->  ( x  =  A  /\  y  =  B ) ) )
7 fsn.1 . . . . . . . . . 10  |-  A  e. 
_V
87snid 4055 . . . . . . . . 9  |-  A  e. 
{ A }
9 feu 5759 . . . . . . . . 9  |-  ( ( F : { A }
--> { B }  /\  A  e.  { A } )  ->  E! y  e.  { B } <. A ,  y
>.  e.  F )
108, 9mpan2 671 . . . . . . . 8  |-  ( F : { A } --> { B }  ->  E! y  e.  { B } <. A ,  y
>.  e.  F )
113anbi1i 695 . . . . . . . . . . 11  |-  ( ( y  e.  { B }  /\  <. A ,  y
>.  e.  F )  <->  ( y  =  B  /\  <. A , 
y >.  e.  F ) )
12 opeq2 4214 . . . . . . . . . . . . . 14  |-  ( y  =  B  ->  <. A , 
y >.  =  <. A ,  B >. )
1312eleq1d 2536 . . . . . . . . . . . . 13  |-  ( y  =  B  ->  ( <. A ,  y >.  e.  F  <->  <. A ,  B >.  e.  F ) )
1413pm5.32i 637 . . . . . . . . . . . 12  |-  ( ( y  =  B  /\  <. A ,  y >.  e.  F )  <->  ( y  =  B  /\  <. A ,  B >.  e.  F ) )
15 ancom 450 . . . . . . . . . . . 12  |-  ( (
<. A ,  B >.  e.  F  /\  y  =  B )  <->  ( y  =  B  /\  <. A ,  B >.  e.  F ) )
1614, 15bitr4i 252 . . . . . . . . . . 11  |-  ( ( y  =  B  /\  <. A ,  y >.  e.  F )  <->  ( <. A ,  B >.  e.  F  /\  y  =  B
) )
1711, 16bitr2i 250 . . . . . . . . . 10  |-  ( (
<. A ,  B >.  e.  F  /\  y  =  B )  <->  ( y  e.  { B }  /\  <. A ,  y >.  e.  F ) )
1817eubii 2300 . . . . . . . . 9  |-  ( E! y ( <. A ,  B >.  e.  F  /\  y  =  B )  <->  E! y ( y  e. 
{ B }  /\  <. A ,  y >.  e.  F ) )
19 fsn.2 . . . . . . . . . . . 12  |-  B  e. 
_V
2019eueq1 3276 . . . . . . . . . . 11  |-  E! y  y  =  B
2120biantru 505 . . . . . . . . . 10  |-  ( <. A ,  B >.  e.  F  <->  ( <. A ,  B >.  e.  F  /\  E! y  y  =  B ) )
22 euanv 2360 . . . . . . . . . 10  |-  ( E! y ( <. A ,  B >.  e.  F  /\  y  =  B )  <->  (
<. A ,  B >.  e.  F  /\  E! y  y  =  B ) )
2321, 22bitr4i 252 . . . . . . . . 9  |-  ( <. A ,  B >.  e.  F  <->  E! y ( <. A ,  B >.  e.  F  /\  y  =  B ) )
24 df-reu 2821 . . . . . . . . 9  |-  ( E! y  e.  { B } <. A ,  y
>.  e.  F  <->  E! y
( y  e.  { B }  /\  <. A , 
y >.  e.  F ) )
2518, 23, 243bitr4i 277 . . . . . . . 8  |-  ( <. A ,  B >.  e.  F  <->  E! y  e.  { B } <. A ,  y
>.  e.  F )
2610, 25sylibr 212 . . . . . . 7  |-  ( F : { A } --> { B }  ->  <. A ,  B >.  e.  F )
27 opeq12 4215 . . . . . . . 8  |-  ( ( x  =  A  /\  y  =  B )  -> 
<. x ,  y >.  =  <. A ,  B >. )
2827eleq1d 2536 . . . . . . 7  |-  ( ( x  =  A  /\  y  =  B )  ->  ( <. x ,  y
>.  e.  F  <->  <. A ,  B >.  e.  F ) )
2926, 28syl5ibrcom 222 . . . . . 6  |-  ( F : { A } --> { B }  ->  (
( x  =  A  /\  y  =  B )  ->  <. x ,  y >.  e.  F
) )
306, 29impbid 191 . . . . 5  |-  ( F : { A } --> { B }  ->  ( <. x ,  y >.  e.  F  <->  ( x  =  A  /\  y  =  B ) ) )
31 opex 4711 . . . . . . 7  |-  <. x ,  y >.  e.  _V
3231elsnc 4051 . . . . . 6  |-  ( <.
x ,  y >.  e.  { <. A ,  B >. }  <->  <. x ,  y
>.  =  <. A ,  B >. )
337, 19opth2 4725 . . . . . 6  |-  ( <.
x ,  y >.  =  <. A ,  B >.  <-> 
( x  =  A  /\  y  =  B ) )
3432, 33bitr2i 250 . . . . 5  |-  ( ( x  =  A  /\  y  =  B )  <->  <.
x ,  y >.  e.  { <. A ,  B >. } )
3530, 34syl6bb 261 . . . 4  |-  ( F : { A } --> { B }  ->  ( <. x ,  y >.  e.  F  <->  <. x ,  y
>.  e.  { <. A ,  B >. } ) )
3635alrimivv 1696 . . 3  |-  ( F : { A } --> { B }  ->  A. x A. y ( <. x ,  y >.  e.  F  <->  <.
x ,  y >.  e.  { <. A ,  B >. } ) )
37 frel 5732 . . . 4  |-  ( F : { A } --> { B }  ->  Rel  F )
387, 19relsnop 5105 . . . 4  |-  Rel  { <. A ,  B >. }
39 eqrel 5090 . . . 4  |-  ( ( Rel  F  /\  Rel  {
<. A ,  B >. } )  ->  ( F  =  { <. A ,  B >. }  <->  A. x A. y
( <. x ,  y
>.  e.  F  <->  <. x ,  y >.  e.  { <. A ,  B >. } ) ) )
4037, 38, 39sylancl 662 . . 3  |-  ( F : { A } --> { B }  ->  ( F  =  { <. A ,  B >. }  <->  A. x A. y ( <. x ,  y >.  e.  F  <->  <.
x ,  y >.  e.  { <. A ,  B >. } ) ) )
4136, 40mpbird 232 . 2  |-  ( F : { A } --> { B }  ->  F  =  { <. A ,  B >. } )
427, 19f1osn 5851 . . . 4  |-  { <. A ,  B >. } : { A } -1-1-onto-> { B }
43 f1oeq1 5805 . . . 4  |-  ( F  =  { <. A ,  B >. }  ->  ( F : { A } -1-1-onto-> { B }  <->  { <. A ,  B >. } : { A }
-1-1-onto-> { B } ) )
4442, 43mpbiri 233 . . 3  |-  ( F  =  { <. A ,  B >. }  ->  F : { A } -1-1-onto-> { B } )
45 f1of 5814 . . 3  |-  ( F : { A } -1-1-onto-> { B }  ->  F : { A } --> { B } )
4644, 45syl 16 . 2  |-  ( F  =  { <. A ,  B >. }  ->  F : { A } --> { B } )
4741, 46impbii 188 1  |-  ( F : { A } --> { B }  <->  F  =  { <. A ,  B >. } )
Colors of variables: wff setvar class
Syntax hints:    <-> wb 184    /\ wa 369   A.wal 1377    = wceq 1379    e. wcel 1767   E!weu 2275   E!wreu 2816   _Vcvv 3113   {csn 4027   <.cop 4033   Rel wrel 5004   -->wf 5582   -1-1-onto->wf1o 5585
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1601  ax-4 1612  ax-5 1680  ax-6 1719  ax-7 1739  ax-9 1771  ax-10 1786  ax-11 1791  ax-12 1803  ax-13 1968  ax-ext 2445  ax-sep 4568  ax-nul 4576  ax-pr 4686
This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3an 975  df-tru 1382  df-ex 1597  df-nf 1600  df-sb 1712  df-eu 2279  df-mo 2280  df-clab 2453  df-cleq 2459  df-clel 2462  df-nfc 2617  df-ne 2664  df-ral 2819  df-rex 2820  df-reu 2821  df-rab 2823  df-v 3115  df-dif 3479  df-un 3481  df-in 3483  df-ss 3490  df-nul 3786  df-if 3940  df-sn 4028  df-pr 4030  df-op 4034  df-br 4448  df-opab 4506  df-id 4795  df-xp 5005  df-rel 5006  df-cnv 5007  df-co 5008  df-dm 5009  df-rn 5010  df-fun 5588  df-fn 5589  df-f 5590  df-f1 5591  df-fo 5592  df-f1o 5593
This theorem is referenced by:  fsng  6058  fsn2  6059  mapsn  7457  axlowdimlem7  23927  ginvsn  25027  fdc  29841
  Copyright terms: Public domain W3C validator