![]() |
Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
|
Mirrors > Home > MPE Home > Th. List > dvdssqlem | Structured version Visualization version GIF version |
Description: Lemma for dvdssq 16451. (Contributed by Scott Fenton, 18-Apr-2014.) (Revised by Mario Carneiro, 19-Apr-2014.) |
Ref | Expression |
---|---|
dvdssqlem | ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ∥ 𝑁 ↔ (𝑀↑2) ∥ (𝑁↑2))) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | nnz 12528 | . . 3 ⊢ (𝑀 ∈ ℕ → 𝑀 ∈ ℤ) | |
2 | nnz 12528 | . . 3 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ) | |
3 | dvdssqim 16443 | . . 3 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∥ 𝑁 → (𝑀↑2) ∥ (𝑁↑2))) | |
4 | 1, 2, 3 | syl2an 597 | . 2 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ∥ 𝑁 → (𝑀↑2) ∥ (𝑁↑2))) |
5 | sqgcd 16449 | . . . . . . 7 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 gcd 𝑁)↑2) = ((𝑀↑2) gcd (𝑁↑2))) | |
6 | 5 | adantr 482 | . . . . . 6 ⊢ (((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑀↑2) ∥ (𝑁↑2)) → ((𝑀 gcd 𝑁)↑2) = ((𝑀↑2) gcd (𝑁↑2))) |
7 | nnsqcl 14042 | . . . . . . . 8 ⊢ (𝑀 ∈ ℕ → (𝑀↑2) ∈ ℕ) | |
8 | nnsqcl 14042 | . . . . . . . 8 ⊢ (𝑁 ∈ ℕ → (𝑁↑2) ∈ ℕ) | |
9 | gcdeq 16442 | . . . . . . . 8 ⊢ (((𝑀↑2) ∈ ℕ ∧ (𝑁↑2) ∈ ℕ) → (((𝑀↑2) gcd (𝑁↑2)) = (𝑀↑2) ↔ (𝑀↑2) ∥ (𝑁↑2))) | |
10 | 7, 8, 9 | syl2an 597 | . . . . . . 7 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝑀↑2) gcd (𝑁↑2)) = (𝑀↑2) ↔ (𝑀↑2) ∥ (𝑁↑2))) |
11 | 10 | biimpar 479 | . . . . . 6 ⊢ (((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑀↑2) ∥ (𝑁↑2)) → ((𝑀↑2) gcd (𝑁↑2)) = (𝑀↑2)) |
12 | 6, 11 | eqtrd 2773 | . . . . 5 ⊢ (((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑀↑2) ∥ (𝑁↑2)) → ((𝑀 gcd 𝑁)↑2) = (𝑀↑2)) |
13 | gcdcl 16394 | . . . . . . . . 9 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd 𝑁) ∈ ℕ0) | |
14 | 1, 2, 13 | syl2an 597 | . . . . . . . 8 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 gcd 𝑁) ∈ ℕ0) |
15 | 14 | nn0red 12482 | . . . . . . 7 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 gcd 𝑁) ∈ ℝ) |
16 | 14 | nn0ge0d 12484 | . . . . . . 7 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 0 ≤ (𝑀 gcd 𝑁)) |
17 | nnre 12168 | . . . . . . . 8 ⊢ (𝑀 ∈ ℕ → 𝑀 ∈ ℝ) | |
18 | 17 | adantr 482 | . . . . . . 7 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℝ) |
19 | nnnn0 12428 | . . . . . . . . 9 ⊢ (𝑀 ∈ ℕ → 𝑀 ∈ ℕ0) | |
20 | 19 | nn0ge0d 12484 | . . . . . . . 8 ⊢ (𝑀 ∈ ℕ → 0 ≤ 𝑀) |
21 | 20 | adantr 482 | . . . . . . 7 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 0 ≤ 𝑀) |
22 | sq11 14045 | . . . . . . 7 ⊢ ((((𝑀 gcd 𝑁) ∈ ℝ ∧ 0 ≤ (𝑀 gcd 𝑁)) ∧ (𝑀 ∈ ℝ ∧ 0 ≤ 𝑀)) → (((𝑀 gcd 𝑁)↑2) = (𝑀↑2) ↔ (𝑀 gcd 𝑁) = 𝑀)) | |
23 | 15, 16, 18, 21, 22 | syl22anc 838 | . . . . . 6 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((𝑀 gcd 𝑁)↑2) = (𝑀↑2) ↔ (𝑀 gcd 𝑁) = 𝑀)) |
24 | 23 | adantr 482 | . . . . 5 ⊢ (((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑀↑2) ∥ (𝑁↑2)) → (((𝑀 gcd 𝑁)↑2) = (𝑀↑2) ↔ (𝑀 gcd 𝑁) = 𝑀)) |
25 | 12, 24 | mpbid 231 | . . . 4 ⊢ (((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑀↑2) ∥ (𝑁↑2)) → (𝑀 gcd 𝑁) = 𝑀) |
26 | gcddvds 16391 | . . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ 𝑁)) | |
27 | 1, 2, 26 | syl2an 597 | . . . . . 6 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ 𝑁)) |
28 | 27 | adantr 482 | . . . . 5 ⊢ (((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑀↑2) ∥ (𝑁↑2)) → ((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ 𝑁)) |
29 | 28 | simprd 497 | . . . 4 ⊢ (((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑀↑2) ∥ (𝑁↑2)) → (𝑀 gcd 𝑁) ∥ 𝑁) |
30 | 25, 29 | eqbrtrrd 5133 | . . 3 ⊢ (((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑀↑2) ∥ (𝑁↑2)) → 𝑀 ∥ 𝑁) |
31 | 30 | ex 414 | . 2 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀↑2) ∥ (𝑁↑2) → 𝑀 ∥ 𝑁)) |
32 | 4, 31 | impbid 211 | 1 ⊢ ((𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ∥ 𝑁 ↔ (𝑀↑2) ∥ (𝑁↑2))) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ↔ wb 205 ∧ wa 397 = wceq 1542 ∈ wcel 2107 class class class wbr 5109 (class class class)co 7361 ℝcr 11058 0cc0 11059 ≤ cle 11198 ℕcn 12161 2c2 12216 ℕ0cn0 12421 ℤcz 12507 ↑cexp 13976 ∥ cdvds 16144 gcd cgcd 16382 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-sep 5260 ax-nul 5267 ax-pow 5324 ax-pr 5388 ax-un 7676 ax-cnex 11115 ax-resscn 11116 ax-1cn 11117 ax-icn 11118 ax-addcl 11119 ax-addrcl 11120 ax-mulcl 11121 ax-mulrcl 11122 ax-mulcom 11123 ax-addass 11124 ax-mulass 11125 ax-distr 11126 ax-i2m1 11127 ax-1ne0 11128 ax-1rid 11129 ax-rnegex 11130 ax-rrecex 11131 ax-cnre 11132 ax-pre-lttri 11133 ax-pre-lttrn 11134 ax-pre-ltadd 11135 ax-pre-mulgt0 11136 ax-pre-sup 11137 |
This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2941 df-nel 3047 df-ral 3062 df-rex 3071 df-rmo 3352 df-reu 3353 df-rab 3407 df-v 3449 df-sbc 3744 df-csb 3860 df-dif 3917 df-un 3919 df-in 3921 df-ss 3931 df-pss 3933 df-nul 4287 df-if 4491 df-pw 4566 df-sn 4591 df-pr 4593 df-op 4597 df-uni 4870 df-iun 4960 df-br 5110 df-opab 5172 df-mpt 5193 df-tr 5227 df-id 5535 df-eprel 5541 df-po 5549 df-so 5550 df-fr 5592 df-we 5594 df-xp 5643 df-rel 5644 df-cnv 5645 df-co 5646 df-dm 5647 df-rn 5648 df-res 5649 df-ima 5650 df-pred 6257 df-ord 6324 df-on 6325 df-lim 6326 df-suc 6327 df-iota 6452 df-fun 6502 df-fn 6503 df-f 6504 df-f1 6505 df-fo 6506 df-f1o 6507 df-fv 6508 df-riota 7317 df-ov 7364 df-oprab 7365 df-mpo 7366 df-om 7807 df-2nd 7926 df-frecs 8216 df-wrecs 8247 df-recs 8321 df-rdg 8360 df-er 8654 df-en 8890 df-dom 8891 df-sdom 8892 df-sup 9386 df-inf 9387 df-pnf 11199 df-mnf 11200 df-xr 11201 df-ltxr 11202 df-le 11203 df-sub 11395 df-neg 11396 df-div 11821 df-nn 12162 df-2 12224 df-3 12225 df-n0 12422 df-z 12508 df-uz 12772 df-rp 12924 df-fl 13706 df-mod 13784 df-seq 13916 df-exp 13977 df-cj 14993 df-re 14994 df-im 14995 df-sqrt 15129 df-abs 15130 df-dvds 16145 df-gcd 16383 |
This theorem is referenced by: dvdssq 16451 muval1 26505 fltabcoprm 41027 |
Copyright terms: Public domain | W3C validator |