Theorem qmulcl 10020

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

Assertion

Ref	Expression
qmulcl	⊢ ((𝐴 ∈ ℚ ∧ 𝐵 ∈ ℚ) → (𝐴 · 𝐵) ∈ ℚ)

Proof of Theorem qmulcl

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

Step	Hyp	Ref	Expression
1		elq 10005	. 2 ⊢ (𝐴 ∈ ℚ ↔ ∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦))
2		elq 10005	. 2 ⊢ (𝐵 ∈ ℚ ↔ ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤))
3		zmulcl 9681	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ) → (𝑥 · 𝑧) ∈ ℤ)
4		nnmulcl 9308	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) → (𝑦 · 𝑤) ∈ ℕ)
5	3, 4	anim12i 338	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ) ∧ (𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ)) → ((𝑥 · 𝑧) ∈ ℤ ∧ (𝑦 · 𝑤) ∈ ℕ))
6	5	an4s 596	. . . . . . . . 9 ⊢ (((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) → ((𝑥 · 𝑧) ∈ ℤ ∧ (𝑦 · 𝑤) ∈ ℕ))
7	6	adantr 276	. . . . . . . 8 ⊢ ((((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤))) → ((𝑥 · 𝑧) ∈ ℤ ∧ (𝑦 · 𝑤) ∈ ℕ))
8		oveq12 6088	. . . . . . . . 9 ⊢ ((𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)) → (𝐴 · 𝐵) = ((𝑥 / 𝑦) · (𝑧 / 𝑤)))
9		zcn 9632	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℤ → 𝑥 ∈ ℂ)
10		zcn 9632	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ℤ → 𝑧 ∈ ℂ)
11	9, 10	anim12i 338	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ) → (𝑥 ∈ ℂ ∧ 𝑧 ∈ ℂ))
12	11	ad2ant2r 513	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) → (𝑥 ∈ ℂ ∧ 𝑧 ∈ ℂ))
13		nncn 9295	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℕ → 𝑦 ∈ ℂ)
14		nnap0 9316	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℕ → 𝑦 # 0)
15	13, 14	jca 306	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ℕ → (𝑦 ∈ ℂ ∧ 𝑦 # 0))
16		nncn 9295	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℕ → 𝑤 ∈ ℂ)
17		nnap0 9316	. . . . . . . . . . . . 13 ⊢ (𝑤 ∈ ℕ → 𝑤 # 0)
18	16, 17	jca 306	. . . . . . . . . . . 12 ⊢ (𝑤 ∈ ℕ → (𝑤 ∈ ℂ ∧ 𝑤 # 0))
19	15, 18	anim12i 338	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) → ((𝑦 ∈ ℂ ∧ 𝑦 # 0) ∧ (𝑤 ∈ ℂ ∧ 𝑤 # 0)))
20	19	ad2ant2l 512	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) → ((𝑦 ∈ ℂ ∧ 𝑦 # 0) ∧ (𝑤 ∈ ℂ ∧ 𝑤 # 0)))
21		divmuldivap 9036	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℂ ∧ 𝑧 ∈ ℂ) ∧ ((𝑦 ∈ ℂ ∧ 𝑦 # 0) ∧ (𝑤 ∈ ℂ ∧ 𝑤 # 0))) → ((𝑥 / 𝑦) · (𝑧 / 𝑤)) = ((𝑥 · 𝑧) / (𝑦 · 𝑤)))
22	12, 20, 21	syl2anc 415	. . . . . . . . 9 ⊢ (((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) → ((𝑥 / 𝑦) · (𝑧 / 𝑤)) = ((𝑥 · 𝑧) / (𝑦 · 𝑤)))
23	8, 22	sylan9eqr 2293	. . . . . . . 8 ⊢ ((((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤))) → (𝐴 · 𝐵) = ((𝑥 · 𝑧) / (𝑦 · 𝑤)))
24		rspceov 6122	. . . . . . . . . 10 ⊢ (((𝑥 · 𝑧) ∈ ℤ ∧ (𝑦 · 𝑤) ∈ ℕ ∧ (𝐴 · 𝐵) = ((𝑥 · 𝑧) / (𝑦 · 𝑤))) → ∃𝑣 ∈ ℤ ∃𝑢 ∈ ℕ (𝐴 · 𝐵) = (𝑣 / 𝑢))
25	24	3expa 1234	. . . . . . . . 9 ⊢ ((((𝑥 · 𝑧) ∈ ℤ ∧ (𝑦 · 𝑤) ∈ ℕ) ∧ (𝐴 · 𝐵) = ((𝑥 · 𝑧) / (𝑦 · 𝑤))) → ∃𝑣 ∈ ℤ ∃𝑢 ∈ ℕ (𝐴 · 𝐵) = (𝑣 / 𝑢))
26		elq 10005	. . . . . . . . 9 ⊢ ((𝐴 · 𝐵) ∈ ℚ ↔ ∃𝑣 ∈ ℤ ∃𝑢 ∈ ℕ (𝐴 · 𝐵) = (𝑣 / 𝑢))
27	25, 26	sylibr 134	. . . . . . . 8 ⊢ ((((𝑥 · 𝑧) ∈ ℤ ∧ (𝑦 · 𝑤) ∈ ℕ) ∧ (𝐴 · 𝐵) = ((𝑥 · 𝑧) / (𝑦 · 𝑤))) → (𝐴 · 𝐵) ∈ ℚ)
28	7, 23, 27	syl2anc 415	. . . . . . 7 ⊢ ((((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ (𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ)) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤))) → (𝐴 · 𝐵) ∈ ℚ)
29	28	an4s 596	. . . . . 6 ⊢ ((((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) ∧ 𝐴 = (𝑥 / 𝑦)) ∧ ((𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ) ∧ 𝐵 = (𝑧 / 𝑤))) → (𝐴 · 𝐵) ∈ ℚ)
30	29	exp43 372	. . . . 5 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℕ) → (𝐴 = (𝑥 / 𝑦) → ((𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ) → (𝐵 = (𝑧 / 𝑤) → (𝐴 · 𝐵) ∈ ℚ))))
31	30	rexlimivv 2674	. . . 4 ⊢ (∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) → ((𝑧 ∈ ℤ ∧ 𝑤 ∈ ℕ) → (𝐵 = (𝑧 / 𝑤) → (𝐴 · 𝐵) ∈ ℚ)))
32	31	rexlimdvv 2675	. . 3 ⊢ (∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) → (∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤) → (𝐴 · 𝐵) ∈ ℚ))
33	32	imp 124	. 2 ⊢ ((∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)) → (𝐴 · 𝐵) ∈ ℚ)
34	1, 2, 33	syl2anb 291	1 ⊢ ((𝐴 ∈ ℚ ∧ 𝐵 ∈ ℚ) → (𝐴 · 𝐵) ∈ ℚ)

