Theorem qaddcl 9771

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

Assertion

Ref	Expression
qaddcl	⊢ ((𝐴 ∈ ℚ ∧ 𝐵 ∈ ℚ) → (𝐴 + 𝐵) ∈ ℚ)

Proof of Theorem qaddcl

Dummy variables 𝑥 𝑦 𝑧 𝑤 𝑣 𝑢 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		elq 9758	. 2 ⊢ (𝐴 ∈ ℚ ↔ ∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦))
2		elq 9758	. 2 ⊢ (𝐵 ∈ ℚ ↔ ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤))
3		nnz 9406	. . . . . . . . . . . 12 ⊢ (𝑤 ∈ ℕ → 𝑤 ∈ ℤ)
4		zmulcl 9441	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℤ ∧ 𝑤 ∈ ℤ) → (𝑥 · 𝑤) ∈ ℤ)
5	3, 4	sylan2 286	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℤ ∧ 𝑤 ∈ ℕ) → (𝑥 · 𝑤) ∈ ℤ)
6	5	ad2ant2rl 511	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) → (𝑥 · 𝑤) ∈ ℤ)
7		simpl 109	. . . . . . . . . . 11 ⊢ ((𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ) → 𝑧 ∈ ℤ)
8		nnz 9406	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ℕ → 𝑦 ∈ ℤ)
9	8	adantl 277	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) → 𝑦 ∈ ℤ)
10		zmulcl 9441	. . . . . . . . . . 11 ⊢ ((𝑧 ∈ ℤ ∧ 𝑦 ∈ ℤ) → (𝑧 · 𝑦) ∈ ℤ)
11	7, 9, 10	syl2anr 290	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) → (𝑧 · 𝑦) ∈ ℤ)
12	6, 11	zaddcld 9514	. . . . . . . . 9 ⊢ (((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) → ((𝑥 · 𝑤) + (𝑧 · 𝑦)) ∈ ℤ)
13	12	adantr 276	. . . . . . . 8 ⊢ ((((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤))) → ((𝑥 · 𝑤) + (𝑧 · 𝑦)) ∈ ℤ)
14		nnmulcl 9072	. . . . . . . . . 10 ⊢ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) → (𝑦 · 𝑤) ∈ ℕ)
15	14	ad2ant2l 508	. . . . . . . . 9 ⊢ (((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) → (𝑦 · 𝑤) ∈ ℕ)
16	15	adantr 276	. . . . . . . 8 ⊢ ((((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤))) → (𝑦 · 𝑤) ∈ ℕ)
17		oveq12 5965	. . . . . . . . 9 ⊢ ((𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)) → (𝐴 + 𝐵) = ((𝑥 / 𝑦) + (𝑧 / 𝑤)))
18		zcn 9392	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℤ → 𝑥 ∈ ℂ)
19		zcn 9392	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ℤ → 𝑧 ∈ ℂ)
20	18, 19	anim12i 338	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ) → (𝑥 ∈ ℂ ∧ 𝑧 ∈ ℂ))
21		nncn 9059	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℕ → 𝑦 ∈ ℂ)
22		nnap0 9080	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℕ → 𝑦 # 0)
23	21, 22	jca 306	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ℕ → (𝑦 ∈ ℂ ∧ 𝑦 # 0))
24		nncn 9059	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℕ → 𝑤 ∈ ℂ)
25		nnap0 9080	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℕ → 𝑤 # 0)
26	24, 25	jca 306	. . . . . . . . . . . 12 ⊢ (𝑤 ∈ ℕ → (𝑤 ∈ ℂ ∧ 𝑤 # 0))
27	23, 26	anim12i 338	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) → ((𝑦 ∈ ℂ ∧ 𝑦 # 0) ∧ (𝑤 ∈ ℂ ∧ 𝑤 # 0)))
28		divadddivap 8815	. . . . . . . . . . 11 ⊢ (((𝑥 ∈ ℂ ∧ 𝑧 ∈ ℂ) ∧ ((𝑦 ∈ ℂ ∧ 𝑦 # 0) ∧ (𝑤 ∈ ℂ ∧ 𝑤 # 0))) → ((𝑥 / 𝑦) + (𝑧 / 𝑤)) = (((𝑥 · 𝑤) + (𝑧 · 𝑦)) / (𝑦 · 𝑤)))
29	20, 27, 28	syl2an 289	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ) ∧ (𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ)) → ((𝑥 / 𝑦) + (𝑧 / 𝑤)) = (((𝑥 · 𝑤) + (𝑧 · 𝑦)) / (𝑦 · 𝑤)))
30	29	an4s 588	. . . . . . . . 9 ⊢ (((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) → ((𝑥 / 𝑦) + (𝑧 / 𝑤)) = (((𝑥 · 𝑤) + (𝑧 · 𝑦)) / (𝑦 · 𝑤)))
31	17, 30	sylan9eqr 2261	. . . . . . . 8 ⊢ ((((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤))) → (𝐴 + 𝐵) = (((𝑥 · 𝑤) + (𝑧 · 𝑦)) / (𝑦 · 𝑤)))
32		rspceov 5999	. . . . . . . . 9 ⊢ ((((𝑥 · 𝑤) + (𝑧 · 𝑦)) ∈ ℤ ∧ (𝑦 · 𝑤) ∈ ℕ ∧ (𝐴 + 𝐵) = (((𝑥 · 𝑤) + (𝑧 · 𝑦)) / (𝑦 · 𝑤))) → ∃𝑣 ∈ ℤ ∃𝑢 ∈ ℕ (𝐴 + 𝐵) = (𝑣 / 𝑢))
33		elq 9758	. . . . . . . . 9 ⊢ ((𝐴 + 𝐵) ∈ ℚ ↔ ∃𝑣 ∈ ℤ ∃𝑢 ∈ ℕ (𝐴 + 𝐵) = (𝑣 / 𝑢))
34	32, 33	sylibr 134	. . . . . . . 8 ⊢ ((((𝑥 · 𝑤) + (𝑧 · 𝑦)) ∈ ℤ ∧ (𝑦 · 𝑤) ∈ ℕ ∧ (𝐴 + 𝐵) = (((𝑥 · 𝑤) + (𝑧 · 𝑦)) / (𝑦 · 𝑤))) → (𝐴 + 𝐵) ∈ ℚ)
35	13, 16, 31, 34	syl3anc 1250	. . . . . . 7 ⊢ ((((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤))) → (𝐴 + 𝐵) ∈ ℚ)
36	35	an4s 588	. . . . . 6 ⊢ ((((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ 𝐴 = (𝑥 / 𝑦)) ∧ ((𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ) ∧ 𝐵 = (𝑧 / 𝑤))) → (𝐴 + 𝐵) ∈ ℚ)
37	36	exp43 372	. . . . 5 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) → (𝐴 = (𝑥 / 𝑦) → ((𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ) → (𝐵 = (𝑧 / 𝑤) → (𝐴 + 𝐵) ∈ ℚ))))
38	37	rexlimivv 2630	. . . 4 ⊢ (∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) → ((𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ) → (𝐵 = (𝑧 / 𝑤) → (𝐴 + 𝐵) ∈ ℚ)))
39	38	rexlimdvv 2631	. . 3 ⊢ (∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) → (∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤) → (𝐴 + 𝐵) ∈ ℚ))
40	39	imp 124	. 2 ⊢ ((∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)) → (𝐴 + 𝐵) ∈ ℚ)
41	1, 2, 40	syl2anb 291	1 ⊢ ((𝐴 ∈ ℚ ∧ 𝐵 ∈ ℚ) → (𝐴 + 𝐵) ∈ ℚ)

