This is an inofficial mirror of http://metamath.tirix.org for personal testing of a visualizer extension only.

Metamath Proof Explorer

Theorem nqerf

Description: Corollary of nqereu : the function /Q is actually a function. (Contributed by Mario Carneiro, 6-May-2013) (New usage is discouraged.)

Ref Expression
Assertion nqerf 
|- /Q : ( N. X. N. ) --> Q.

Proof

Step Hyp Ref Expression
1 df-erq 
 |-  /Q = ( ~Q i^i ( ( N. X. N. ) X. Q. ) )
2 inss2 
 |-  ( ~Q i^i ( ( N. X. N. ) X. Q. ) ) C_ ( ( N. X. N. ) X. Q. )
3 1 2 eqsstri 
 |-  /Q C_ ( ( N. X. N. ) X. Q. )
4 xpss 
 |-  ( ( N. X. N. ) X. Q. ) C_ ( _V X. _V )
5 3 4 sstri 
 |-  /Q C_ ( _V X. _V )
6 df-rel 
 |-  ( Rel /Q <-> /Q C_ ( _V X. _V ) )
7 5 6 mpbir 
 |-  Rel /Q
8 nqereu 
 |-  ( x e. ( N. X. N. ) -> E! y e. Q. y ~Q x )
9 df-reu 
 |-  ( E! y e. Q. y ~Q x <-> E! y ( y e. Q. /\ y ~Q x ) )
10 eumo 
 |-  ( E! y ( y e. Q. /\ y ~Q x ) -> E* y ( y e. Q. /\ y ~Q x ) )
11 9 10 sylbi 
 |-  ( E! y e. Q. y ~Q x -> E* y ( y e. Q. /\ y ~Q x ) )
12 8 11 syl 
 |-  ( x e. ( N. X. N. ) -> E* y ( y e. Q. /\ y ~Q x ) )
13 moanimv 
 |-  ( E* y ( x e. ( N. X. N. ) /\ ( y e. Q. /\ y ~Q x ) ) <-> ( x e. ( N. X. N. ) -> E* y ( y e. Q. /\ y ~Q x ) ) )
14 12 13 mpbir 
 |-  E* y ( x e. ( N. X. N. ) /\ ( y e. Q. /\ y ~Q x ) )
15 3 brel 
 |-  ( x /Q y -> ( x e. ( N. X. N. ) /\ y e. Q. ) )
16 15 simpld 
 |-  ( x /Q y -> x e. ( N. X. N. ) )
17 15 simprd 
 |-  ( x /Q y -> y e. Q. )
18 enqer 
 |-  ~Q Er ( N. X. N. )
19 18 a1i 
 |-  ( x /Q y -> ~Q Er ( N. X. N. ) )
20 inss1 
 |-  ( ~Q i^i ( ( N. X. N. ) X. Q. ) ) C_ ~Q
21 1 20 eqsstri 
 |-  /Q C_ ~Q
22 21 ssbri 
 |-  ( x /Q y -> x ~Q y )
23 19 22 ersym 
 |-  ( x /Q y -> y ~Q x )
24 16 17 23 jca32 
 |-  ( x /Q y -> ( x e. ( N. X. N. ) /\ ( y e. Q. /\ y ~Q x ) ) )
25 24 moimi 
 |-  ( E* y ( x e. ( N. X. N. ) /\ ( y e. Q. /\ y ~Q x ) ) -> E* y x /Q y )
26 14 25 ax-mp 
 |-  E* y x /Q y
27 26 ax-gen 
 |-  A. x E* y x /Q y
28 dffun6 
 |-  ( Fun /Q <-> ( Rel /Q /\ A. x E* y x /Q y ) )
29 7 27 28 mpbir2an 
 |-  Fun /Q
30 dmss 
 |-  ( /Q C_ ( ( N. X. N. ) X. Q. ) -> dom /Q C_ dom ( ( N. X. N. ) X. Q. ) )
31 3 30 ax-mp 
 |-  dom /Q C_ dom ( ( N. X. N. ) X. Q. )
