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

Theorem cnegexlem2 8051
Description: Existence of a real number which produces a real number when multiplied by  _i. (Hint: zero is such a number, although we don't need to prove that yet). Lemma for cnegex 8053. (Contributed by Eric Schmidt, 22-May-2007.)
Assertion
Ref Expression
cnegexlem2  |-  E. y  e.  RR  ( _i  x.  y )  e.  RR

Proof of Theorem cnegexlem2
Dummy variables  x  z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 0cn 7870 . 2  |-  0  e.  CC
2 cnre 7874 . 2  |-  ( 0  e.  CC  ->  E. x  e.  RR  E. y  e.  RR  0  =  ( x  +  ( _i  x.  y ) ) )
3 ax-rnegex 7841 . . . . . 6  |-  ( x  e.  RR  ->  E. z  e.  RR  ( x  +  z )  =  0 )
43adantr 274 . . . . 5  |-  ( ( x  e.  RR  /\  y  e.  RR )  ->  E. z  e.  RR  ( x  +  z
)  =  0 )
5 recn 7865 . . . . . . . . . . 11  |-  ( x  e.  RR  ->  x  e.  CC )
6 ax-icn 7827 . . . . . . . . . . . 12  |-  _i  e.  CC
7 recn 7865 . . . . . . . . . . . 12  |-  ( y  e.  RR  ->  y  e.  CC )
8 mulcl 7859 . . . . . . . . . . . 12  |-  ( ( _i  e.  CC  /\  y  e.  CC )  ->  ( _i  x.  y
)  e.  CC )
96, 7, 8sylancr 411 . . . . . . . . . . 11  |-  ( y  e.  RR  ->  (
_i  x.  y )  e.  CC )
10 recn 7865 . . . . . . . . . . 11  |-  ( z  e.  RR  ->  z  e.  CC )
11 addid2 8014 . . . . . . . . . . . . . . 15  |-  ( z  e.  CC  ->  (
0  +  z )  =  z )
12113ad2ant3 1005 . . . . . . . . . . . . . 14  |-  ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  ->  ( 0  +  z )  =  z )
1312adantr 274 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  /\  ( ( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) ) )  ->  (
0  +  z )  =  z )
14 oveq1 5831 . . . . . . . . . . . . . . 15  |-  ( ( x  +  z )  =  0  ->  (
( x  +  z )  +  ( _i  x.  y ) )  =  ( 0  +  ( _i  x.  y
) ) )
1514ad2antrl 482 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  /\  ( ( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) ) )  ->  (
( x  +  z )  +  ( _i  x.  y ) )  =  ( 0  +  ( _i  x.  y
) ) )
16 add32 8034 . . . . . . . . . . . . . . . . 17  |-  ( ( x  e.  CC  /\  z  e.  CC  /\  (
_i  x.  y )  e.  CC )  ->  (
( x  +  z )  +  ( _i  x.  y ) )  =  ( ( x  +  ( _i  x.  y ) )  +  z ) )
17163com23 1191 . . . . . . . . . . . . . . . 16  |-  ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  ->  ( ( x  +  z )  +  ( _i  x.  y ) )  =  ( ( x  +  ( _i  x.  y ) )  +  z ) )
18 oveq1 5831 . . . . . . . . . . . . . . . . 17  |-  ( 0  =  ( x  +  ( _i  x.  y
) )  ->  (
0  +  z )  =  ( ( x  +  ( _i  x.  y ) )  +  z ) )
1918eqcomd 2163 . . . . . . . . . . . . . . . 16  |-  ( 0  =  ( x  +  ( _i  x.  y
) )  ->  (
( x  +  ( _i  x.  y ) )  +  z )  =  ( 0  +  z ) )
2017, 19sylan9eq 2210 . . . . . . . . . . . . . . 15  |-  ( ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  /\  0  =  (
x  +  ( _i  x.  y ) ) )  ->  ( (
x  +  z )  +  ( _i  x.  y ) )  =  ( 0  +  z ) )
2120adantrl 470 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  /\  ( ( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) ) )  ->  (
( x  +  z )  +  ( _i  x.  y ) )  =  ( 0  +  z ) )
22 addid2 8014 . . . . . . . . . . . . . . . 16  |-  ( ( _i  x.  y )  e.  CC  ->  (
0  +  ( _i  x.  y ) )  =  ( _i  x.  y ) )
23223ad2ant2 1004 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  ->  ( 0  +  ( _i  x.  y ) )  =  ( _i  x.  y ) )
2423adantr 274 . . . . . . . . . . . . . 14  |-  ( ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  /\  ( ( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) ) )  ->  (
0  +  ( _i  x.  y ) )  =  ( _i  x.  y ) )
2515, 21, 243eqtr3d 2198 . . . . . . . . . . . . 13  |-  ( ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  /\  ( ( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) ) )  ->  (
0  +  z )  =  ( _i  x.  y ) )
2613, 25eqtr3d 2192 . . . . . . . . . . . 12  |-  ( ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  /\  ( ( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) ) )  ->  z  =  ( _i  x.  y ) )
2726ex 114 . . . . . . . . . . 11  |-  ( ( x  e.  CC  /\  ( _i  x.  y
)  e.  CC  /\  z  e.  CC )  ->  ( ( ( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) )  ->  z  =  ( _i  x.  y ) ) )
285, 9, 10, 27syl3an 1262 . . . . . . . . . 10  |-  ( ( x  e.  RR  /\  y  e.  RR  /\  z  e.  RR )  ->  (
( ( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) )  ->  z  =  ( _i  x.  y
) ) )
29283expa 1185 . . . . . . . . 9  |-  ( ( ( x  e.  RR  /\  y  e.  RR )  /\  z  e.  RR )  ->  ( ( ( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y
) ) )  -> 
z  =  ( _i  x.  y ) ) )
3029imp 123 . . . . . . . 8  |-  ( ( ( ( x  e.  RR  /\  y  e.  RR )  /\  z  e.  RR )  /\  (
( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) ) )  ->  z  =  ( _i  x.  y
) )
31 simplr 520 . . . . . . . 8  |-  ( ( ( ( x  e.  RR  /\  y  e.  RR )  /\  z  e.  RR )  /\  (
( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) ) )  ->  z  e.  RR )
3230, 31eqeltrrd 2235 . . . . . . 7  |-  ( ( ( ( x  e.  RR  /\  y  e.  RR )  /\  z  e.  RR )  /\  (
( x  +  z )  =  0  /\  0  =  ( x  +  ( _i  x.  y ) ) ) )  ->  ( _i  x.  y )  e.  RR )
3332exp32 363 . . . . . 6  |-  ( ( ( x  e.  RR  /\  y  e.  RR )  /\  z  e.  RR )  ->  ( ( x  +  z )  =  0  ->  ( 0  =  ( x  +  ( _i  x.  y
) )  ->  (
_i  x.  y )  e.  RR ) ) )
3433rexlimdva 2574 . . . . 5  |-  ( ( x  e.  RR  /\  y  e.  RR )  ->  ( E. z  e.  RR  ( x  +  z )  =  0  ->  ( 0  =  ( x  +  ( _i  x.  y ) )  ->  ( _i  x.  y )  e.  RR ) ) )
354, 34mpd 13 . . . 4  |-  ( ( x  e.  RR  /\  y  e.  RR )  ->  ( 0  =  ( x  +  ( _i  x.  y ) )  ->  ( _i  x.  y )  e.  RR ) )
3635reximdva 2559 . . 3  |-  ( x  e.  RR  ->  ( E. y  e.  RR  0  =  ( x  +  ( _i  x.  y ) )  ->  E. y  e.  RR  ( _i  x.  y
)  e.  RR ) )
3736rexlimiv 2568 . 2  |-  ( E. x  e.  RR  E. y  e.  RR  0  =  ( x  +  ( _i  x.  y
) )  ->  E. y  e.  RR  ( _i  x.  y )  e.  RR )
381, 2, 37mp2b 8 1  |-  E. y  e.  RR  ( _i  x.  y )  e.  RR
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 103    /\ w3a 963    = wceq 1335    e. wcel 2128   E.wrex 2436  (class class class)co 5824   CCcc 7730   RRcr 7731   0cc0 7732   _ici 7734    + caddc 7735    x. cmul 7737
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 699  ax-5 1427  ax-7 1428  ax-gen 1429  ax-ie1 1473  ax-ie2 1474  ax-8 1484  ax-10 1485  ax-11 1486  ax-i12 1487  ax-bndl 1489  ax-4 1490  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2139  ax-resscn 7824  ax-1cn 7825  ax-icn 7827  ax-addcl 7828  ax-mulcl 7830  ax-addcom 7832  ax-addass 7834  ax-i2m1 7837  ax-0id 7840  ax-rnegex 7841  ax-cnre 7843
This theorem depends on definitions:  df-bi 116  df-3an 965  df-tru 1338  df-nf 1441  df-sb 1743  df-clab 2144  df-cleq 2150  df-clel 2153  df-nfc 2288  df-ral 2440  df-rex 2441  df-v 2714  df-un 3106  df-in 3108  df-ss 3115  df-sn 3566  df-pr 3567  df-op 3569  df-uni 3773  df-br 3966  df-iota 5135  df-fv 5178  df-ov 5827
This theorem is referenced by:  cnegex  8053
  Copyright terms: Public domain W3C validator