Users' Mathboxes Mathbox for Steven Nguyen < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  nn0rppwr Structured version   Visualization version   GIF version

Theorem nn0rppwr 38611
Description: If 𝐴 and 𝐵 are relatively prime, then so are 𝐴𝑁 and 𝐵𝑁. rppwr 15764 extended to nonnegative integers. (Contributed by Steven Nguyen, 4-Apr-2023.)
Assertion
Ref Expression
nn0rppwr ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 ∈ ℕ0) → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1))

Proof of Theorem nn0rppwr
StepHypRef Expression
1 elnn0 11709 . 2 (𝑁 ∈ ℕ0 ↔ (𝑁 ∈ ℕ ∨ 𝑁 = 0))
2 elnn0 11709 . . . . 5 (𝐴 ∈ ℕ0 ↔ (𝐴 ∈ ℕ ∨ 𝐴 = 0))
3 elnn0 11709 . . . . 5 (𝐵 ∈ ℕ0 ↔ (𝐵 ∈ ℕ ∨ 𝐵 = 0))
4 rppwr 15764 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1))
543expia 1101 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) → (𝑁 ∈ ℕ → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)))
6 simp1l 1177 . . . . . . . . . . 11 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → 𝐴 = 0)
76oveq1d 6991 . . . . . . . . . 10 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐴𝑁) = (0↑𝑁))
8 0exp 13279 . . . . . . . . . . 11 (𝑁 ∈ ℕ → (0↑𝑁) = 0)
983ad2ant2 1114 . . . . . . . . . 10 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (0↑𝑁) = 0)
107, 9eqtrd 2815 . . . . . . . . 9 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐴𝑁) = 0)
116oveq1d 6991 . . . . . . . . . . . 12 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐴 gcd 𝐵) = (0 gcd 𝐵))
12 simp3 1118 . . . . . . . . . . . 12 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐴 gcd 𝐵) = 1)
13 simp1r 1178 . . . . . . . . . . . . 13 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → 𝐵 ∈ ℕ)
14 nnz 11817 . . . . . . . . . . . . . . 15 (𝐵 ∈ ℕ → 𝐵 ∈ ℤ)
15 gcd0id 15727 . . . . . . . . . . . . . . 15 (𝐵 ∈ ℤ → (0 gcd 𝐵) = (abs‘𝐵))
1614, 15syl 17 . . . . . . . . . . . . . 14 (𝐵 ∈ ℕ → (0 gcd 𝐵) = (abs‘𝐵))
17 nnre 11447 . . . . . . . . . . . . . . 15 (𝐵 ∈ ℕ → 𝐵 ∈ ℝ)
18 0red 10443 . . . . . . . . . . . . . . . 16 (𝐵 ∈ ℕ → 0 ∈ ℝ)
19 nngt0 11471 . . . . . . . . . . . . . . . 16 (𝐵 ∈ ℕ → 0 < 𝐵)
2018, 17, 19ltled 10588 . . . . . . . . . . . . . . 15 (𝐵 ∈ ℕ → 0 ≤ 𝐵)
2117, 20absidd 14643 . . . . . . . . . . . . . 14 (𝐵 ∈ ℕ → (abs‘𝐵) = 𝐵)
2216, 21eqtrd 2815 . . . . . . . . . . . . 13 (𝐵 ∈ ℕ → (0 gcd 𝐵) = 𝐵)
2313, 22syl 17 . . . . . . . . . . . 12 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (0 gcd 𝐵) = 𝐵)
2411, 12, 233eqtr3rd 2824 . . . . . . . . . . 11 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → 𝐵 = 1)
2524oveq1d 6991 . . . . . . . . . 10 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐵𝑁) = (1↑𝑁))
26 nnz 11817 . . . . . . . . . . . 12 (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
27263ad2ant2 1114 . . . . . . . . . . 11 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → 𝑁 ∈ ℤ)
28 1exp 13273 . . . . . . . . . . 11 (𝑁 ∈ ℤ → (1↑𝑁) = 1)
2927, 28syl 17 . . . . . . . . . 10 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (1↑𝑁) = 1)
3025, 29eqtrd 2815 . . . . . . . . 9 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐵𝑁) = 1)
3110, 30oveq12d 6994 . . . . . . . 8 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → ((𝐴𝑁) gcd (𝐵𝑁)) = (0 gcd 1))
32 1z 11825 . . . . . . . . . 10 1 ∈ ℤ
33 gcd0id 15727 . . . . . . . . . 10 (1 ∈ ℤ → (0 gcd 1) = (abs‘1))
3432, 33ax-mp 5 . . . . . . . . 9 (0 gcd 1) = (abs‘1)
35 abs1 14518 . . . . . . . . 9 (abs‘1) = 1
3634, 35eqtri 2803 . . . . . . . 8 (0 gcd 1) = 1
3731, 36syl6eq 2831 . . . . . . 7 (((𝐴 = 0 ∧ 𝐵 ∈ ℕ) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)
38373exp 1099 . . . . . 6 ((𝐴 = 0 ∧ 𝐵 ∈ ℕ) → (𝑁 ∈ ℕ → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)))
39 simp1r 1178 . . . . . . . . . . . . 13 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → 𝐵 = 0)
4039oveq2d 6992 . . . . . . . . . . . 12 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐴 gcd 𝐵) = (𝐴 gcd 0))
41 simp3 1118 . . . . . . . . . . . 12 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐴 gcd 𝐵) = 1)
42 simp1l 1177 . . . . . . . . . . . . . 14 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → 𝐴 ∈ ℕ)
4342nnnn0d 11767 . . . . . . . . . . . . 13 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → 𝐴 ∈ ℕ0)
44 nn0gcdid0 15729 . . . . . . . . . . . . 13 (𝐴 ∈ ℕ0 → (𝐴 gcd 0) = 𝐴)
4543, 44syl 17 . . . . . . . . . . . 12 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐴 gcd 0) = 𝐴)
4640, 41, 453eqtr3rd 2824 . . . . . . . . . . 11 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → 𝐴 = 1)
4746oveq1d 6991 . . . . . . . . . 10 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐴𝑁) = (1↑𝑁))
48263ad2ant2 1114 . . . . . . . . . . 11 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → 𝑁 ∈ ℤ)
4948, 28syl 17 . . . . . . . . . 10 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (1↑𝑁) = 1)
5047, 49eqtrd 2815 . . . . . . . . 9 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐴𝑁) = 1)
5139oveq1d 6991 . . . . . . . . . 10 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐵𝑁) = (0↑𝑁))
5283ad2ant2 1114 . . . . . . . . . 10 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (0↑𝑁) = 0)
5351, 52eqtrd 2815 . . . . . . . . 9 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (𝐵𝑁) = 0)
5450, 53oveq12d 6994 . . . . . . . 8 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → ((𝐴𝑁) gcd (𝐵𝑁)) = (1 gcd 0))
55 1nn0 11725 . . . . . . . . 9 1 ∈ ℕ0
56 nn0gcdid0 15729 . . . . . . . . 9 (1 ∈ ℕ0 → (1 gcd 0) = 1)
5755, 56mp1i 13 . . . . . . . 8 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → (1 gcd 0) = 1)
5854, 57eqtrd 2815 . . . . . . 7 (((𝐴 ∈ ℕ ∧ 𝐵 = 0) ∧ 𝑁 ∈ ℕ ∧ (𝐴 gcd 𝐵) = 1) → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)
59583exp 1099 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 = 0) → (𝑁 ∈ ℕ → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)))
60 oveq12 6985 . . . . . . . . . 10 ((𝐴 = 0 ∧ 𝐵 = 0) → (𝐴 gcd 𝐵) = (0 gcd 0))
61 gcd0val 15706 . . . . . . . . . . . 12 (0 gcd 0) = 0
62 0ne1 11511 . . . . . . . . . . . 12 0 ≠ 1
6361, 62eqnetri 3038 . . . . . . . . . . 11 (0 gcd 0) ≠ 1
6463a1i 11 . . . . . . . . . 10 ((𝐴 = 0 ∧ 𝐵 = 0) → (0 gcd 0) ≠ 1)
6560, 64eqnetrd 3035 . . . . . . . . 9 ((𝐴 = 0 ∧ 𝐵 = 0) → (𝐴 gcd 𝐵) ≠ 1)
6665neneqd 2973 . . . . . . . 8 ((𝐴 = 0 ∧ 𝐵 = 0) → ¬ (𝐴 gcd 𝐵) = 1)
6766pm2.21d 119 . . . . . . 7 ((𝐴 = 0 ∧ 𝐵 = 0) → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1))
6867a1d 25 . . . . . 6 ((𝐴 = 0 ∧ 𝐵 = 0) → (𝑁 ∈ ℕ → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)))
695, 38, 59, 68ccase 1018 . . . . 5 (((𝐴 ∈ ℕ ∨ 𝐴 = 0) ∧ (𝐵 ∈ ℕ ∨ 𝐵 = 0)) → (𝑁 ∈ ℕ → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)))
702, 3, 69syl2anb 588 . . . 4 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0) → (𝑁 ∈ ℕ → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)))
71 oveq2 6984 . . . . . . . . . 10 (𝑁 = 0 → (𝐴𝑁) = (𝐴↑0))
72713ad2ant3 1115 . . . . . . . . 9 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → (𝐴𝑁) = (𝐴↑0))
73 nn0cn 11718 . . . . . . . . . . 11 (𝐴 ∈ ℕ0𝐴 ∈ ℂ)
74733ad2ant1 1113 . . . . . . . . . 10 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → 𝐴 ∈ ℂ)
7574exp0d 13319 . . . . . . . . 9 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → (𝐴↑0) = 1)
7672, 75eqtrd 2815 . . . . . . . 8 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → (𝐴𝑁) = 1)
77 oveq2 6984 . . . . . . . . . 10 (𝑁 = 0 → (𝐵𝑁) = (𝐵↑0))
78773ad2ant3 1115 . . . . . . . . 9 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → (𝐵𝑁) = (𝐵↑0))
79 nn0cn 11718 . . . . . . . . . . 11 (𝐵 ∈ ℕ0𝐵 ∈ ℂ)
80793ad2ant2 1114 . . . . . . . . . 10 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → 𝐵 ∈ ℂ)
8180exp0d 13319 . . . . . . . . 9 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → (𝐵↑0) = 1)
8278, 81eqtrd 2815 . . . . . . . 8 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → (𝐵𝑁) = 1)
8376, 82oveq12d 6994 . . . . . . 7 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → ((𝐴𝑁) gcd (𝐵𝑁)) = (1 gcd 1))
84 1gcd 15741 . . . . . . . 8 (1 ∈ ℤ → (1 gcd 1) = 1)
8532, 84mp1i 13 . . . . . . 7 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → (1 gcd 1) = 1)
8683, 85eqtrd 2815 . . . . . 6 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 = 0) → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)
87863expia 1101 . . . . 5 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0) → (𝑁 = 0 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1))
8887a1dd 50 . . . 4 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0) → (𝑁 = 0 → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)))
8970, 88jaod 845 . . 3 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0) → ((𝑁 ∈ ℕ ∨ 𝑁 = 0) → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1)))
90893impia 1097 . 2 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0 ∧ (𝑁 ∈ ℕ ∨ 𝑁 = 0)) → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1))
911, 90syl3an3b 1385 1 ((𝐴 ∈ ℕ0𝐵 ∈ ℕ0𝑁 ∈ ℕ0) → ((𝐴 gcd 𝐵) = 1 → ((𝐴𝑁) gcd (𝐵𝑁)) = 1))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 387  wo 833  w3a 1068   = wceq 1507  wcel 2050  wne 2968  cfv 6188  (class class class)co 6976  cc 10333  0cc0 10335  1c1 10336  cn 11439  0cn0 11707  cz 11793  cexp 13244  abscabs 14454   gcd cgcd 15703
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1758  ax-4 1772  ax-5 1869  ax-6 1928  ax-7 1965  ax-8 2052  ax-9 2059  ax-10 2079  ax-11 2093  ax-12 2106  ax-13 2301  ax-ext 2751  ax-sep 5060  ax-nul 5067  ax-pow 5119  ax-pr 5186  ax-un 7279  ax-cnex 10391  ax-resscn 10392  ax-1cn 10393  ax-icn 10394  ax-addcl 10395  ax-addrcl 10396  ax-mulcl 10397  ax-mulrcl 10398  ax-mulcom 10399  ax-addass 10400  ax-mulass 10401  ax-distr 10402  ax-i2m1 10403  ax-1ne0 10404  ax-1rid 10405  ax-rnegex 10406  ax-rrecex 10407  ax-cnre 10408  ax-pre-lttri 10409  ax-pre-lttrn 10410  ax-pre-ltadd 10411  ax-pre-mulgt0 10412  ax-pre-sup 10413
This theorem depends on definitions:  df-bi 199  df-an 388  df-or 834  df-3or 1069  df-3an 1070  df-tru 1510  df-ex 1743  df-nf 1747  df-sb 2016  df-mo 2547  df-eu 2584  df-clab 2760  df-cleq 2772  df-clel 2847  df-nfc 2919  df-ne 2969  df-nel 3075  df-ral 3094  df-rex 3095  df-reu 3096  df-rmo 3097  df-rab 3098  df-v 3418  df-sbc 3683  df-csb 3788  df-dif 3833  df-un 3835  df-in 3837  df-ss 3844  df-pss 3846  df-nul 4180  df-if 4351  df-pw 4424  df-sn 4442  df-pr 4444  df-tp 4446  df-op 4448  df-uni 4713  df-iun 4794  df-br 4930  df-opab 4992  df-mpt 5009  df-tr 5031  df-id 5312  df-eprel 5317  df-po 5326  df-so 5327  df-fr 5366  df-we 5368  df-xp 5413  df-rel 5414  df-cnv 5415  df-co 5416  df-dm 5417  df-rn 5418  df-res 5419  df-ima 5420  df-pred 5986  df-ord 6032  df-on 6033  df-lim 6034  df-suc 6035  df-iota 6152  df-fun 6190  df-fn 6191  df-f 6192  df-f1 6193  df-fo 6194  df-f1o 6195  df-fv 6196  df-riota 6937  df-ov 6979  df-oprab 6980  df-mpo 6981  df-om 7397  df-2nd 7502  df-wrecs 7750  df-recs 7812  df-rdg 7850  df-er 8089  df-en 8307  df-dom 8308  df-sdom 8309  df-sup 8701  df-inf 8702  df-pnf 10476  df-mnf 10477  df-xr 10478  df-ltxr 10479  df-le 10480  df-sub 10672  df-neg 10673  df-div 11099  df-nn 11440  df-2 11503  df-3 11504  df-n0 11708  df-z 11794  df-uz 12059  df-rp 12205  df-fl 12977  df-mod 13053  df-seq 13185  df-exp 13245  df-cj 14319  df-re 14320  df-im 14321  df-sqrt 14455  df-abs 14456  df-dvds 15468  df-gcd 15704
This theorem is referenced by:  expgcd  38612
  Copyright terms: Public domain W3C validator