Metamath Proof Explorer


Theorem dvdsprmpweqle

Description: If a positive integer divides a prime power, it is a prime power with a smaller exponent. (Contributed by AV, 25-Jul-2021)

Ref Expression
Assertion dvdsprmpweqle ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → A ∥ P N → ∃ n ∈ ℕ 0 n ≤ N ∧ A = P n

Proof

Step Hyp Ref Expression
1 dvdsprmpweq ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → A ∥ P N → ∃ n ∈ ℕ 0 A = P n
2 1 imp ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N → ∃ n ∈ ℕ 0 A = P n
3 nn0re ⊢ N ∈ ℕ 0 → N ∈ ℝ
4 3 3ad2ant3 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → N ∈ ℝ
5 4 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N → N ∈ ℝ
6 nn0re ⊢ n ∈ ℕ 0 → n ∈ ℝ
7 5 6 anim12ci ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 → n ∈ ℝ ∧ N ∈ ℝ
8 7 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 ∧ A = P n → n ∈ ℝ ∧ N ∈ ℝ
9 lelttric ⊢ n ∈ ℝ ∧ N ∈ ℝ → n ≤ N ∨ N < n
10 8 9 syl ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 ∧ A = P n → n ≤ N ∨ N < n
11 breq1 ⊢ A = P n → A ∥ P N ↔ P n ∥ P N
12 11 adantl ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ A = P n → A ∥ P N ↔ P n ∥ P N
13 prmnn ⊢ P ∈ ℙ → P ∈ ℕ
14 13 nnnn0d ⊢ P ∈ ℙ → P ∈ ℕ 0
15 14 3ad2ant1 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → P ∈ ℕ 0
16 15 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P ∈ ℕ 0
17 simpr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → n ∈ ℕ 0
18 16 17 nn0expcld ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P n ∈ ℕ 0
19 18 nn0zd ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P n ∈ ℤ
20 13 nncnd ⊢ P ∈ ℙ → P ∈ ℂ
21 20 3ad2ant1 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → P ∈ ℂ
22 21 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P ∈ ℂ
23 13 nnne0d ⊢ P ∈ ℙ → P ≠ 0
24 23 3ad2ant1 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → P ≠ 0
25 24 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P ≠ 0
26 nn0z ⊢ n ∈ ℕ 0 → n ∈ ℤ
27 26 adantl ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → n ∈ ℤ
28 22 25 27 expne0d ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P n ≠ 0
29 simp3 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → N ∈ ℕ 0
30 29 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → N ∈ ℕ 0
31 16 30 nn0expcld ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P N ∈ ℕ 0
32 31 nn0zd ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P N ∈ ℤ
33 dvdsval2 ⊢ P n ∈ ℤ ∧ P n ≠ 0 ∧ P N ∈ ℤ → P n ∥ P N ↔ P N P n ∈ ℤ
34 19 28 32 33 syl3anc ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P n ∥ P N ↔ P N P n ∈ ℤ
35 20 23 jca ⊢ P ∈ ℙ → P ∈ ℂ ∧ P ≠ 0
36 35 3ad2ant1 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → P ∈ ℂ ∧ P ≠ 0
37 nn0z ⊢ N ∈ ℕ 0 → N ∈ ℤ
38 37 3ad2ant3 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → N ∈ ℤ
39 38 26 anim12i ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → N ∈ ℤ ∧ n ∈ ℤ
40 expsub ⊢ P ∈ ℂ ∧ P ≠ 0 ∧ N ∈ ℤ ∧ n ∈ ℤ → P N − n = P N P n
41 40 eqcomd ⊢ P ∈ ℂ ∧ P ≠ 0 ∧ N ∈ ℤ ∧ n ∈ ℤ → P N P n = P N − n
42 36 39 41 syl2an2r ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P N P n = P N − n
43 42 eleq1d ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P N P n ∈ ℤ ↔ P N − n ∈ ℤ
44 22 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → P ∈ ℂ
45 nn0cn ⊢ N ∈ ℕ 0 → N ∈ ℂ
46 45 3ad2ant3 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → N ∈ ℂ
47 46 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → N ∈ ℂ
48 nn0cn ⊢ n ∈ ℕ 0 → n ∈ ℂ
49 48 adantl ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → n ∈ ℂ
50 47 49 subcld ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → N − n ∈ ℂ
51 50 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → N − n ∈ ℂ
52 46 48 anim12i ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → N ∈ ℂ ∧ n ∈ ℂ
53 52 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → N ∈ ℂ ∧ n ∈ ℂ
54 negsubdi2 ⊢ N ∈ ℂ ∧ n ∈ ℂ → − N − n = n − N
55 53 54 syl ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → − N − n = n − N
56 29 anim1ci ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → n ∈ ℕ 0 ∧ N ∈ ℕ 0
57 ltsubnn0 ⊢ n ∈ ℕ 0 ∧ N ∈ ℕ 0 → N < n → n − N ∈ ℕ 0
58 56 57 syl ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → N < n → n − N ∈ ℕ 0
59 58 imp ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → n − N ∈ ℕ 0
60 55 59 eqeltrd ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → − N − n ∈ ℕ 0
61 expneg2 ⊢ P ∈ ℂ ∧ N − n ∈ ℂ ∧ − N − n ∈ ℕ 0 → P N − n = 1 P − N − n
62 44 51 60 61 syl3anc ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → P N − n = 1 P − N − n
63 62 eleq1d ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → P N − n ∈ ℤ ↔ 1 P − N − n ∈ ℤ
64 13 nnred ⊢ P ∈ ℙ → P ∈ ℝ
65 64 3ad2ant1 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → P ∈ ℝ
66 65 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P ∈ ℝ
67 66 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → P ∈ ℝ
68 67 59 reexpcld ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → P n − N ∈ ℝ
69 znnsub ⊢ N ∈ ℤ ∧ n ∈ ℤ → N < n ↔ n − N ∈ ℕ
70 39 69 syl ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → N < n ↔ n − N ∈ ℕ
71 70 biimpa ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → n − N ∈ ℕ
72 prmgt1 ⊢ P ∈ ℙ → 1 < P
73 72 3ad2ant1 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → 1 < P
74 73 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → 1 < P
75 74 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → 1 < P
76 expgt1 ⊢ P ∈ ℝ ∧ n − N ∈ ℕ ∧ 1 < P → 1 < P n − N
77 67 71 75 76 syl3anc ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → 1 < P n − N
78 68 77 jca ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → P n − N ∈ ℝ ∧ 1 < P n − N
79 oveq2 ⊢ − N − n = n − N → P − N − n = P n − N
80 79 eleq1d ⊢ − N − n = n − N → P − N − n ∈ ℝ ↔ P n − N ∈ ℝ
81 79 breq2d ⊢ − N − n = n − N → 1 < P − N − n ↔ 1 < P n − N
82 80 81 anbi12d ⊢ − N − n = n − N → P − N − n ∈ ℝ ∧ 1 < P − N − n ↔ P n − N ∈ ℝ ∧ 1 < P n − N
83 78 82 syl5ibrcom ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → − N − n = n − N → P − N − n ∈ ℝ ∧ 1 < P − N − n
84 55 83 mpd ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → P − N − n ∈ ℝ ∧ 1 < P − N − n
85 recnz ⊢ P − N − n ∈ ℝ ∧ 1 < P − N − n → ¬ 1 P − N − n ∈ ℤ
86 84 85 syl ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → ¬ 1 P − N − n ∈ ℤ
87 86 pm2.21d ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → 1 P − N − n ∈ ℤ → n ≤ N
88 63 87 sylbid ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ N < n → P N − n ∈ ℤ → n ≤ N
89 88 ex ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → N < n → P N − n ∈ ℤ → n ≤ N
90 89 com23 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P N − n ∈ ℤ → N < n → n ≤ N
91 43 90 sylbid ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P N P n ∈ ℤ → N < n → n ≤ N
92 34 91 sylbid ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → P n ∥ P N → N < n → n ≤ N
93 92 adantr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ A = P n → P n ∥ P N → N < n → n ≤ N
94 12 93 sylbid ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 ∧ A = P n → A ∥ P N → N < n → n ≤ N
95 94 ex ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → A = P n → A ∥ P N → N < n → n ≤ N
96 95 com23 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ n ∈ ℕ 0 → A ∥ P N → A = P n → N < n → n ≤ N
97 96 ex ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → n ∈ ℕ 0 → A ∥ P N → A = P n → N < n → n ≤ N
98 97 com23 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → A ∥ P N → n ∈ ℕ 0 → A = P n → N < n → n ≤ N
99 98 imp41 ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 ∧ A = P n → N < n → n ≤ N
100 99 com12 ⊢ N < n → P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 ∧ A = P n → n ≤ N
101 100 jao1i ⊢ n ≤ N ∨ N < n → P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 ∧ A = P n → n ≤ N
102 10 101 mpcom ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 ∧ A = P n → n ≤ N
103 simpr ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 ∧ A = P n → A = P n
104 102 103 jca ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 ∧ A = P n → n ≤ N ∧ A = P n
105 104 ex ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N ∧ n ∈ ℕ 0 → A = P n → n ≤ N ∧ A = P n
106 105 reximdva ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N → ∃ n ∈ ℕ 0 A = P n → ∃ n ∈ ℕ 0 n ≤ N ∧ A = P n
107 2 106 mpd ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 ∧ A ∥ P N → ∃ n ∈ ℕ 0 n ≤ N ∧ A = P n
108 107 ex ⊢ P ∈ ℙ ∧ A ∈ ℕ ∧ N ∈ ℕ 0 → A ∥ P N → ∃ n ∈ ℕ 0 n ≤ N ∧ A = P n