32 1nq 
 |-  1Q e. Q.
33 ne0i 
 |-  ( 1Q e. Q. -> Q. =/= (/) )
34 dmxp 
 |-  ( Q. =/= (/) -> dom ( ( N. X. N. ) X. Q. ) = ( N. X. N. ) )
35 32 33 34 mp2b 
 |-  dom ( ( N. X. N. ) X. Q. ) = ( N. X. N. )
36 31 35 sseqtri 
 |-  dom /Q C_ ( N. X. N. )
37 reurex 
 |-  ( E! y e. Q. y ~Q x -> E. y e. Q. y ~Q x )
38 simpll 
 |-  ( ( ( x e. ( N. X. N. ) /\ y e. Q. ) /\ y ~Q x ) -> x e. ( N. X. N. ) )
39 simplr 
 |-  ( ( ( x e. ( N. X. N. ) /\ y e. Q. ) /\ y ~Q x ) -> y e. Q. )
40 18 a1i 
 |-  ( ( ( x e. ( N. X. N. ) /\ y e. Q. ) /\ y ~Q x ) -> ~Q Er ( N. X. N. ) )
41 simpr 
 |-  ( ( ( x e. ( N. X. N. ) /\ y e. Q. ) /\ y ~Q x ) -> y ~Q x )
42 40 41 ersym 
 |-  ( ( ( x e. ( N. X. N. ) /\ y e. Q. ) /\ y ~Q x ) -> x ~Q y )
43 1 breqi 
 |-  ( x /Q y <-> x ( ~Q i^i ( ( N. X. N. ) X. Q. ) ) y )
44 brinxp2 
 |-  ( x ( ~Q i^i ( ( N. X. N. ) X. Q. ) ) y <-> ( ( x e. ( N. X. N. ) /\ y e. Q. ) /\ x ~Q y ) )
45 43 44 bitri 
 |-  ( x /Q y <-> ( ( x e. ( N. X. N. ) /\ y e. Q. ) /\ x ~Q y ) )
46 38 39 42 45 syl21anbrc 
 |-  ( ( ( x e. ( N. X. N. ) /\ y e. Q. ) /\ y ~Q x ) -> x /Q y )
47 46 ex 
 |-  ( ( x e. ( N. X. N. ) /\ y e. Q. ) -> ( y ~Q x -> x /Q y ) )
48 47 reximdva 
 |-  ( x e. ( N. X. N. ) -> ( E. y e. Q. y ~Q x -> E. y e. Q. x /Q y ) )
49 rexex 
 |-  ( E. y e. Q. x /Q y -> E. y x /Q y )
50 37 48 49 syl56 
 |-  ( x e. ( N. X. N. ) -> ( E! y e. Q. y ~Q x -> E. y x /Q y ) )
51 8 50 mpd 
 |-  ( x e. ( N. X. N. ) -> E. y x /Q y )
52 vex 
 |-  x e. _V
53 52 eldm 
 |-  ( x e. dom /Q <-> E. y x /Q y )
54 51 53 sylibr 
 |-  ( x e. ( N. X. N. ) -> x e. dom /Q )
55 54 ssriv 
 |-  ( N. X. N. ) C_ dom /Q
56 36 55 eqssi 
 |-  dom /Q = ( N. X. N. )
57 df-fn 
 |-  ( /Q Fn ( N. X. N. ) <-> ( Fun /Q /\ dom /Q = ( N. X. N. ) ) )
58 29 56 57 mpbir2an 
 |-  /Q Fn ( N. X. N. )
59 3 rnssi 
 |-  ran /Q C_ ran ( ( N. X. N. ) X. Q. )
60 rnxpss 
 |-  ran ( ( N. X. N. ) X. Q. ) C_ Q.
61 59 60 sstri 
 |-  ran /Q C_ Q.
62 df-f 
 |-  ( /Q : ( N. X. N. ) --> Q. <-> ( /Q Fn ( N. X. N. ) /\ ran /Q C_ Q. ) )
63 58 61 62 mpbir2an 
 |-  /Q : ( N. X. N. ) --> Q.