Metamath Proof Explorer


Theorem qaddcl

Description: Closure of addition of rationals. (Contributed by NM, 1-Aug-2004)

Ref Expression
Assertion qaddcl ABA+B

Proof

Step Hyp Ref Expression
1 elq AxyA=xy
2 elq BzwB=zw
3 nnz ww
4 zmulcl xwxw
5 3 4 sylan2 xwxw
6 5 ad2ant2rl xyzwxw
7 simpl zwz
8 nnz yy
9 8 adantl xyy
10 zmulcl zyzy
11 7 9 10 syl2anr xyzwzy
12 6 11 zaddcld xyzwxw+zy
13 12 adantr xyzwA=xyB=zwxw+zy
14 nnmulcl ywyw
15 14 ad2ant2l xyzwyw
16 15 adantr xyzwA=xyB=zwyw
17 oveq12 A=xyB=zwA+B=xy+zw
18 zcn xx
19 zcn zz
20 18 19 anim12i xzxz
21 nncn yy
22 nnne0 yy0
23 21 22 jca yyy0
24 nncn ww
25 nnne0 ww0
26 24 25 jca www0
27 23 26 anim12i ywyy0ww0
28 divadddiv xzyy0ww0xy+zw=xw+zyyw
29 20 27 28 syl2an xzywxy+zw=xw+zyyw
30 29 an4s xyzwxy+zw=xw+zyyw
31 17 30 sylan9eqr xyzwA=xyB=zwA+B=xw+zyyw
32 rspceov xw+zyywA+B=xw+zyywuvA+B=uv
33 elq A+BuvA+B=uv
34 32 33 sylibr xw+zyywA+B=xw+zyywA+B
35 13 16 31 34 syl3anc xyzwA=xyB=zwA+B
36 35 an4s xyA=xyzwB=zwA+B
37 36 exp43 xyA=xyzwB=zwA+B
38 37 rexlimivv xyA=xyzwB=zwA+B
39 38 rexlimdvv xyA=xyzwB=zwA+B
40 39 imp xyA=xyzwB=zwA+B
41 1 2 40 syl2anb ABA+B