Metamath Proof Explorer


Theorem qreccl

Description: Closure of reciprocal of rationals. (Contributed by NM, 3-Aug-2004)

Ref Expression
Assertion qreccl A A 0 1 A

Proof

Step Hyp Ref Expression
1 elq A x y A = x y
2 nnne0 y y 0
3 2 ancli y y y 0
4 neeq1 A = x y A 0 x y 0
5 zcn x x
6 nncn y y
7 5 6 anim12i x y x y
8 divne0b x y y 0 x 0 x y 0
9 8 3expa x y y 0 x 0 x y 0
10 7 9 sylan x y y 0 x 0 x y 0
11 10 bicomd x y y 0 x y 0 x 0
12 4 11 sylan9bbr x y y 0 A = x y A 0 x 0
13 nnz y y
14 zmulcl x y x y
15 13 14 sylan2 x y x y
16 15 adantr x y x 0 x y
17 msqznn x x 0 x x
18 17 adantlr x y x 0 x x
19 16 18 jca x y x 0 x y x x
20 19 adantlr x y y 0 x 0 x y x x
21 20 adantlr x y y 0 A = x y x 0 x y x x
22 oveq2 A = x y 1 A = 1 x y
23 divid x x 0 x x = 1
24 23 adantr x x 0 y y 0 x x = 1
25 24 oveq1d x x 0 y y 0 x x x y = 1 x y
26 simpll x x 0 y y 0 x
27 simpl x x 0 y y 0 x x 0
28 simpr x x 0 y y 0 y y 0
29 divdivdiv x x x 0 x x 0 y y 0 x x x y = x y x x
30 26 27 27 28 29 syl22anc x x 0 y y 0 x x x y = x y x x
31 25 30 eqtr3d x x 0 y y 0 1 x y = x y x x
32 31 an4s x y x 0 y 0 1 x y = x y x x
33 7 32 sylan x y x 0 y 0 1 x y = x y x x
34 33 anass1rs x y y 0 x 0 1 x y = x y x x
35 22 34 sylan9eqr x y y 0 x 0 A = x y 1 A = x y x x
36 35 an32s x y y 0 A = x y x 0 1 A = x y x x
37 21 36 jca x y y 0 A = x y x 0 x y x x 1 A = x y x x
38 37 ex x y y 0 A = x y x 0 x y x x 1 A = x y x x
39 12 38 sylbid x y y 0 A = x y A 0 x y x x 1 A = x y x x
40 39 ex x y y 0 A = x y A 0 x y x x 1 A = x y x x
41 40 anasss x y y 0 A = x y A 0 x y x x 1 A = x y x x
42 3 41 sylan2 x y A = x y A 0 x y x x 1 A = x y x x
43 rspceov x y x x 1 A = x y x x z w 1 A = z w
44 43 3expa x y x x 1 A = x y x x z w 1 A = z w
45 elq 1 A z w 1 A = z w
46 44 45 sylibr x y x x 1 A = x y x x 1 A
47 42 46 syl8 x y A = x y A 0 1 A
48 47 rexlimivv x y A = x y A 0 1 A
49 1 48 sylbi A A 0 1 A
50 49 imp A A 0 1 A