Step | Hyp | Ref
| Expression |
1 | | 1cnd 7911 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 1 ∈
ℂ) |
2 | | 0cnd 7888 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 0 ∈
ℂ) |
3 | | zsqcl 10521 |
. . . . . . . . . 10
⊢ (𝐵 ∈ ℤ → (𝐵↑2) ∈
ℤ) |
4 | 3 | 3ad2ant2 1009 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐵↑2) ∈
ℤ) |
5 | | 1z 9213 |
. . . . . . . . 9
⊢ 1 ∈
ℤ |
6 | | zdceq 9262 |
. . . . . . . . 9
⊢ (((𝐵↑2) ∈ ℤ ∧ 1
∈ ℤ) → DECID (𝐵↑2) = 1) |
7 | 4, 5, 6 | sylancl 410 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) →
DECID (𝐵↑2) = 1) |
8 | 1, 2, 7 | ifcldcd 3554 |
. . . . . . 7
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) →
if((𝐵↑2) = 1, 1, 0)
∈ ℂ) |
9 | 8 | mulid2d 7913 |
. . . . . 6
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (1
· if((𝐵↑2) = 1,
1, 0)) = if((𝐵↑2) = 1,
1, 0)) |
10 | 9 | ad3antrrr 484 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → (1 ·
if((𝐵↑2) = 1, 1, 0)) =
if((𝐵↑2) = 1, 1,
0)) |
11 | | iftrue 3524 |
. . . . . . 7
⊢ ((𝐴↑2) = 1 → if((𝐴↑2) = 1, 1, 0) =
1) |
12 | 11 | adantl 275 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → if((𝐴↑2) = 1, 1, 0) =
1) |
13 | 12 | oveq1d 5856 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → (if((𝐴↑2) = 1, 1, 0) ·
if((𝐵↑2) = 1, 1, 0)) =
(1 · if((𝐵↑2) =
1, 1, 0))) |
14 | | simpl1 990 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℤ) |
15 | 14 | zcnd 9310 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℂ) |
16 | 15 | ad2antrr 480 |
. . . . . . . . 9
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → 𝐴 ∈
ℂ) |
17 | | simpl2 991 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → 𝐵 ∈ ℤ) |
18 | 17 | zcnd 9310 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → 𝐵 ∈ ℂ) |
19 | 18 | ad2antrr 480 |
. . . . . . . . 9
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → 𝐵 ∈
ℂ) |
20 | 16, 19 | sqmuld 10596 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → ((𝐴 · 𝐵)↑2) = ((𝐴↑2) · (𝐵↑2))) |
21 | | simpr 109 |
. . . . . . . . 9
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → (𝐴↑2) = 1) |
22 | 21 | oveq1d 5856 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → ((𝐴↑2) · (𝐵↑2)) = (1 · (𝐵↑2))) |
23 | 18 | sqcld 10582 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → (𝐵↑2) ∈ ℂ) |
24 | 23 | ad2antrr 480 |
. . . . . . . . 9
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → (𝐵↑2) ∈
ℂ) |
25 | 24 | mulid2d 7913 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → (1 ·
(𝐵↑2)) = (𝐵↑2)) |
26 | 20, 22, 25 | 3eqtrd 2202 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → ((𝐴 · 𝐵)↑2) = (𝐵↑2)) |
27 | 26 | eqeq1d 2174 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → (((𝐴 · 𝐵)↑2) = 1 ↔ (𝐵↑2) = 1)) |
28 | 27 | ifbid 3540 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → if(((𝐴 · 𝐵)↑2) = 1, 1, 0) = if((𝐵↑2) = 1, 1, 0)) |
29 | 10, 13, 28 | 3eqtr4d 2208 |
. . . 4
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ (𝐴↑2) = 1) → (if((𝐴↑2) = 1, 1, 0) ·
if((𝐵↑2) = 1, 1, 0)) =
if(((𝐴 · 𝐵)↑2) = 1, 1,
0)) |
30 | 8 | mul02d 8286 |
. . . . . 6
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (0
· if((𝐵↑2) = 1,
1, 0)) = 0) |
31 | 30 | ad3antrrr 484 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ ¬ (𝐴↑2) = 1) → (0 ·
if((𝐵↑2) = 1, 1, 0)) =
0) |
32 | | iffalse 3527 |
. . . . . . 7
⊢ (¬
(𝐴↑2) = 1 →
if((𝐴↑2) = 1, 1, 0) =
0) |
33 | 32 | adantl 275 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ ¬ (𝐴↑2) = 1) → if((𝐴↑2) = 1, 1, 0) =
0) |
34 | 33 | oveq1d 5856 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ ¬ (𝐴↑2) = 1) → (if((𝐴↑2) = 1, 1, 0) ·
if((𝐵↑2) = 1, 1, 0)) =
(0 · if((𝐵↑2) =
1, 1, 0))) |
35 | | dvdsmul1 11749 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐴 ∥ (𝐴 · 𝐵)) |
36 | 14, 17, 35 | syl2anc 409 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → 𝐴 ∥ (𝐴 · 𝐵)) |
37 | 14, 17 | zmulcld 9315 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → (𝐴 · 𝐵) ∈ ℤ) |
38 | | dvdssq 11960 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℤ ∧ (𝐴 · 𝐵) ∈ ℤ) → (𝐴 ∥ (𝐴 · 𝐵) ↔ (𝐴↑2) ∥ ((𝐴 · 𝐵)↑2))) |
39 | 14, 37, 38 | syl2anc 409 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → (𝐴 ∥ (𝐴 · 𝐵) ↔ (𝐴↑2) ∥ ((𝐴 · 𝐵)↑2))) |
40 | 36, 39 | mpbid 146 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → (𝐴↑2) ∥ ((𝐴 · 𝐵)↑2)) |
41 | 40 | adantr 274 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → (𝐴↑2) ∥ ((𝐴 · 𝐵)↑2)) |
42 | | breq2 3985 |
. . . . . . . . 9
⊢ (((𝐴 · 𝐵)↑2) = 1 → ((𝐴↑2) ∥ ((𝐴 · 𝐵)↑2) ↔ (𝐴↑2) ∥ 1)) |
43 | 41, 42 | syl5ibcom 154 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → (((𝐴 · 𝐵)↑2) = 1 → (𝐴↑2) ∥ 1)) |
44 | | simprl 521 |
. . . . . . . . . . . . . . . 16
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → 𝐴 ≠ 0) |
45 | 44 | neneqd 2356 |
. . . . . . . . . . . . . . 15
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → ¬ 𝐴 = 0) |
46 | | sqeq0 10514 |
. . . . . . . . . . . . . . . 16
⊢ (𝐴 ∈ ℂ → ((𝐴↑2) = 0 ↔ 𝐴 = 0)) |
47 | 15, 46 | syl 14 |
. . . . . . . . . . . . . . 15
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → ((𝐴↑2) = 0 ↔ 𝐴 = 0)) |
48 | 45, 47 | mtbird 663 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → ¬ (𝐴↑2) = 0) |
49 | | zsqcl2 10528 |
. . . . . . . . . . . . . . . 16
⊢ (𝐴 ∈ ℤ → (𝐴↑2) ∈
ℕ0) |
50 | 14, 49 | syl 14 |
. . . . . . . . . . . . . . 15
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → (𝐴↑2) ∈
ℕ0) |
51 | | elnn0 9112 |
. . . . . . . . . . . . . . 15
⊢ ((𝐴↑2) ∈
ℕ0 ↔ ((𝐴↑2) ∈ ℕ ∨ (𝐴↑2) = 0)) |
52 | 50, 51 | sylib 121 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → ((𝐴↑2) ∈ ℕ ∨ (𝐴↑2) = 0)) |
53 | 48, 52 | ecased 1339 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → (𝐴↑2) ∈ ℕ) |
54 | 53 | adantr 274 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → (𝐴↑2) ∈ ℕ) |
55 | 54 | nnzd 9308 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → (𝐴↑2) ∈ ℤ) |
56 | | 1nn 8864 |
. . . . . . . . . . 11
⊢ 1 ∈
ℕ |
57 | | dvdsle 11778 |
. . . . . . . . . . 11
⊢ (((𝐴↑2) ∈ ℤ ∧ 1
∈ ℕ) → ((𝐴↑2) ∥ 1 → (𝐴↑2) ≤ 1)) |
58 | 55, 56, 57 | sylancl 410 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → ((𝐴↑2) ∥ 1 → (𝐴↑2) ≤ 1)) |
59 | 54 | nnge1d 8896 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → 1 ≤ (𝐴↑2)) |
60 | 58, 59 | jctird 315 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → ((𝐴↑2) ∥ 1 → ((𝐴↑2) ≤ 1 ∧ 1 ≤
(𝐴↑2)))) |
61 | 54 | nnred 8866 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → (𝐴↑2) ∈ ℝ) |
62 | | 1re 7894 |
. . . . . . . . . 10
⊢ 1 ∈
ℝ |
63 | | letri3 7975 |
. . . . . . . . . 10
⊢ (((𝐴↑2) ∈ ℝ ∧ 1
∈ ℝ) → ((𝐴↑2) = 1 ↔ ((𝐴↑2) ≤ 1 ∧ 1 ≤ (𝐴↑2)))) |
64 | 61, 62, 63 | sylancl 410 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → ((𝐴↑2) = 1 ↔ ((𝐴↑2) ≤ 1 ∧ 1 ≤ (𝐴↑2)))) |
65 | 60, 64 | sylibrd 168 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → ((𝐴↑2) ∥ 1 → (𝐴↑2) = 1)) |
66 | 43, 65 | syld 45 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → (((𝐴 · 𝐵)↑2) = 1 → (𝐴↑2) = 1)) |
67 | 66 | con3dimp 625 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ ¬ (𝐴↑2) = 1) → ¬
((𝐴 · 𝐵)↑2) = 1) |
68 | 67 | iffalsed 3529 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ ¬ (𝐴↑2) = 1) → if(((𝐴 · 𝐵)↑2) = 1, 1, 0) = 0) |
69 | 31, 34, 68 | 3eqtr4d 2208 |
. . . 4
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 = 0) ∧ ¬ (𝐴↑2) = 1) → (if((𝐴↑2) = 1, 1, 0) ·
if((𝐵↑2) = 1, 1, 0)) =
if(((𝐴 · 𝐵)↑2) = 1, 1,
0)) |
70 | | zdceq 9262 |
. . . . . 6
⊢ (((𝐴↑2) ∈ ℤ ∧ 1
∈ ℤ) → DECID (𝐴↑2) = 1) |
71 | 55, 5, 70 | sylancl 410 |
. . . . 5
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → DECID (𝐴↑2) = 1) |
72 | | exmiddc 826 |
. . . . 5
⊢
(DECID (𝐴↑2) = 1 → ((𝐴↑2) = 1 ∨ ¬ (𝐴↑2) = 1)) |
73 | 71, 72 | syl 14 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → ((𝐴↑2) = 1 ∨ ¬ (𝐴↑2) = 1)) |
74 | 29, 69, 73 | mpjaodan 788 |
. . 3
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → (if((𝐴↑2) = 1, 1, 0) · if((𝐵↑2) = 1, 1, 0)) =
if(((𝐴 · 𝐵)↑2) = 1, 1,
0)) |
75 | | oveq2 5849 |
. . . . 5
⊢ (𝑁 = 0 → (𝐴 /L 𝑁) = (𝐴 /L 0)) |
76 | | lgs0 13514 |
. . . . . 6
⊢ (𝐴 ∈ ℤ → (𝐴 /L 0) =
if((𝐴↑2) = 1, 1,
0)) |
77 | 14, 76 | syl 14 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → (𝐴 /L 0) = if((𝐴↑2) = 1, 1,
0)) |
78 | 75, 77 | sylan9eqr 2220 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → (𝐴 /L 𝑁) = if((𝐴↑2) = 1, 1, 0)) |
79 | | oveq2 5849 |
. . . . 5
⊢ (𝑁 = 0 → (𝐵 /L 𝑁) = (𝐵 /L 0)) |
80 | | lgs0 13514 |
. . . . . 6
⊢ (𝐵 ∈ ℤ → (𝐵 /L 0) =
if((𝐵↑2) = 1, 1,
0)) |
81 | 17, 80 | syl 14 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → (𝐵 /L 0) = if((𝐵↑2) = 1, 1,
0)) |
82 | 79, 81 | sylan9eqr 2220 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → (𝐵 /L 𝑁) = if((𝐵↑2) = 1, 1, 0)) |
83 | 78, 82 | oveq12d 5859 |
. . 3
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → ((𝐴 /L 𝑁) · (𝐵 /L 𝑁)) = (if((𝐴↑2) = 1, 1, 0) · if((𝐵↑2) = 1, 1,
0))) |
84 | | oveq2 5849 |
. . . 4
⊢ (𝑁 = 0 → ((𝐴 · 𝐵) /L 𝑁) = ((𝐴 · 𝐵) /L 0)) |
85 | | lgs0 13514 |
. . . . 5
⊢ ((𝐴 · 𝐵) ∈ ℤ → ((𝐴 · 𝐵) /L 0) = if(((𝐴 · 𝐵)↑2) = 1, 1, 0)) |
86 | 37, 85 | syl 14 |
. . . 4
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → ((𝐴 · 𝐵) /L 0) = if(((𝐴 · 𝐵)↑2) = 1, 1, 0)) |
87 | 84, 86 | sylan9eqr 2220 |
. . 3
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → ((𝐴 · 𝐵) /L 𝑁) = if(((𝐴 · 𝐵)↑2) = 1, 1, 0)) |
88 | 74, 83, 87 | 3eqtr4rd 2209 |
. 2
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 = 0) → ((𝐴 · 𝐵) /L 𝑁) = ((𝐴 /L 𝑁) · (𝐵 /L 𝑁))) |
89 | | lgsdilem 13528 |
. . . . 5
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → if((𝑁 < 0 ∧ (𝐴 · 𝐵) < 0), -1, 1) = (if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) · if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1))) |
90 | 89 | adantr 274 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → if((𝑁 < 0 ∧ (𝐴 · 𝐵) < 0), -1, 1) = (if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) · if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1))) |
91 | | simpl3 992 |
. . . . . . 7
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → 𝑁 ∈ ℤ) |
92 | | nnabscl 11038 |
. . . . . . 7
⊢ ((𝑁 ∈ ℤ ∧ 𝑁 ≠ 0) → (abs‘𝑁) ∈
ℕ) |
93 | 91, 92 | sylan 281 |
. . . . . 6
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (abs‘𝑁) ∈ ℕ) |
94 | | nnuz 9497 |
. . . . . 6
⊢ ℕ =
(ℤ≥‘1) |
95 | 93, 94 | eleqtrdi 2258 |
. . . . 5
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (abs‘𝑁) ∈
(ℤ≥‘1)) |
96 | | simpll1 1026 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → 𝐴 ∈ ℤ) |
97 | | simpll3 1028 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → 𝑁 ∈ ℤ) |
98 | | simpr 109 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → 𝑁 ≠ 0) |
99 | | eqid 2165 |
. . . . . . . . 9
⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)) |
100 | 99 | lgsfcl3 13522 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑁 ≠ 0) → (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)),
1)):ℕ⟶ℤ) |
101 | 96, 97, 98, 100 | syl3anc 1228 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)),
1)):ℕ⟶ℤ) |
102 | | elnnuz 9498 |
. . . . . . . 8
⊢ (𝑘 ∈ ℕ ↔ 𝑘 ∈
(ℤ≥‘1)) |
103 | 102 | biimpri 132 |
. . . . . . 7
⊢ (𝑘 ∈
(ℤ≥‘1) → 𝑘 ∈ ℕ) |
104 | | ffvelrn 5617 |
. . . . . . 7
⊢ (((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)):ℕ⟶ℤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) ∈ ℤ) |
105 | 101, 103,
104 | syl2an 287 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) ∈ ℤ) |
106 | 105 | zcnd 9310 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) ∈ ℂ) |
107 | | simpll2 1027 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → 𝐵 ∈ ℤ) |
108 | | eqid 2165 |
. . . . . . . . 9
⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)) |
109 | 108 | lgsfcl3 13522 |
. . . . . . . 8
⊢ ((𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑁 ≠ 0) → (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)),
1)):ℕ⟶ℤ) |
110 | 107, 97, 98, 109 | syl3anc 1228 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)),
1)):ℕ⟶ℤ) |
111 | | ffvelrn 5617 |
. . . . . . 7
⊢ (((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)):ℕ⟶ℤ ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) ∈ ℤ) |
112 | 110, 103,
111 | syl2an 287 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) ∈ ℤ) |
113 | 112 | zcnd 9310 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) ∈ ℂ) |
114 | 96 | adantr 274 |
. . . . . . . . . . . 12
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → 𝐴 ∈
ℤ) |
115 | 107 | adantr 274 |
. . . . . . . . . . . 12
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → 𝐵 ∈
ℤ) |
116 | | simpr 109 |
. . . . . . . . . . . 12
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → 𝑘 ∈
ℙ) |
117 | | lgsdirprm 13535 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑘 ∈ ℙ) → ((𝐴 · 𝐵) /L 𝑘) = ((𝐴 /L 𝑘) · (𝐵 /L 𝑘))) |
118 | 114, 115,
116, 117 | syl3anc 1228 |
. . . . . . . . . . 11
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → ((𝐴 · 𝐵) /L 𝑘) = ((𝐴 /L 𝑘) · (𝐵 /L 𝑘))) |
119 | 118 | oveq1d 5856 |
. . . . . . . . . 10
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)) = (((𝐴 /L 𝑘) · (𝐵 /L 𝑘))↑(𝑘 pCnt 𝑁))) |
120 | | prmz 12039 |
. . . . . . . . . . . . 13
⊢ (𝑘 ∈ ℙ → 𝑘 ∈
ℤ) |
121 | | lgscl 13515 |
. . . . . . . . . . . . 13
⊢ ((𝐴 ∈ ℤ ∧ 𝑘 ∈ ℤ) → (𝐴 /L 𝑘) ∈
ℤ) |
122 | 96, 120, 121 | syl2an 287 |
. . . . . . . . . . . 12
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → (𝐴 /L 𝑘) ∈
ℤ) |
123 | 122 | zcnd 9310 |
. . . . . . . . . . 11
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → (𝐴 /L 𝑘) ∈
ℂ) |
124 | | lgscl 13515 |
. . . . . . . . . . . . 13
⊢ ((𝐵 ∈ ℤ ∧ 𝑘 ∈ ℤ) → (𝐵 /L 𝑘) ∈
ℤ) |
125 | 107, 120,
124 | syl2an 287 |
. . . . . . . . . . . 12
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → (𝐵 /L 𝑘) ∈
ℤ) |
126 | 125 | zcnd 9310 |
. . . . . . . . . . 11
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → (𝐵 /L 𝑘) ∈
ℂ) |
127 | 97 | adantr 274 |
. . . . . . . . . . . 12
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → 𝑁 ∈
ℤ) |
128 | 98 | adantr 274 |
. . . . . . . . . . . 12
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → 𝑁 ≠ 0) |
129 | | pczcl 12226 |
. . . . . . . . . . . 12
⊢ ((𝑘 ∈ ℙ ∧ (𝑁 ∈ ℤ ∧ 𝑁 ≠ 0)) → (𝑘 pCnt 𝑁) ∈
ℕ0) |
130 | 116, 127,
128, 129 | syl12anc 1226 |
. . . . . . . . . . 11
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → (𝑘 pCnt 𝑁) ∈
ℕ0) |
131 | 123, 126,
130 | mulexpd 10599 |
. . . . . . . . . 10
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → (((𝐴 /L 𝑘) · (𝐵 /L 𝑘))↑(𝑘 pCnt 𝑁)) = (((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)) · ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)))) |
132 | 119, 131 | eqtrd 2198 |
. . . . . . . . 9
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)) = (((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)) · ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)))) |
133 | | iftrue 3524 |
. . . . . . . . . 10
⊢ (𝑘 ∈ ℙ → if(𝑘 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁))) |
134 | 133 | adantl 275 |
. . . . . . . . 9
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → if(𝑘 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁))) |
135 | | iftrue 3524 |
. . . . . . . . . . 11
⊢ (𝑘 ∈ ℙ → if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁))) |
136 | | iftrue 3524 |
. . . . . . . . . . 11
⊢ (𝑘 ∈ ℙ → if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁))) |
137 | 135, 136 | oveq12d 5859 |
. . . . . . . . . 10
⊢ (𝑘 ∈ ℙ → (if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) · if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1)) = (((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)) · ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)))) |
138 | 137 | adantl 275 |
. . . . . . . . 9
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) →
(if(𝑘 ∈ ℙ,
((𝐴 /L
𝑘)↑(𝑘 pCnt 𝑁)), 1) · if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1)) = (((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)) · ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)))) |
139 | 132, 134,
138 | 3eqtr4d 2208 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℙ) → if(𝑘 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = (if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) · if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1))) |
140 | 139 | adantlr 469 |
. . . . . . 7
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → if(𝑘 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = (if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) · if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1))) |
141 | | 1t1e1 9005 |
. . . . . . . . . 10
⊢ (1
· 1) = 1 |
142 | 141 | eqcomi 2169 |
. . . . . . . . 9
⊢ 1 = (1
· 1) |
143 | | iffalse 3527 |
. . . . . . . . 9
⊢ (¬
𝑘 ∈ ℙ →
if(𝑘 ∈ ℙ,
(((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = 1) |
144 | | iffalse 3527 |
. . . . . . . . . 10
⊢ (¬
𝑘 ∈ ℙ →
if(𝑘 ∈ ℙ,
((𝐴 /L
𝑘)↑(𝑘 pCnt 𝑁)), 1) = 1) |
145 | | iffalse 3527 |
. . . . . . . . . 10
⊢ (¬
𝑘 ∈ ℙ →
if(𝑘 ∈ ℙ,
((𝐵 /L
𝑘)↑(𝑘 pCnt 𝑁)), 1) = 1) |
146 | 144, 145 | oveq12d 5859 |
. . . . . . . . 9
⊢ (¬
𝑘 ∈ ℙ →
(if(𝑘 ∈ ℙ,
((𝐴 /L
𝑘)↑(𝑘 pCnt 𝑁)), 1) · if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1)) = (1 · 1)) |
147 | 142, 143,
146 | 3eqtr4a 2224 |
. . . . . . . 8
⊢ (¬
𝑘 ∈ ℙ →
if(𝑘 ∈ ℙ,
(((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = (if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) · if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1))) |
148 | 147 | adantl 275 |
. . . . . . 7
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ ¬ 𝑘 ∈ ℙ) → if(𝑘 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = (if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) · if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1))) |
149 | 103 | adantl 275 |
. . . . . . . . 9
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → 𝑘 ∈ ℕ) |
150 | | prmdc 12058 |
. . . . . . . . 9
⊢ (𝑘 ∈ ℕ →
DECID 𝑘
∈ ℙ) |
151 | 149, 150 | syl 14 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → DECID 𝑘 ∈
ℙ) |
152 | | exmiddc 826 |
. . . . . . . 8
⊢
(DECID 𝑘 ∈ ℙ → (𝑘 ∈ ℙ ∨ ¬ 𝑘 ∈ ℙ)) |
153 | 151, 152 | syl 14 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → (𝑘 ∈ ℙ ∨ ¬ 𝑘 ∈ ℙ)) |
154 | 140, 148,
153 | mpjaodan 788 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → if(𝑘 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) = (if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) · if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1))) |
155 | | eqid 2165 |
. . . . . . 7
⊢ (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)) = (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)) |
156 | | eleq1w 2226 |
. . . . . . . 8
⊢ (𝑛 = 𝑘 → (𝑛 ∈ ℙ ↔ 𝑘 ∈ ℙ)) |
157 | | oveq2 5849 |
. . . . . . . . 9
⊢ (𝑛 = 𝑘 → ((𝐴 · 𝐵) /L 𝑛) = ((𝐴 · 𝐵) /L 𝑘)) |
158 | | oveq1 5848 |
. . . . . . . . 9
⊢ (𝑛 = 𝑘 → (𝑛 pCnt 𝑁) = (𝑘 pCnt 𝑁)) |
159 | 157, 158 | oveq12d 5859 |
. . . . . . . 8
⊢ (𝑛 = 𝑘 → (((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)) = (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁))) |
160 | 156, 159 | ifbieq1d 3541 |
. . . . . . 7
⊢ (𝑛 = 𝑘 → if(𝑛 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)), 1) = if(𝑘 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1)) |
161 | 37 | ad3antrrr 484 |
. . . . . . . . . 10
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → (𝐴 · 𝐵) ∈ ℤ) |
162 | 120 | adantl 275 |
. . . . . . . . . 10
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → 𝑘 ∈ ℤ) |
163 | | lgscl 13515 |
. . . . . . . . . 10
⊢ (((𝐴 · 𝐵) ∈ ℤ ∧ 𝑘 ∈ ℤ) → ((𝐴 · 𝐵) /L 𝑘) ∈ ℤ) |
164 | 161, 162,
163 | syl2anc 409 |
. . . . . . . . 9
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → ((𝐴 · 𝐵) /L 𝑘) ∈ ℤ) |
165 | 130 | adantlr 469 |
. . . . . . . . 9
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → (𝑘 pCnt 𝑁) ∈
ℕ0) |
166 | | zexpcl 10466 |
. . . . . . . . 9
⊢ ((((𝐴 · 𝐵) /L 𝑘) ∈ ℤ ∧ (𝑘 pCnt 𝑁) ∈ ℕ0) →
(((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)) ∈ ℤ) |
167 | 164, 165,
166 | syl2anc 409 |
. . . . . . . 8
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)) ∈ ℤ) |
168 | | 1zzd 9214 |
. . . . . . . 8
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ ¬ 𝑘 ∈ ℙ) → 1 ∈
ℤ) |
169 | 167, 168,
151 | ifcldadc 3548 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → if(𝑘 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) ∈ ℤ) |
170 | 155, 160,
149, 169 | fvmptd3 5578 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) = if(𝑘 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑘)↑(𝑘 pCnt 𝑁)), 1)) |
171 | | oveq2 5849 |
. . . . . . . . . 10
⊢ (𝑛 = 𝑘 → (𝐴 /L 𝑛) = (𝐴 /L 𝑘)) |
172 | 171, 158 | oveq12d 5859 |
. . . . . . . . 9
⊢ (𝑛 = 𝑘 → ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)) = ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁))) |
173 | 156, 172 | ifbieq1d 3541 |
. . . . . . . 8
⊢ (𝑛 = 𝑘 → if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1) = if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1)) |
174 | 122 | adantlr 469 |
. . . . . . . . . 10
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → (𝐴 /L 𝑘) ∈ ℤ) |
175 | | zexpcl 10466 |
. . . . . . . . . 10
⊢ (((𝐴 /L 𝑘) ∈ ℤ ∧ (𝑘 pCnt 𝑁) ∈ ℕ0) → ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)) ∈ ℤ) |
176 | 174, 165,
175 | syl2anc 409 |
. . . . . . . . 9
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)) ∈ ℤ) |
177 | 176, 168,
151 | ifcldadc 3548 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) ∈ ℤ) |
178 | 99, 173, 149, 177 | fvmptd3 5578 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) = if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1)) |
179 | | oveq2 5849 |
. . . . . . . . . 10
⊢ (𝑛 = 𝑘 → (𝐵 /L 𝑛) = (𝐵 /L 𝑘)) |
180 | 179, 158 | oveq12d 5859 |
. . . . . . . . 9
⊢ (𝑛 = 𝑘 → ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)) = ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁))) |
181 | 156, 180 | ifbieq1d 3541 |
. . . . . . . 8
⊢ (𝑛 = 𝑘 → if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1) = if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1)) |
182 | 125 | adantlr 469 |
. . . . . . . . . 10
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → (𝐵 /L 𝑘) ∈ ℤ) |
183 | | zexpcl 10466 |
. . . . . . . . . 10
⊢ (((𝐵 /L 𝑘) ∈ ℤ ∧ (𝑘 pCnt 𝑁) ∈ ℕ0) → ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)) ∈ ℤ) |
184 | 182, 165,
183 | syl2anc 409 |
. . . . . . . . 9
⊢
((((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) ∧ 𝑘 ∈ ℙ) → ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)) ∈ ℤ) |
185 | 184, 168,
151 | ifcldadc 3548 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) ∈ ℤ) |
186 | 108, 181,
149, 185 | fvmptd3 5578 |
. . . . . . 7
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) = if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1)) |
187 | 178, 186 | oveq12d 5859 |
. . . . . 6
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → (((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) · ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘)) = (if(𝑘 ∈ ℙ, ((𝐴 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1) · if(𝑘 ∈ ℙ, ((𝐵 /L 𝑘)↑(𝑘 pCnt 𝑁)), 1))) |
188 | 154, 170,
187 | 3eqtr4d 2208 |
. . . . 5
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈
(ℤ≥‘1)) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) = (((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) · ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘))) |
189 | 95, 106, 113, 188 | prod3fmul 11478 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, (((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)) = ((seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)) · (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)))) |
190 | 90, 189 | oveq12d 5859 |
. . 3
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (if((𝑁 < 0 ∧ (𝐴 · 𝐵) < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
(((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁))) = ((if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) · if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1)) · ((seq1( ·
, (𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐴 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)) · (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁))))) |
191 | 37 | adantr 274 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (𝐴 · 𝐵) ∈ ℤ) |
192 | 155 | lgsval4 13521 |
. . . 4
⊢ (((𝐴 · 𝐵) ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑁 ≠ 0) → ((𝐴 · 𝐵) /L 𝑁) = (if((𝑁 < 0 ∧ (𝐴 · 𝐵) < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
(((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)))) |
193 | 191, 97, 98, 192 | syl3anc 1228 |
. . 3
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → ((𝐴 · 𝐵) /L 𝑁) = (if((𝑁 < 0 ∧ (𝐴 · 𝐵) < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
(((𝐴 · 𝐵) /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)))) |
194 | 99 | lgsval4 13521 |
. . . . . 6
⊢ ((𝐴 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑁 ≠ 0) → (𝐴 /L 𝑁) = (if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐴 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)))) |
195 | 96, 97, 98, 194 | syl3anc 1228 |
. . . . 5
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (𝐴 /L 𝑁) = (if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐴 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)))) |
196 | 108 | lgsval4 13521 |
. . . . . 6
⊢ ((𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝑁 ≠ 0) → (𝐵 /L 𝑁) = (if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐵 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)))) |
197 | 107, 97, 98, 196 | syl3anc 1228 |
. . . . 5
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (𝐵 /L 𝑁) = (if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐵 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)))) |
198 | 195, 197 | oveq12d 5859 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → ((𝐴 /L 𝑁) · (𝐵 /L 𝑁)) = ((if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐴 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁))) · (if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐵 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁))))) |
199 | | neg1cn 8958 |
. . . . . . 7
⊢ -1 ∈
ℂ |
200 | 199 | a1i 9 |
. . . . . 6
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → -1 ∈
ℂ) |
201 | | 1cnd 7911 |
. . . . . 6
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → 1 ∈
ℂ) |
202 | | 0z 9198 |
. . . . . . . 8
⊢ 0 ∈
ℤ |
203 | | zdclt 9264 |
. . . . . . . 8
⊢ ((𝑁 ∈ ℤ ∧ 0 ∈
ℤ) → DECID 𝑁 < 0) |
204 | 97, 202, 203 | sylancl 410 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → DECID 𝑁 < 0) |
205 | | zdclt 9264 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℤ ∧ 0 ∈
ℤ) → DECID 𝐴 < 0) |
206 | 96, 202, 205 | sylancl 410 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → DECID 𝐴 < 0) |
207 | | dcan2 924 |
. . . . . . 7
⊢
(DECID 𝑁 < 0 → (DECID 𝐴 < 0 →
DECID (𝑁
< 0 ∧ 𝐴 <
0))) |
208 | 204, 206,
207 | sylc 62 |
. . . . . 6
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → DECID (𝑁 < 0 ∧ 𝐴 < 0)) |
209 | 200, 201,
208 | ifcldcd 3554 |
. . . . 5
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) ∈
ℂ) |
210 | | 1zzd 9214 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → 1 ∈
ℤ) |
211 | 101 | ffvelrnda 5619 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) ∈ ℤ) |
212 | | zmulcl 9240 |
. . . . . . . . 9
⊢ ((𝑘 ∈ ℤ ∧ 𝑣 ∈ ℤ) → (𝑘 · 𝑣) ∈ ℤ) |
213 | 212 | adantl 275 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ (𝑘 ∈ ℤ ∧ 𝑣 ∈ ℤ)) → (𝑘 · 𝑣) ∈ ℤ) |
214 | 94, 210, 211, 213 | seqf 10392 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)),
1))):ℕ⟶ℤ) |
215 | 214, 93 | ffvelrnd 5620 |
. . . . . 6
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)) ∈ ℤ) |
216 | 215 | zcnd 9310 |
. . . . 5
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐴 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)) ∈ ℂ) |
217 | | neg1z 9219 |
. . . . . . . 8
⊢ -1 ∈
ℤ |
218 | 217 | a1i 9 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → -1 ∈
ℤ) |
219 | | zdclt 9264 |
. . . . . . . . 9
⊢ ((𝐵 ∈ ℤ ∧ 0 ∈
ℤ) → DECID 𝐵 < 0) |
220 | 107, 202,
219 | sylancl 410 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → DECID 𝐵 < 0) |
221 | | dcan2 924 |
. . . . . . . 8
⊢
(DECID 𝑁 < 0 → (DECID 𝐵 < 0 →
DECID (𝑁
< 0 ∧ 𝐵 <
0))) |
222 | 204, 220,
221 | sylc 62 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → DECID (𝑁 < 0 ∧ 𝐵 < 0)) |
223 | 218, 210,
222 | ifcldcd 3554 |
. . . . . 6
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1) ∈
ℤ) |
224 | 223 | zcnd 9310 |
. . . . 5
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1) ∈
ℂ) |
225 | 110 | ffvelrnda 5619 |
. . . . . . . 8
⊢
(((((𝐴 ∈
ℤ ∧ 𝐵 ∈
ℤ ∧ 𝑁 ∈
ℤ) ∧ (𝐴 ≠ 0
∧ 𝐵 ≠ 0)) ∧
𝑁 ≠ 0) ∧ 𝑘 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1))‘𝑘) ∈ ℤ) |
226 | 94, 210, 225, 213 | seqf 10392 |
. . . . . . 7
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)),
1))):ℕ⟶ℤ) |
227 | 226, 93 | ffvelrnd 5620 |
. . . . . 6
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)) ∈ ℤ) |
228 | 227 | zcnd 9310 |
. . . . 5
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)) ∈ ℂ) |
229 | 209, 216,
224, 228 | mul4d 8049 |
. . . 4
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → ((if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐴 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁))) · (if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1) · (seq1( · ,
(𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐵 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)))) = ((if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) · if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1)) · ((seq1( ·
, (𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐴 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)) · (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁))))) |
230 | 198, 229 | eqtrd 2198 |
. . 3
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → ((𝐴 /L 𝑁) · (𝐵 /L 𝑁)) = ((if((𝑁 < 0 ∧ 𝐴 < 0), -1, 1) · if((𝑁 < 0 ∧ 𝐵 < 0), -1, 1)) · ((seq1( ·
, (𝑛 ∈ ℕ ↦
if(𝑛 ∈ ℙ,
((𝐴 /L
𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁)) · (seq1( · , (𝑛 ∈ ℕ ↦ if(𝑛 ∈ ℙ, ((𝐵 /L 𝑛)↑(𝑛 pCnt 𝑁)), 1)))‘(abs‘𝑁))))) |
231 | 190, 193,
230 | 3eqtr4d 2208 |
. 2
⊢ ((((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) ∧ 𝑁 ≠ 0) → ((𝐴 · 𝐵) /L 𝑁) = ((𝐴 /L 𝑁) · (𝐵 /L 𝑁))) |
232 | | zdceq 9262 |
. . . 4
⊢ ((𝑁 ∈ ℤ ∧ 0 ∈
ℤ) → DECID 𝑁 = 0) |
233 | 91, 202, 232 | sylancl 410 |
. . 3
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → DECID 𝑁 = 0) |
234 | | dcne 2346 |
. . 3
⊢
(DECID 𝑁 = 0 ↔ (𝑁 = 0 ∨ 𝑁 ≠ 0)) |
235 | 233, 234 | sylib 121 |
. 2
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → (𝑁 = 0 ∨ 𝑁 ≠ 0)) |
236 | 88, 231, 235 | mpjaodan 788 |
1
⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0)) → ((𝐴 · 𝐵) /L 𝑁) = ((𝐴 /L 𝑁) · (𝐵 /L 𝑁))) |