Metamath Proof Explorer


Theorem hashscontpow1

Description: Helper lemma for to prove inequality in Zr. (Contributed by metakunt, 28-Apr-2025)

Ref Expression
Hypotheses hashscontpow1.1 ⊢ φ → N ∈ ℕ
hashscontpow1.2 ⊢ φ → A ∈ 1 … odℤ ⁡ R ⁡ N
hashscontpow1.3 ⊢ φ → B ∈ 1 … odℤ ⁡ R ⁡ N
hashscontpow1.4 ⊢ φ → R ∈ ℕ
hashscontpow1.5 ⊢ φ → N gcd R = 1
hashscontpow1.6 ⊢ L = ℤRHom ⁡ Y
hashscontpow1.7 ⊢ Y = ℤ/Rℤ
hashscontpow1.8 ⊢ φ → A < B
Assertion hashscontpow1 ⊢ φ → L ⁡ N A ≠ L ⁡ N B

Proof

Step Hyp Ref Expression
1 hashscontpow1.1 ⊢ φ → N ∈ ℕ
2 hashscontpow1.2 ⊢ φ → A ∈ 1 … odℤ ⁡ R ⁡ N
3 hashscontpow1.3 ⊢ φ → B ∈ 1 … odℤ ⁡ R ⁡ N
4 hashscontpow1.4 ⊢ φ → R ∈ ℕ
5 hashscontpow1.5 ⊢ φ → N gcd R = 1
6 hashscontpow1.6 ⊢ L = ℤRHom ⁡ Y
7 hashscontpow1.7 ⊢ Y = ℤ/Rℤ
8 hashscontpow1.8 ⊢ φ → A < B
9 3 elfzelzd ⊢ φ → B ∈ ℤ
10 9 zred ⊢ φ → B ∈ ℝ
11 2 elfzelzd ⊢ φ → A ∈ ℤ
12 11 zred ⊢ φ → A ∈ ℝ
13 10 12 resubcld ⊢ φ → B − A ∈ ℝ
14 1 nnzd ⊢ φ → N ∈ ℤ
15 odzcl ⊢ R ∈ ℕ ∧ N ∈ ℤ ∧ N gcd R = 1 → odℤ ⁡ R ⁡ N ∈ ℕ
16 4 14 5 15 syl3anc ⊢ φ → odℤ ⁡ R ⁡ N ∈ ℕ
17 16 nnred ⊢ φ → odℤ ⁡ R ⁡ N ∈ ℝ
18 elfznn ⊢ A ∈ 1 … odℤ ⁡ R ⁡ N → A ∈ ℕ
19 2 18 syl ⊢ φ → A ∈ ℕ
20 19 nnrpd ⊢ φ → A ∈ ℝ +
21 10 20 ltsubrpd ⊢ φ → B − A < B
22 elfzle2 ⊢ B ∈ 1 … odℤ ⁡ R ⁡ N → B ≤ odℤ ⁡ R ⁡ N
23 3 22 syl ⊢ φ → B ≤ odℤ ⁡ R ⁡ N
24 13 10 17 21 23 ltletrd ⊢ φ → B − A < odℤ ⁡ R ⁡ N
25 24 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → B − A < odℤ ⁡ R ⁡ N
26 odzval ⊢ R ∈ ℕ ∧ N ∈ ℤ ∧ N gcd R = 1 → odℤ ⁡ R ⁡ N = inf i ∈ ℕ | R ∥ N i − 1 ℝ <
27 4 14 5 26 syl3anc ⊢ φ → odℤ ⁡ R ⁡ N = inf i ∈ ℕ | R ∥ N i − 1 ℝ <
28 27 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → odℤ ⁡ R ⁡ N = inf i ∈ ℕ | R ∥ N i − 1 ℝ <
29 elrabi ⊢ j ∈ i ∈ ℕ | R ∥ N i − 1 → j ∈ ℕ
30 29 adantl ⊢ φ ∧ j ∈ i ∈ ℕ | R ∥ N i − 1 → j ∈ ℕ
31 30 nnred ⊢ φ ∧ j ∈ i ∈ ℕ | R ∥ N i − 1 → j ∈ ℝ
32 31 ex ⊢ φ → j ∈ i ∈ ℕ | R ∥ N i − 1 → j ∈ ℝ
33 32 ssrdv ⊢ φ → i ∈ ℕ | R ∥ N i − 1 ⊆ ℝ
34 33 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → i ∈ ℕ | R ∥ N i − 1 ⊆ ℝ
35 1red ⊢ φ → 1 ∈ ℝ
36 simpr ⊢ φ ∧ x = 1 → x = 1
37 36 breq1d ⊢ φ ∧ x = 1 → x ≤ y ↔ 1 ≤ y
38 37 ralbidv ⊢ φ ∧ x = 1 → ∀ y ∈ i ∈ ℕ | R ∥ N i − 1 x ≤ y ↔ ∀ y ∈ i ∈ ℕ | R ∥ N i − 1 1 ≤ y
39 elrabi ⊢ y ∈ i ∈ ℕ | R ∥ N i − 1 → y ∈ ℕ
40 39 adantl ⊢ φ ∧ y ∈ i ∈ ℕ | R ∥ N i − 1 → y ∈ ℕ
41 40 nnge1d ⊢ φ ∧ y ∈ i ∈ ℕ | R ∥ N i − 1 → 1 ≤ y
42 41 ralrimiva ⊢ φ → ∀ y ∈ i ∈ ℕ | R ∥ N i − 1 1 ≤ y
43 35 38 42 rspcedvd ⊢ φ → ∃ x ∈ ℝ ∀ y ∈ i ∈ ℕ | R ∥ N i − 1 x ≤ y
44 43 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → ∃ x ∈ ℝ ∀ y ∈ i ∈ ℕ | R ∥ N i − 1 x ≤ y
45 oveq2 ⊢ i = B − A → N i = N B − A
46 45 oveq1d ⊢ i = B − A → N i − 1 = N B − A − 1
47 46 breq2d ⊢ i = B − A → R ∥ N i − 1 ↔ R ∥ N B − A − 1
48 9 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → B ∈ ℤ
49 11 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → A ∈ ℤ
50 48 49 zsubcld ⊢ φ ∧ L ⁡ N A = L ⁡ N B → B − A ∈ ℤ
51 12 10 posdifd ⊢ φ → A < B ↔ 0 < B − A
52 8 51 mpbid ⊢ φ → 0 < B − A
53 52 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → 0 < B − A
54 50 53 jca ⊢ φ ∧ L ⁡ N A = L ⁡ N B → B − A ∈ ℤ ∧ 0 < B − A
55 elnnz ⊢ B − A ∈ ℕ ↔ B − A ∈ ℤ ∧ 0 < B − A
56 54 55 sylibr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → B − A ∈ ℕ
57 4 nnzd ⊢ φ → R ∈ ℤ
58 57 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → R ∈ ℤ
59 14 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → N ∈ ℤ
60 19 nnnn0d ⊢ φ → A ∈ ℕ 0
61 60 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → A ∈ ℕ 0
62 59 61 zexpcld ⊢ φ ∧ L ⁡ N A = L ⁡ N B → N A ∈ ℤ
63 56 nnnn0d ⊢ φ ∧ L ⁡ N A = L ⁡ N B → B − A ∈ ℕ 0
64 59 63 zexpcld ⊢ φ ∧ L ⁡ N A = L ⁡ N B → N B − A ∈ ℤ
65 1zzd ⊢ φ ∧ L ⁡ N A = L ⁡ N B → 1 ∈ ℤ
66 64 65 zsubcld ⊢ φ ∧ L ⁡ N A = L ⁡ N B → N B − A − 1 ∈ ℤ
67 58 62 66 3jca ⊢ φ ∧ L ⁡ N A = L ⁡ N B → R ∈ ℤ ∧ N A ∈ ℤ ∧ N B − A − 1 ∈ ℤ
68 simpr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → L ⁡ N A = L ⁡ N B
69 68 eqcomd ⊢ φ ∧ L ⁡ N A = L ⁡ N B → L ⁡ N B = L ⁡ N A
70 4 nnnn0d ⊢ φ → R ∈ ℕ 0
71 70 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → R ∈ ℕ 0
72 elfznn ⊢ B ∈ 1 … odℤ ⁡ R ⁡ N → B ∈ ℕ
73 3 72 syl ⊢ φ → B ∈ ℕ
74 73 nnnn0d ⊢ φ → B ∈ ℕ 0
75 14 74 zexpcld ⊢ φ → N B ∈ ℤ
76 75 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → N B ∈ ℤ
77 7 6 zndvds ⊢ R ∈ ℕ 0 ∧ N B ∈ ℤ ∧ N A ∈ ℤ → L ⁡ N B = L ⁡ N A ↔ R ∥ N B − N A
78 71 76 62 77 syl3anc ⊢ φ ∧ L ⁡ N A = L ⁡ N B → L ⁡ N B = L ⁡ N A ↔ R ∥ N B − N A
79 69 78 mpbid ⊢ φ ∧ L ⁡ N A = L ⁡ N B → R ∥ N B − N A
80 14 60 zexpcld ⊢ φ → N A ∈ ℤ
81 80 zcnd ⊢ φ → N A ∈ ℂ
82 9 11 zsubcld ⊢ φ → B − A ∈ ℤ
83 0red ⊢ φ → 0 ∈ ℝ
84 83 13 52 ltled ⊢ φ → 0 ≤ B − A
85 82 84 jca ⊢ φ → B − A ∈ ℤ ∧ 0 ≤ B − A
86 elnn0z ⊢ B − A ∈ ℕ 0 ↔ B − A ∈ ℤ ∧ 0 ≤ B − A
87 85 86 sylibr ⊢ φ → B − A ∈ ℕ 0
88 14 87 zexpcld ⊢ φ → N B − A ∈ ℤ
89 88 zcnd ⊢ φ → N B − A ∈ ℂ
90 1cnd ⊢ φ → 1 ∈ ℂ
91 81 89 90 subdid ⊢ φ → N A ⁢ N B − A − 1 = N A ⁢ N B − A − N A ⋅ 1
92 12 recnd ⊢ φ → A ∈ ℂ
93 10 recnd ⊢ φ → B ∈ ℂ
94 92 93 pncan3d ⊢ φ → A + B - A = B
95 94 eqcomd ⊢ φ → B = A + B - A
96 95 oveq2d ⊢ φ → N B = N A + B - A
97 1 nncnd ⊢ φ → N ∈ ℂ
98 97 87 60 expaddd ⊢ φ → N A + B - A = N A ⁢ N B − A
99 96 98 eqtrd ⊢ φ → N B = N A ⁢ N B − A
100 99 eqcomd ⊢ φ → N A ⁢ N B − A = N B
101 81 mulridd ⊢ φ → N A ⋅ 1 = N A
102 100 101 oveq12d ⊢ φ → N A ⁢ N B − A − N A ⋅ 1 = N B − N A
103 91 102 eqtr2d ⊢ φ → N B − N A = N A ⁢ N B − A − 1
104 103 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → N B − N A = N A ⁢ N B − A − 1
105 79 104 breqtrd ⊢ φ ∧ L ⁡ N A = L ⁡ N B → R ∥ N A ⁢ N B − A − 1
106 57 80 gcdcomd ⊢ φ → R gcd N A = N A gcd R
107 rpexp ⊢ N ∈ ℤ ∧ R ∈ ℤ ∧ A ∈ ℕ → N A gcd R = 1 ↔ N gcd R = 1
108 14 57 19 107 syl3anc ⊢ φ → N A gcd R = 1 ↔ N gcd R = 1
109 5 108 mpbird ⊢ φ → N A gcd R = 1
110 106 109 eqtrd ⊢ φ → R gcd N A = 1
111 110 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → R gcd N A = 1
112 105 111 jca ⊢ φ ∧ L ⁡ N A = L ⁡ N B → R ∥ N A ⁢ N B − A − 1 ∧ R gcd N A = 1
113 coprmdvds ⊢ R ∈ ℤ ∧ N A ∈ ℤ ∧ N B − A − 1 ∈ ℤ → R ∥ N A ⁢ N B − A − 1 ∧ R gcd N A = 1 → R ∥ N B − A − 1
114 113 imp ⊢ R ∈ ℤ ∧ N A ∈ ℤ ∧ N B − A − 1 ∈ ℤ ∧ R ∥ N A ⁢ N B − A − 1 ∧ R gcd N A = 1 → R ∥ N B − A − 1
115 67 112 114 syl2anc ⊢ φ ∧ L ⁡ N A = L ⁡ N B → R ∥ N B − A − 1
116 47 56 115 elrabd ⊢ φ ∧ L ⁡ N A = L ⁡ N B → B − A ∈ i ∈ ℕ | R ∥ N i − 1
117 infrelb ⊢ i ∈ ℕ | R ∥ N i − 1 ⊆ ℝ ∧ ∃ x ∈ ℝ ∀ y ∈ i ∈ ℕ | R ∥ N i − 1 x ≤ y ∧ B − A ∈ i ∈ ℕ | R ∥ N i − 1 → inf i ∈ ℕ | R ∥ N i − 1 ℝ < ≤ B − A
118 34 44 116 117 syl3anc ⊢ φ ∧ L ⁡ N A = L ⁡ N B → inf i ∈ ℕ | R ∥ N i − 1 ℝ < ≤ B − A
119 28 118 eqbrtrd ⊢ φ ∧ L ⁡ N A = L ⁡ N B → odℤ ⁡ R ⁡ N ≤ B − A
120 16 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → odℤ ⁡ R ⁡ N ∈ ℕ
121 120 nnred ⊢ φ ∧ L ⁡ N A = L ⁡ N B → odℤ ⁡ R ⁡ N ∈ ℝ
122 13 adantr ⊢ φ ∧ L ⁡ N A = L ⁡ N B → B − A ∈ ℝ
123 121 122 lenltd ⊢ φ ∧ L ⁡ N A = L ⁡ N B → odℤ ⁡ R ⁡ N ≤ B − A ↔ ¬ B − A < odℤ ⁡ R ⁡ N
124 119 123 mpbid ⊢ φ ∧ L ⁡ N A = L ⁡ N B → ¬ B − A < odℤ ⁡ R ⁡ N
125 25 124 pm2.65da ⊢ φ → ¬ L ⁡ N A = L ⁡ N B
126 125 neqned ⊢ φ → L ⁡ N A ≠ L ⁡ N B