HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
GIF version

Theorem recex 5749
Description: Existence of reciprocal of nonzero complex number. (Contributed by Eric Schmidt, 22-May-2007.)
Assertion
Ref Expression
recex ((A A ≠ 0) → x (A · x) = 1)
Distinct variable group:   x,A

Proof of Theorem recex
StepHypRef Expression
1 axcnre 5351 . . 3 (A a b A = (a + (i · b)))
2 recextlem2 5748 . . . . . . . . 9 ((a b (a + (i · b)) ≠ 0) → ((a · a) + (b · b)) ≠ 0)
323expia 847 . . . . . . . 8 ((a b ) → ((a + (i · b)) ≠ 0 → ((a · a) + (b · b)) ≠ 0))
4 axrrecex 5349 . . . . . . . . . . 11 ((((a · a) + (b · b)) ((a · a) + (b · b)) ≠ 0) → y (((a · a) + (b · b)) · y) = 1)
5 readdcl 5367 . . . . . . . . . . . 12 (((a · a) (b · b) ) → ((a · a) + (b · b)) )
6 remulcl 5369 . . . . . . . . . . . . 13 ((a a ) → (a · a) )
76anidms 444 . . . . . . . . . . . 12 (a → (a · a) )
8 remulcl 5369 . . . . . . . . . . . . 13 ((b b ) → (b · b) )
98anidms 444 . . . . . . . . . . . 12 (b → (b · b) )
105, 7, 9syl2an 465 . . . . . . . . . . 11 ((a b ) → ((a · a) + (b · b)) )
114, 10sylan 459 . . . . . . . . . 10 (((a b ) ((a · a) + (b · b)) ≠ 0) → y (((a · a) + (b · b)) · y) = 1)
12 opreq2 4027 . . . . . . . . . . . . . . . . . 18 (x = ((a − (i · b)) · y) → ((a + (i · b)) · x) = ((a + (i · b)) · ((a − (i · b)) · y)))
1312eqeq1d 1530 . . . . . . . . . . . . . . . . 17 (x = ((a − (i · b)) · y) → (((a + (i · b)) · x) = 1 ↔ ((a + (i · b)) · ((a − (i · b)) · y)) = 1))
1413rcla4ev 1924 . . . . . . . . . . . . . . . 16 ((((a − (i · b)) · y) ((a + (i · b)) · ((a − (i · b)) · y)) = 1) → x ((a + (i · b)) · x) = 1)
15 mulcl 5368 . . . . . . . . . . . . . . . . . 18 (((a − (i · b)) y ) → ((a − (i · b)) · y) )
16 subcl 5432 . . . . . . . . . . . . . . . . . . 19 ((a (i · b) ) → (a − (i · b)) )
17 axicn 5335 . . . . . . . . . . . . . . . . . . . 20 i
18 mulcl 5368 . . . . . . . . . . . . . . . . . . . 20 ((i b ) → (i · b) )
1917, 18mpan 707 . . . . . . . . . . . . . . . . . . 19 (b → (i · b) )
2016, 19sylan2 462 . . . . . . . . . . . . . . . . . 18 ((a b ) → (a − (i · b)) )
2115, 20sylan 459 . . . . . . . . . . . . . . . . 17 (((a b ) y ) → ((a − (i · b)) · y) )
2221adantr 398 . . . . . . . . . . . . . . . 16 ((((a b ) y ) (((a · a) + (b · b)) · y) = 1) → ((a − (i · b)) · y) )
23 mulass 5373 . . . . . . . . . . . . . . . . . . 19 (((a + (i · b)) (a − (i · b)) y ) → (((a + (i · b)) · (a − (i · b))) · y) = ((a + (i · b)) · ((a − (i · b)) · y)))
24 addcl 5366 . . . . . . . . . . . . . . . . . . . . 21 ((a (i · b) ) → (a + (i · b)) )
2524, 19sylan2 462 . . . . . . . . . . . . . . . . . . . 20 ((a b ) → (a + (i · b)) )
2625adantr 398 . . . . . . . . . . . . . . . . . . 19 (((a b ) y ) → (a + (i · b)) )
2720adantr 398 . . . . . . . . . . . . . . . . . . 19 (((a b ) y ) → (a − (i · b)) )
28 pm3.27 330 . . . . . . . . . . . . . . . . . . 19 (((a b ) y ) → y )
2923, 26, 27, 28syl3anc 870 . . . . . . . . . . . . . . . . . 18 (((a b ) y ) → (((a + (i · b)) · (a − (i · b))) · y) = ((a + (i · b)) · ((a − (i · b)) · y)))
30 recextlem1 5747 . . . . . . . . . . . . . . . . . . . 20 ((a b ) → ((a + (i · b)) · (a − (i · b))) = ((a · a) + (b · b)))
3130adantr 398 . . . . . . . . . . . . . . . . . . 19 (((a b ) y ) → ((a + (i · b)) · (a − (i · b))) = ((a · a) + (b · b)))
3231opreq1d 4033 . . . . . . . . . . . . . . . . . 18 (((a b ) y ) → (((a + (i · b)) · (a − (i · b))) · y) = (((a · a) + (b · b)) · y))
3329, 32eqtr3d 1556 . . . . . . . . . . . . . . . . 17 (((a b ) y ) → ((a + (i · b)) · ((a − (i · b)) · y)) = (((a · a) + (b · b)) · y))
34 id 59 . . . . . . . . . . . . . . . . 17 ((((a · a) + (b · b)) · y) = 1 → (((a · a) + (b · b)) · y) = 1)
3533, 34sylan9eq 1574 . . . . . . . . . . . . . . . 16 ((((a b ) y ) (((a · a) + (b · b)) · y) = 1) → ((a + (i · b)) · ((a − (i · b)) · y)) = 1)
3614, 22, 35sylanc 482 . . . . . . . . . . . . . . 15 ((((a b ) y ) (((a · a) + (b · b)) · y) = 1) → x ((a + (i · b)) · x) = 1)
3736exp31 385 . . . . . . . . . . . . . 14 ((a b ) → (y → ((((a · a) + (b · b)) · y) = 1 → x ((a + (i · b)) · x) = 1)))
38 recn 5378 . . . . . . . . . . . . . 14 (y y )
3937, 38syl5 21 . . . . . . . . . . . . 13 ((a b ) → (y → ((((a · a) + (b · b)) · y) = 1 → x ((a + (i · b)) · x) = 1)))
4039r19.23adv 1793 . . . . . . . . . . . 12 ((a b ) → (y (((a · a) + (b · b)) · y) = 1 → x ((a + (i · b)) · x) = 1))
41 recn 5378 . . . . . . . . . . . 12 (a a )
42 recn 5378 . . . . . . . . . . . 12 (b b )
4340, 41, 42syl2an 465 . . . . . . . . . . 11 ((a b ) → (y (((a · a) + (b · b)) · y) = 1 → x ((a + (i · b)) · x) = 1))
4443adantr 398 . . . . . . . . . 10 (((a b ) ((a · a) + (b · b)) ≠ 0) → (y (((a · a) + (b · b)) · y) = 1 → x ((a + (i · b)) · x) = 1))
4511, 44mpd 26 . . . . . . . . 9 (((a b ) ((a · a) + (b · b)) ≠ 0) → x ((a + (i · b)) · x) = 1)
4645ex 380 . . . . . . . 8 ((a b ) → (((a · a) + (b · b)) ≠ 0 → x ((a + (i · b)) · x) = 1))
473, 46syld 27 . . . . . . 7 ((a b ) → ((a + (i · b)) ≠ 0 → x ((a + (i · b)) · x) = 1))
4847adantr 398 . . . . . 6 (((a b ) A = (a + (i · b))) → ((a + (i · b)) ≠ 0 → x ((a + (i · b)) · x) = 1))
49 neeq1 1637 . . . . . . 7 (A = (a + (i · b)) → (A ≠ 0 ↔ (a + (i · b)) ≠ 0))
5049adantl 397 . . . . . 6 (((a b ) A = (a + (i · b))) → (A ≠ 0 ↔ (a + (i · b)) ≠ 0))
51 opreq1 4026 . . . . . . . . 9 (A = (a + (i · b)) → (A · x) = ((a + (i · b)) · x))
5251eqeq1d 1530 . . . . . . . 8 (A = (a + (i · b)) → ((A · x) = 1 ↔ ((a + (i · b)) · x) = 1))
5352rexbidv 1711 . . . . . . 7 (A = (a + (i · b)) → (x (A · x) = 1 ↔ x ((a + (i · b)) · x) = 1))
5453adantl 397 . . . . . 6 (((a b ) A = (a + (i · b))) → (x (A · x) = 1 ↔ x ((a + (i · b)) · x) = 1))
5548, 50, 543imtr4d 554 . . . . 5 (((a b ) A = (a + (i · b))) → (A ≠ 0 → x (A · x) = 1))
5655ex 380 . . . 4 ((a b ) → (A = (a + (i · b)) → (A ≠ 0 → x (A · x) = 1)))
5756r19.23aivv 1795 . . 3 (a b A = (a + (i · b)) → (A ≠ 0 → x (A · x) = 1))
581, 57syl 10 . 2 (A → (A ≠ 0 → x (A · x) = 1))
5958imp 357 1 ((A A ≠ 0) → x (A · x) = 1)
Colors of variables: wff set class
Syntax hints:   → wi 3   ↔ wb 153   wa 230   = wceq 997   wcel 999   ≠ wne 1632  wrex 1693  (class class class)co 4021  cc 5297  cr 5298  0cc0 5299  1c1 5300  ici 5301   + caddc 5302   · cmul 5304   − cmin 5357
This theorem is referenced by:  recexi 5750
This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 1003  ax-gen 1004  ax-8 1005  ax-9 1006  ax-10 1007  ax-11 1008  ax-12 1009  ax-13 1010  ax-14 1011  ax-17 1012  ax-4 1014  ax-5o 1016  ax-6o 1019  ax-9o 1164  ax-10o 1182  ax-16 1252  ax-11o 1260  ax-ext 1504  ax-rep 2748  ax-sep 2758  ax-nul 2765  ax-pow 2798  ax-pr 2835  ax-un 2922  ax-inf2 4687
This theorem depends on definitions:  df-bi 154  df-or 231  df-an 232  df-3or 788  df-3an 789  df-ex 1022  df-sb 1214  df-eu 1424  df-mo 1425  df-clab 1510  df-cleq 1515  df-clel 1518  df-ne 1634  df-nel 1635  df-ral 1696  df-rex 1697  df-reu 1698  df-rab 1699  df-v 1859  df-sbc 1989  df-csb 2052  df-dif 2100  df-un 2101  df-in 2102  df-ss 2104  df-pss 2106  df-nul 2332  df-if 2414  df-pw 2454  df-sn 2464  df-pr 2465  df-tp 2467  df-op 2468  df-uni 2558  df-int 2588  df-iun 2622  df-br 2675  df-opab 2722  df-tr 2736  df-eprel 2888  df-id 2891  df-po 2896  df-so 2906  df-fr 2974  df-we 2991  df-ord 3008  df-on 3009  df-lim 3010  df-suc 3011  df-om 3189  df-xp 3241  df-rel 3242  df-cnv 3243  df-co 3244  df-dm 3245  df-rn 3246  df-res 3247  df-ima 3248  df-fun 3249  df-fn 3250  df-f 3251  df-f1 3252  df-fo 3253  df-f1o 3254  df-fv 3255  df-rdg 3990  df-opr 4023  df-oprab 4024  df-1st 4137  df-2nd 4138  df-1o 4191  df-oadd 4193  df-omul 4194  df-er 4319  df-ec 4321  df-qs 4324  df-en 4429  df-dom 4430  df-sdom 4431  df-ni 5065  df-pli 5066  df-mi 5067  df-lti 5068  df-plpq 5100  df-mpq 5101  df-enq 5102  df-nq 5103  df-plq 5104  df-mq 5105  df-rq 5106  df-ltq 5107  df-1q 5108  df-np 5151  df-1p 5152  df-plp 5153  df-mp 5154  df-ltp 5155  df-plpr 5229  df-mpr 5230  df-enr 5231  df-nr 5232  df-plr 5233  df-mr 5234  df-ltr 5235  df-0r 5236  df-1r 5237  df-m1r 5238  df-c 5305  df-0 5306  df-1 5307  df-i 5308  df-r 5309  df-plus 5310  df-mul 5311  df-lt 5312  df-sub 5421  df-neg 5423  df-pnf 5552  df-mnf 5553  df-xr 5554  df-ltxr 5555  df-le 5556
Copyright terms: Public domain