Syntax hints:   → wi 4   ∧ wa 104   ∧ w3a 981   = wceq 1373   ∈ wcel 2177  ∃wrex 2486   class class class wbr 4050  (class class class)co 5956  ℂcc 7938  0cc0 7940   + caddc 7943   · cmul 7945   # cap 8669   / cdiv 8760  ℕcn 9051  ℤcz 9387  ℚcq 9755

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 711  ax-5 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-13 2179  ax-14 2180  ax-ext 2188  ax-sep 4169  ax-pow 4225  ax-pr 4260  ax-un 4487  ax-setind 4592  ax-cnex 8031  ax-resscn 8032  ax-1cn 8033  ax-1re 8034  ax-icn 8035  ax-addcl 8036  ax-addrcl 8037  ax-mulcl 8038  ax-mulrcl 8039  ax-addcom 8040  ax-mulcom 8041  ax-addass 8042  ax-mulass 8043  ax-distr 8044  ax-i2m1 8045  ax-0lt1 8046  ax-1rid 8047  ax-0id 8048  ax-rnegex 8049  ax-precex 8050  ax-cnre 8051  ax-pre-ltirr 8052  ax-pre-ltwlin 8053  ax-pre-lttrn 8054  ax-pre-apti 8055  ax-pre-ltadd 8056  ax-pre-mulgt0 8057  ax-pre-mulext 8058

This theorem depends on definitions:  df-bi 117  df-3or 982  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2193  df-cleq 2199  df-clel 2202  df-nfc 2338  df-ne 2378  df-nel 2473  df-ral 2490  df-rex 2491  df-reu 2492  df-rmo 2493  df-rab 2494  df-v 2775  df-sbc 3003  df-csb 3098  df-dif 3172  df-un 3174  df-in 3176  df-ss 3183  df-pw 3622  df-sn 3643  df-pr 3644  df-op 3646  df-uni 3856  df-int 3891  df-iun 3934  df-br 4051  df-opab 4113  df-mpt 4114  df-id 4347  df-po 4350  df-iso 4351  df-xp 4688  df-rel 4689  df-cnv 4690  df-co 4691  df-dm 4692  df-rn 4693  df-res 4694  df-ima 4695  df-iota 5240  df-fun 5281  df-fn 5282  df-f 5283  df-fv 5287  df-riota 5911  df-ov 5959  df-oprab 5960  df-mpo 5961  df-1st 6238  df-2nd 6239  df-pnf 8124  df-mnf 8125  df-xr 8126  df-ltxr 8127  df-le 8128  df-sub 8260  df-neg 8261  df-reap 8663  df-ap 8670  df-div 8761  df-inn 9052  df-n0 9311  df-z 9388  df-q 9756

This theorem is referenced by:  qsubcl  9774  qrevaddcl  9780  flqbi2  10451  flqaddz  10457  flqdiv  10483  modqcyc  10521  modqadd1  10523  modqltm1p1mod  10538  modaddmodlo  10550  modsumfzodifsn  10558  addmodlteq  10560  pcaddlem  12732  pcadd2  12734  4sqlem5  12775  4sqlem6  12776  4sqlem10  12780  lgseisen  15621  apdifflemf  16120  apdiff  16122