Syntax hints:   → wi 4   ∧ wa 104   = wceq 1402   ∈ wcel 2209  ∃wrex 2529   class class class wbr 4128  (class class class)co 6079  ℂcc 8171  0cc0 8173   · cmul 8178   # cap 8903   / cdiv 8996  ℕcn 9287  ℤcz 9627  ℚcq 10002

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 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-sep 4247  ax-pow 4309  ax-pr 4344  ax-un 4576  ax-setind 4682  ax-cnex 8264  ax-resscn 8265  ax-1cn 8266  ax-1re 8267  ax-icn 8268  ax-addcl 8269  ax-addrcl 8270  ax-mulcl 8271  ax-mulrcl 8272  ax-addcom 8273  ax-mulcom 8274  ax-addass 8275  ax-mulass 8276  ax-distr 8277  ax-i2m1 8278  ax-0lt1 8279  ax-1rid 8280  ax-0id 8281  ax-rnegex 8282  ax-precex 8283  ax-cnre 8284  ax-pre-ltirr 8285  ax-pre-ltwlin 8286  ax-pre-lttrn 8287  ax-pre-apti 8288  ax-pre-ltadd 8289  ax-pre-mulgt0 8290  ax-pre-mulext 8291

This theorem depends on definitions:  df-bi 117  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-pw 3690  df-sn 3714  df-pr 3715  df-op 3717  df-uni 3934  df-int 3969  df-iun 4012  df-br 4129  df-opab 4191  df-mpt 4192  df-id 4436  df-po 4439  df-iso 4440  df-xp 4778  df-rel 4779  df-cnv 4780  df-co 4781  df-dm 4782  df-rn 4783  df-res 4784  df-ima 4785  df-iota 5335  df-fun 5377  df-fn 5378  df-f 5379  df-fv 5383  df-riota 6032  df-ov 6082  df-oprab 6083  df-mpo 6084  df-1st 6368  df-2nd 6369  df-pnf 8356  df-mnf 8357  df-xr 8358  df-ltxr 8359  df-le 8360  df-sub 8493  df-neg 8494  df-reap 8897  df-ap 8904  df-div 8997  df-inn 9288  df-n0 9547  df-z 9628  df-q 10003

This theorem is referenced by:  qdivcl  10026  flqmulnn0  10717  modqcl  10746  mulqmod0  10750  modqmulnn  10762  modqcyc  10779  mulp1mod1  10785  modqmul1  10797  q2txmodxeq0  10804  modqaddmulmod  10811  modqdi  10812  modqsubdir  10813  qexpcl  10975  qexpclz  10980  qsqcl  11031  dvdslelemd  12593  crth  12985  pcaddlem  13101  lgseisenlem4  16175  lgseisen  16176  lgsquadlem1  16179  lgsquadlem2  16180  apdifflemr  17070  apdiff  17071