Step | Hyp | Ref
| Expression |
1 | | simpl1 1172 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 = 2) → 𝐴 ∈ ℤ) |
2 | | simpl2 1173 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 = 2) → 𝐵 ∈ ℤ) |
3 | | lgsdir2 25623 |
. . . 4
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → ((𝐴 · 𝐵) /L 2) = ((𝐴 /L 2)
· (𝐵
/L 2))) |
4 | 1, 2, 3 | syl2anc 576 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 = 2) → ((𝐴 · 𝐵) /L 2) = ((𝐴 /L 2)
· (𝐵
/L 2))) |
5 | | simpr 477 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 = 2) → 𝑃 = 2) |
6 | 5 | oveq2d 6990 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 = 2) → ((𝐴 · 𝐵) /L 𝑃) = ((𝐴 · 𝐵) /L 2)) |
7 | 5 | oveq2d 6990 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 = 2) → (𝐴 /L 𝑃) = (𝐴 /L 2)) |
8 | 5 | oveq2d 6990 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 = 2) → (𝐵 /L 𝑃) = (𝐵 /L 2)) |
9 | 7, 8 | oveq12d 6992 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 = 2) → ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) = ((𝐴 /L 2) · (𝐵 /L
2))) |
10 | 4, 6, 9 | 3eqtr4d 2817 |
. 2
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 = 2) → ((𝐴 · 𝐵) /L 𝑃) = ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) |
11 | | simpl1 1172 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝐴 ∈
ℤ) |
12 | | simpl2 1173 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝐵 ∈
ℤ) |
13 | 11, 12 | zmulcld 11904 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐴 · 𝐵) ∈ ℤ) |
14 | | simpl3 1174 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝑃 ∈
ℙ) |
15 | | prmz 15873 |
. . . . . 6
⊢ (𝑃 ∈ ℙ → 𝑃 ∈
ℤ) |
16 | 14, 15 | syl 17 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝑃 ∈
ℤ) |
17 | | lgscl 25604 |
. . . . 5
⊢ (((𝐴 · 𝐵) ∈ ℤ ∧ 𝑃 ∈ ℤ) → ((𝐴 · 𝐵) /L 𝑃) ∈ ℤ) |
18 | 13, 16, 17 | syl2anc 576 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴 · 𝐵) /L 𝑃) ∈ ℤ) |
19 | 18 | zcnd 11899 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴 · 𝐵) /L 𝑃) ∈ ℂ) |
20 | | lgscl 25604 |
. . . . . 6
⊢ ((𝐴 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝐴 /L 𝑃) ∈
ℤ) |
21 | 11, 16, 20 | syl2anc 576 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐴 /L 𝑃) ∈
ℤ) |
22 | | lgscl 25604 |
. . . . . 6
⊢ ((𝐵 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝐵 /L 𝑃) ∈
ℤ) |
23 | 12, 16, 22 | syl2anc 576 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐵 /L 𝑃) ∈
ℤ) |
24 | 21, 23 | zmulcld 11904 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) ∈ ℤ) |
25 | 24 | zcnd 11899 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) ∈ ℂ) |
26 | 19, 25 | subcld 10796 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) ∈ ℂ) |
27 | 26 | abscld 14655 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
(abs‘(((𝐴 ·
𝐵) /L
𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) ∈ ℝ) |
28 | | prmnn 15872 |
. . . . . . . 8
⊢ (𝑃 ∈ ℙ → 𝑃 ∈
ℕ) |
29 | 14, 28 | syl 17 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝑃 ∈
ℕ) |
30 | 29 | nnrpd 12244 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝑃 ∈
ℝ+) |
31 | 26 | absge0d 14663 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 0 ≤
(abs‘(((𝐴 ·
𝐵) /L
𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))))) |
32 | | 2re 11512 |
. . . . . . . 8
⊢ 2 ∈
ℝ |
33 | 32 | a1i 11 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 2 ∈
ℝ) |
34 | 29 | nnred 11454 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝑃 ∈
ℝ) |
35 | 19 | abscld 14655 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
(abs‘((𝐴 ·
𝐵) /L
𝑃)) ∈
ℝ) |
36 | 25 | abscld 14655 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
(abs‘((𝐴
/L 𝑃)
· (𝐵
/L 𝑃)))
∈ ℝ) |
37 | 35, 36 | readdcld 10467 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
((abs‘((𝐴 ·
𝐵) /L
𝑃)) + (abs‘((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) ∈ ℝ) |
38 | 19, 25 | abs2dif2d 14677 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
(abs‘(((𝐴 ·
𝐵) /L
𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) ≤ ((abs‘((𝐴 · 𝐵) /L 𝑃)) + (abs‘((𝐴 /L 𝑃) · (𝐵 /L 𝑃))))) |
39 | | 1red 10438 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 1 ∈
ℝ) |
40 | | lgsle1 25605 |
. . . . . . . . . . 11
⊢ (((𝐴 · 𝐵) ∈ ℤ ∧ 𝑃 ∈ ℤ) → (abs‘((𝐴 · 𝐵) /L 𝑃)) ≤ 1) |
41 | 13, 16, 40 | syl2anc 576 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
(abs‘((𝐴 ·
𝐵) /L
𝑃)) ≤
1) |
42 | | eqid 2771 |
. . . . . . . . . . . . . 14
⊢ {𝑥 ∈ ℤ ∣
(abs‘𝑥) ≤ 1} =
{𝑥 ∈ ℤ ∣
(abs‘𝑥) ≤
1} |
43 | 42 | lgscl2 25602 |
. . . . . . . . . . . . 13
⊢ ((𝐴 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝐴 /L 𝑃) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1}) |
44 | 11, 16, 43 | syl2anc 576 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐴 /L 𝑃) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1}) |
45 | 42 | lgscl2 25602 |
. . . . . . . . . . . . 13
⊢ ((𝐵 ∈ ℤ ∧ 𝑃 ∈ ℤ) → (𝐵 /L 𝑃) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1}) |
46 | 12, 16, 45 | syl2anc 576 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐵 /L 𝑃) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1}) |
47 | 42 | lgslem3 25592 |
. . . . . . . . . . . 12
⊢ (((𝐴 /L 𝑃) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1} ∧ (𝐵 /L 𝑃) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1}) → ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1}) |
48 | 44, 46, 47 | syl2anc 576 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1}) |
49 | | fveq2 6496 |
. . . . . . . . . . . . . 14
⊢ (𝑥 = ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) → (abs‘𝑥) = (abs‘((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) |
50 | 49 | breq1d 4935 |
. . . . . . . . . . . . 13
⊢ (𝑥 = ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) → ((abs‘𝑥) ≤ 1 ↔ (abs‘((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) ≤ 1)) |
51 | 50 | elrab 3588 |
. . . . . . . . . . . 12
⊢ (((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1} ↔ (((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) ∈ ℤ ∧ (abs‘((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) ≤ 1)) |
52 | 51 | simprbi 489 |
. . . . . . . . . . 11
⊢ (((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) ∈ {𝑥 ∈ ℤ ∣ (abs‘𝑥) ≤ 1} →
(abs‘((𝐴
/L 𝑃)
· (𝐵
/L 𝑃)))
≤ 1) |
53 | 48, 52 | syl 17 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
(abs‘((𝐴
/L 𝑃)
· (𝐵
/L 𝑃)))
≤ 1) |
54 | 35, 36, 39, 39, 41, 53 | le2addd 11058 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
((abs‘((𝐴 ·
𝐵) /L
𝑃)) + (abs‘((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) ≤ (1 + 1)) |
55 | | df-2 11501 |
. . . . . . . . 9
⊢ 2 = (1 +
1) |
56 | 54, 55 | syl6breqr 4967 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
((abs‘((𝐴 ·
𝐵) /L
𝑃)) + (abs‘((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) ≤ 2) |
57 | 27, 37, 33, 38, 56 | letrd 10595 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
(abs‘(((𝐴 ·
𝐵) /L
𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) ≤ 2) |
58 | | prmuz2 15894 |
. . . . . . . . 9
⊢ (𝑃 ∈ ℙ → 𝑃 ∈
(ℤ≥‘2)) |
59 | | eluzle 12069 |
. . . . . . . . 9
⊢ (𝑃 ∈
(ℤ≥‘2) → 2 ≤ 𝑃) |
60 | 14, 58, 59 | 3syl 18 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 2 ≤ 𝑃) |
61 | | simpr 477 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝑃 ≠ 2) |
62 | | ltlen 10539 |
. . . . . . . . 9
⊢ ((2
∈ ℝ ∧ 𝑃
∈ ℝ) → (2 < 𝑃 ↔ (2 ≤ 𝑃 ∧ 𝑃 ≠ 2))) |
63 | 32, 34, 62 | sylancr 579 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (2 < 𝑃 ↔ (2 ≤ 𝑃 ∧ 𝑃 ≠ 2))) |
64 | 60, 61, 63 | mpbir2and 701 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 2 < 𝑃) |
65 | 27, 33, 34, 57, 64 | lelttrd 10596 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
(abs‘(((𝐴 ·
𝐵) /L
𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) < 𝑃) |
66 | | modid 13077 |
. . . . . 6
⊢
((((abs‘(((𝐴
· 𝐵)
/L 𝑃)
− ((𝐴
/L 𝑃)
· (𝐵
/L 𝑃))))
∈ ℝ ∧ 𝑃
∈ ℝ+) ∧ (0 ≤ (abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) ∧ (abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) < 𝑃)) → ((abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) mod 𝑃) = (abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))))) |
67 | 27, 30, 31, 65, 66 | syl22anc 827 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
((abs‘(((𝐴 ·
𝐵) /L
𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) mod 𝑃) = (abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))))) |
68 | 11 | zcnd 11899 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝐴 ∈
ℂ) |
69 | 12 | zcnd 11899 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝐵 ∈
ℂ) |
70 | | eldifsn 4589 |
. . . . . . . . . . . . . . 15
⊢ (𝑃 ∈ (ℙ ∖ {2})
↔ (𝑃 ∈ ℙ
∧ 𝑃 ≠
2)) |
71 | 14, 61, 70 | sylanbrc 575 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝑃 ∈ (ℙ ∖
{2})) |
72 | | oddprm 16001 |
. . . . . . . . . . . . . 14
⊢ (𝑃 ∈ (ℙ ∖ {2})
→ ((𝑃 − 1) / 2)
∈ ℕ) |
73 | 71, 72 | syl 17 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝑃 − 1) / 2) ∈
ℕ) |
74 | 73 | nnnn0d 11765 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝑃 − 1) / 2) ∈
ℕ0) |
75 | 68, 69, 74 | mulexpd 13338 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴 · 𝐵)↑((𝑃 − 1) / 2)) = ((𝐴↑((𝑃 − 1) / 2)) · (𝐵↑((𝑃 − 1) / 2)))) |
76 | | zexpcl 13257 |
. . . . . . . . . . . . . 14
⊢ ((𝐴 ∈ ℤ ∧ ((𝑃 − 1) / 2) ∈
ℕ0) → (𝐴↑((𝑃 − 1) / 2)) ∈
ℤ) |
77 | 11, 74, 76 | syl2anc 576 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐴↑((𝑃 − 1) / 2)) ∈
ℤ) |
78 | 77 | zcnd 11899 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐴↑((𝑃 − 1) / 2)) ∈
ℂ) |
79 | | zexpcl 13257 |
. . . . . . . . . . . . . 14
⊢ ((𝐵 ∈ ℤ ∧ ((𝑃 − 1) / 2) ∈
ℕ0) → (𝐵↑((𝑃 − 1) / 2)) ∈
ℤ) |
80 | 12, 74, 79 | syl2anc 576 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐵↑((𝑃 − 1) / 2)) ∈
ℤ) |
81 | 80 | zcnd 11899 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐵↑((𝑃 − 1) / 2)) ∈
ℂ) |
82 | 78, 81 | mulcomd 10459 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴↑((𝑃 − 1) / 2)) · (𝐵↑((𝑃 − 1) / 2))) = ((𝐵↑((𝑃 − 1) / 2)) · (𝐴↑((𝑃 − 1) / 2)))) |
83 | 75, 82 | eqtrd 2807 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴 · 𝐵)↑((𝑃 − 1) / 2)) = ((𝐵↑((𝑃 − 1) / 2)) · (𝐴↑((𝑃 − 1) / 2)))) |
84 | 83 | oveq1d 6989 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐴 · 𝐵)↑((𝑃 − 1) / 2)) mod 𝑃) = (((𝐵↑((𝑃 − 1) / 2)) · (𝐴↑((𝑃 − 1) / 2))) mod 𝑃)) |
85 | | lgsvalmod 25609 |
. . . . . . . . . 10
⊢ (((𝐴 · 𝐵) ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2})) →
(((𝐴 · 𝐵) /L 𝑃) mod 𝑃) = (((𝐴 · 𝐵)↑((𝑃 − 1) / 2)) mod 𝑃)) |
86 | 13, 71, 85 | syl2anc 576 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐴 · 𝐵) /L 𝑃) mod 𝑃) = (((𝐴 · 𝐵)↑((𝑃 − 1) / 2)) mod 𝑃)) |
87 | 21 | zred 11898 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐴 /L 𝑃) ∈
ℝ) |
88 | 77 | zred 11898 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐴↑((𝑃 − 1) / 2)) ∈
ℝ) |
89 | | lgsvalmod 25609 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2}))
→ ((𝐴
/L 𝑃) mod
𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃)) |
90 | 11, 71, 89 | syl2anc 576 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴 /L 𝑃) mod 𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃)) |
91 | | modmul1 13105 |
. . . . . . . . . . 11
⊢ ((((𝐴 /L 𝑃) ∈ ℝ ∧ (𝐴↑((𝑃 − 1) / 2)) ∈ ℝ) ∧
((𝐵 /L
𝑃) ∈ ℤ ∧
𝑃 ∈
ℝ+) ∧ ((𝐴 /L 𝑃) mod 𝑃) = ((𝐴↑((𝑃 − 1) / 2)) mod 𝑃)) → (((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) mod 𝑃) = (((𝐴↑((𝑃 − 1) / 2)) · (𝐵 /L 𝑃)) mod 𝑃)) |
92 | 87, 88, 23, 30, 90, 91 | syl221anc 1362 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) mod 𝑃) = (((𝐴↑((𝑃 − 1) / 2)) · (𝐵 /L 𝑃)) mod 𝑃)) |
93 | 23 | zcnd 11899 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐵 /L 𝑃) ∈
ℂ) |
94 | 78, 93 | mulcomd 10459 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴↑((𝑃 − 1) / 2)) · (𝐵 /L 𝑃)) = ((𝐵 /L 𝑃) · (𝐴↑((𝑃 − 1) / 2)))) |
95 | 94 | oveq1d 6989 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐴↑((𝑃 − 1) / 2)) · (𝐵 /L 𝑃)) mod 𝑃) = (((𝐵 /L 𝑃) · (𝐴↑((𝑃 − 1) / 2))) mod 𝑃)) |
96 | 23 | zred 11898 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐵 /L 𝑃) ∈
ℝ) |
97 | 80 | zred 11898 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝐵↑((𝑃 − 1) / 2)) ∈
ℝ) |
98 | | lgsvalmod 25609 |
. . . . . . . . . . . 12
⊢ ((𝐵 ∈ ℤ ∧ 𝑃 ∈ (ℙ ∖ {2}))
→ ((𝐵
/L 𝑃) mod
𝑃) = ((𝐵↑((𝑃 − 1) / 2)) mod 𝑃)) |
99 | 12, 71, 98 | syl2anc 576 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐵 /L 𝑃) mod 𝑃) = ((𝐵↑((𝑃 − 1) / 2)) mod 𝑃)) |
100 | | modmul1 13105 |
. . . . . . . . . . 11
⊢ ((((𝐵 /L 𝑃) ∈ ℝ ∧ (𝐵↑((𝑃 − 1) / 2)) ∈ ℝ) ∧
((𝐴↑((𝑃 − 1) / 2)) ∈ ℤ
∧ 𝑃 ∈
ℝ+) ∧ ((𝐵 /L 𝑃) mod 𝑃) = ((𝐵↑((𝑃 − 1) / 2)) mod 𝑃)) → (((𝐵 /L 𝑃) · (𝐴↑((𝑃 − 1) / 2))) mod 𝑃) = (((𝐵↑((𝑃 − 1) / 2)) · (𝐴↑((𝑃 − 1) / 2))) mod 𝑃)) |
101 | 96, 97, 77, 30, 99, 100 | syl221anc 1362 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐵 /L 𝑃) · (𝐴↑((𝑃 − 1) / 2))) mod 𝑃) = (((𝐵↑((𝑃 − 1) / 2)) · (𝐴↑((𝑃 − 1) / 2))) mod 𝑃)) |
102 | 92, 95, 101 | 3eqtrd 2811 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) mod 𝑃) = (((𝐵↑((𝑃 − 1) / 2)) · (𝐴↑((𝑃 − 1) / 2))) mod 𝑃)) |
103 | 84, 86, 102 | 3eqtr4d 2817 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐴 · 𝐵) /L 𝑃) mod 𝑃) = (((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) mod 𝑃)) |
104 | | moddvds 15476 |
. . . . . . . . 9
⊢ ((𝑃 ∈ ℕ ∧ ((𝐴 · 𝐵) /L 𝑃) ∈ ℤ ∧ ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) ∈ ℤ) → ((((𝐴 · 𝐵) /L 𝑃) mod 𝑃) = (((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) mod 𝑃) ↔ 𝑃 ∥ (((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))))) |
105 | 29, 18, 24, 104 | syl3anc 1352 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((((𝐴 · 𝐵) /L 𝑃) mod 𝑃) = (((𝐴 /L 𝑃) · (𝐵 /L 𝑃)) mod 𝑃) ↔ 𝑃 ∥ (((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))))) |
106 | 103, 105 | mpbid 224 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝑃 ∥ (((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) |
107 | 18, 24 | zsubcld 11903 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) ∈ ℤ) |
108 | | dvdsabsb 15487 |
. . . . . . . 8
⊢ ((𝑃 ∈ ℤ ∧ (((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) ∈ ℤ) → (𝑃 ∥ (((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) ↔ 𝑃 ∥ (abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))))) |
109 | 16, 107, 108 | syl2anc 576 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (𝑃 ∥ (((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) ↔ 𝑃 ∥ (abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))))) |
110 | 106, 109 | mpbid 224 |
. . . . . 6
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → 𝑃 ∥ (abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))))) |
111 | | dvdsmod0 15471 |
. . . . . 6
⊢ ((𝑃 ∈ ℕ ∧ 𝑃 ∥ (abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))))) → ((abs‘(((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) mod 𝑃) = 0) |
112 | 29, 110, 111 | syl2anc 576 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
((abs‘(((𝐴 ·
𝐵) /L
𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) mod 𝑃) = 0) |
113 | 67, 112 | eqtr3d 2809 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) →
(abs‘(((𝐴 ·
𝐵) /L
𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃)))) = 0) |
114 | 26, 113 | abs00d 14665 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → (((𝐴 · 𝐵) /L 𝑃) − ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) = 0) |
115 | 19, 25, 114 | subeq0d 10804 |
. 2
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) ∧ 𝑃 ≠ 2) → ((𝐴 · 𝐵) /L 𝑃) = ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) |
116 | 10, 115 | pm2.61dane 3048 |
1
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑃 ∈ ℙ) → ((𝐴 · 𝐵) /L 𝑃) = ((𝐴 /L 𝑃) · (𝐵 /L 𝑃))) |