Users' Mathboxes Mathbox for Stefan O'Rear < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  acongeq Structured version   Visualization version   GIF version

Theorem acongeq 43989
Description: Two numbers in the fundamental domain are alternating-congruent iff they are equal. TODO: could be used to shorten jm2.26 44008. (Contributed by Stefan O'Rear, 4-Oct-2014.)
Assertion
Ref Expression
acongeq ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 = 𝐶 ↔ ((2 · 𝐴) ∥ (𝐵 − 𝐶) ∨ (2 · 𝐴) ∥ (𝐵 − -𝐶))))

Proof of Theorem acongeq
StepHypRef Expression
1 2z 12728 . . . . . . 7 2 ∈ ℤ
2 nnz 12714 . . . . . . . 8 (𝐴 ∈ ℕ → 𝐴 ∈ ℤ)
323ad2ant1 1151 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℤ)
4 zmulcl 12745 . . . . . . 7 ((2 ∈ ℤ ∧ 𝐴 ∈ ℤ) → (2 · 𝐴) ∈ ℤ)
51, 3, 4sylancr 599 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) ∈ ℤ)
6 elfzelz 13656 . . . . . . 7 (𝐵 ∈ (0...𝐴) → 𝐵 ∈ ℤ)
763ad2ant2 1152 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ ℤ)
8 congid 43977 . . . . . 6 (((2 · 𝐴) ∈ ℤ ∧ 𝐵 ∈ ℤ) → (2 · 𝐴) ∥ (𝐵 − 𝐵))
95, 7, 8syl2anc 596 . . . . 5 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) ∥ (𝐵 − 𝐵))
109adantr 486 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → (2 · 𝐴) ∥ (𝐵 − 𝐵))
11 oveq2 7428 . . . . 5 (𝐵 = 𝐶 → (𝐵 − 𝐵) = (𝐵 − 𝐶))
1211adantl 487 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → (𝐵 − 𝐵) = (𝐵 − 𝐶))
1310, 12breqtrd 5131 . . 3 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → (2 · 𝐴) ∥ (𝐵 − 𝐶))
1413orcd 887 . 2 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → ((2 · 𝐴) ∥ (𝐵 − 𝐶) ∨ (2 · 𝐴) ∥ (𝐵 − -𝐶)))
15 elfzelz 13656 . . . . . . . . . 10 (𝐶 ∈ (0...𝐴) → 𝐶 ∈ ℤ)
16153ad2ant3 1153 . . . . . . . . 9 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ ℤ)
177, 16zsubcld 12808 . . . . . . . 8 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − 𝐶) ∈ ℤ)
1817zcnd 12804 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − 𝐶) ∈ ℂ)
1918abscld 15606 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − 𝐶)) ∈ ℝ)
20 nnre 12342 . . . . . . . 8 (𝐴 ∈ ℕ → 𝐴 ∈ ℝ)
21203ad2ant1 1151 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℝ)
22 0re 11310 . . . . . . 7 0 ∈ ℝ
23 resubcl 11622 . . . . . . 7 ((𝐴 ∈ ℝ ∧ 0 ∈ ℝ) → (𝐴 − 0) ∈ ℝ)
2421, 22, 23sylancl 598 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) ∈ ℝ)
25 2re 12417 . . . . . . 7 2 ∈ ℝ
26 remulcl 11285 . . . . . . 7 ((2 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (2 · 𝐴) ∈ ℝ)
2725, 21, 26sylancr 599 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) ∈ ℝ)
28 simp2 1155 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ (0...𝐴))
29 simp3 1156 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ (0...𝐴))
3024leidd 11882 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) ≤ (𝐴 − 0))
31 fzmaxdif 43987 . . . . . . 7 (((𝐴 ∈ ℤ ∧ 𝐵 ∈ (0...𝐴)) ∧ (𝐴 ∈ ℤ ∧ 𝐶 ∈ (0...𝐴)) ∧ (𝐴 − 0) ≤ (𝐴 − 0)) → (abs‘(𝐵 − 𝐶)) ≤ (𝐴 − 0))
323, 28, 3, 29, 30, 31syl221anc 1408 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − 𝐶)) ≤ (𝐴 − 0))
33 nnrp 13132 . . . . . . . . 9 (𝐴 ∈ ℕ → 𝐴 ∈ ℝ+)
34333ad2ant1 1151 . . . . . . . 8 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℝ+)
3521, 34ltaddrpd 13197 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 < (𝐴 + 𝐴))
3621recnd 11337 . . . . . . . 8 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℂ)
3736subid1d 11658 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) = 𝐴)
38362timesd 12589 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) = (𝐴 + 𝐴))
3935, 37, 383brtr4d 5137 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) < (2 · 𝐴))
4019, 24, 27, 32, 39lelttrd 11468 . . . . 5 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − 𝐶)) < (2 · 𝐴))
4140adantr 486 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → (abs‘(𝐵 − 𝐶)) < (2 · 𝐴))
42 2nn 12416 . . . . . 6 2 ∈ ℕ
43 simpl1 1210 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐴 ∈ ℕ)
44 nnmulcl 12359 . . . . . 6 ((2 ∈ ℕ ∧ 𝐴 ∈ ℕ) → (2 · 𝐴) ∈ ℕ)
4542, 43, 44sylancr 599 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → (2 · 𝐴) ∈ ℕ)
46 simpl2 1211 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐵 ∈ (0...𝐴))
4746elfzelzd 13657 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐵 ∈ ℤ)
48 simpl3 1212 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐶 ∈ (0...𝐴))
4948elfzelzd 13657 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐶 ∈ ℤ)
50 simpr 490 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → (2 · 𝐴) ∥ (𝐵 − 𝐶))
51 congabseq 43980 . . . . 5 ((((2 · 𝐴) ∈ ℕ ∧ 𝐵 ∈ ℤ ∧ 𝐶 ∈ ℤ) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → ((abs‘(𝐵 − 𝐶)) < (2 · 𝐴) ↔ 𝐵 = 𝐶))
5245, 47, 49, 50, 51syl31anc 1400 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → ((abs‘(𝐵 − 𝐶)) < (2 · 𝐴) ↔ 𝐵 = 𝐶))
5341, 52mpbid 235 . . 3 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐵 = 𝐶)
54 simpll2 1232 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 ∈ (0...𝐴))
55 elfzle1 13660 . . . . . . . . . . 11 (𝐵 ∈ (0...𝐴) → 0 ≤ 𝐵)
5654, 55syl 18 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ≤ 𝐵)
577zred 12803 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ ℝ)
5816zred 12803 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ ℝ)
5958renegcld 11743 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → -𝐶 ∈ ℝ)
6057, 59resubcld 11744 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − -𝐶) ∈ ℝ)
6160recnd 11337 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − -𝐶) ∈ ℂ)
6261abscld 15606 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − -𝐶)) ∈ ℝ)
6362ad2antrr 739 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) ∈ ℝ)
64 1re 11308 . . . . . . . . . . . . . . . 16 1 ∈ ℝ
65 resubcl 11622 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℝ ∧ 1 ∈ ℝ) → (𝐴 − 1) ∈ ℝ)
6621, 64, 65sylancl 598 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 1) ∈ ℝ)
6766renegcld 11743 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → -(𝐴 − 1) ∈ ℝ)
6821, 67resubcld 11744 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) ∈ ℝ)
6968ad2antrr 739 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (𝐴 − -(𝐴 − 1)) ∈ ℝ)
7027ad2antrr 739 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (2 · 𝐴) ∈ ℝ)
717ad2antrr 739 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 ∈ ℤ)
7271zcnd 12804 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 ∈ ℂ)
7316znegcld 12805 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → -𝐶 ∈ ℤ)
7473ad2antrr 739 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 ∈ ℤ)
7574zcnd 12804 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 ∈ ℂ)
7672, 75abssubd 15623 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) = (abs‘(-𝐶 − 𝐵)))
77 0zd 12705 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ∈ ℤ)
78 simpr 490 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 ∈ (0...(𝐴 − 1)))
79 0zd 12705 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 0 ∈ ℤ)
80 1z 12726 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℤ
81 zsubcl 12738 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℤ ∧ 1 ∈ ℤ) → (𝐴 − 1) ∈ ℤ)
823, 80, 81sylancl 598 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 1) ∈ ℤ)
83 fzneg 43988 . . . . . . . . . . . . . . . . . 18 ((𝐶 ∈ ℤ ∧ 0 ∈ ℤ ∧ (𝐴 − 1) ∈ ℤ) → (𝐶 ∈ (0...(𝐴 − 1)) ↔ -𝐶 ∈ (-(𝐴 − 1)...-0)))
8416, 79, 82, 83syl3anc 1398 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐶 ∈ (0...(𝐴 − 1)) ↔ -𝐶 ∈ (-(𝐴 − 1)...-0)))
8584ad2antrr 739 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (𝐶 ∈ (0...(𝐴 − 1)) ↔ -𝐶 ∈ (-(𝐴 − 1)...-0)))
8678, 85mpbid 235 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 ∈ (-(𝐴 − 1)...-0))
87 neg0 11604 . . . . . . . . . . . . . . . . 17 -0 = 0
8887a1i 11 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -0 = 0)
8988oveq2d 7436 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (-(𝐴 − 1)...-0) = (-(𝐴 − 1)...0))
9086, 89eleqtrd 2863 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 ∈ (-(𝐴 − 1)...0))
913ad2antrr 739 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐴 ∈ ℤ)
92 simp1 1154 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℕ)
9342, 92, 44sylancr 599 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) ∈ ℕ)
94 nnm1nn0 12647 . . . . . . . . . . . . . . . . . 18 ((2 · 𝐴) ∈ ℕ → ((2 · 𝐴) − 1) ∈ ℕ0)
9593, 94syl 18 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) − 1) ∈ ℕ0)
9695nn0ge0d 12670 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 0 ≤ ((2 · 𝐴) − 1))
97 0m0e0 12461 . . . . . . . . . . . . . . . . 17 (0 − 0) = 0
9897a1i 11 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (0 − 0) = 0)
99 1cnd 11302 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 1 ∈ ℂ)
10036, 36, 99addsubassd 11689 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((𝐴 + 𝐴) − 1) = (𝐴 + (𝐴 − 1)))
10138oveq1d 7435 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) − 1) = ((𝐴 + 𝐴) − 1))
102 ax-1cn 11258 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℂ
103 subcl 11556 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → (𝐴 − 1) ∈ ℂ)
10436, 102, 103sylancl 598 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 1) ∈ ℂ)
10536, 104subnegd 11676 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) = (𝐴 + (𝐴 − 1)))
106100, 101, 1053eqtr4rd 2807 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) = ((2 · 𝐴) − 1))
10796, 98, 1063brtr4d 5137 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (0 − 0) ≤ (𝐴 − -(𝐴 − 1)))
108107ad2antrr 739 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (0 − 0) ≤ (𝐴 − -(𝐴 − 1)))
109 fzmaxdif 43987 . . . . . . . . . . . . . 14 (((0 ∈ ℤ ∧ -𝐶 ∈ (-(𝐴 − 1)...0)) ∧ (𝐴 ∈ ℤ ∧ 𝐵 ∈ (0...𝐴)) ∧ (0 − 0) ≤ (𝐴 − -(𝐴 − 1))) → (abs‘(-𝐶 − 𝐵)) ≤ (𝐴 − -(𝐴 − 1)))
11077, 90, 91, 54, 108, 109syl221anc 1408 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(-𝐶 − 𝐵)) ≤ (𝐴 − -(𝐴 − 1)))
11176, 110eqbrtrd 5127 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) ≤ (𝐴 − -(𝐴 − 1)))
11227ltm1d 12249 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) − 1) < (2 · 𝐴))
113106, 112eqbrtrd 5127 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) < (2 · 𝐴))
114113ad2antrr 739 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (𝐴 − -(𝐴 − 1)) < (2 · 𝐴))
11563, 69, 70, 111, 114lelttrd 11468 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) < (2 · 𝐴))
11693ad2antrr 739 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (2 · 𝐴) ∈ ℕ)
117 simplr 781 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (2 · 𝐴) ∥ (𝐵 − -𝐶))
118 congabseq 43980 . . . . . . . . . . . 12 ((((2 · 𝐴) ∈ ℕ ∧ 𝐵 ∈ ℤ ∧ -𝐶 ∈ ℤ) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) → ((abs‘(𝐵 − -𝐶)) < (2 · 𝐴) ↔ 𝐵 = -𝐶))
119116, 71, 74, 117, 118syl31anc 1400 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → ((abs‘(𝐵 − -𝐶)) < (2 · 𝐴) ↔ 𝐵 = -𝐶))
120115, 119mpbid 235 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 = -𝐶)
12156, 120breqtrd 5131 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ≤ -𝐶)
122 elfzelz 13656 . . . . . . . . . . . 12 (𝐶 ∈ (0...(𝐴 − 1)) → 𝐶 ∈ ℤ)
123122zred 12803 . . . . . . . . . . 11 (𝐶 ∈ (0...(𝐴 − 1)) → 𝐶 ∈ ℝ)
124123adantl 487 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 ∈ ℝ)
125124le0neg1d 11887 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (𝐶 ≤ 0 ↔ 0 ≤ -𝐶))
126121, 125mpbird 260 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 ≤ 0)
127 elfzle1 13660 . . . . . . . . 9 (𝐶 ∈ (0...(𝐴 − 1)) → 0 ≤ 𝐶)
128127adantl 487 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ≤ 𝐶)
129 letri3 11395 . . . . . . . . 9 ((𝐶 ∈ ℝ ∧ 0 ∈ ℝ) → (𝐶 = 0 ↔ (𝐶 ≤ 0 ∧ 0 ≤ 𝐶)))
130124, 22, 129sylancl 598 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (𝐶 = 0 ↔ (𝐶 ≤ 0 ∧ 0 ≤ 𝐶)))
131126, 128, 130mpbir2and 726 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 = 0)
132131negeqd 11551 . . . . . 6 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 = -0)
133132, 88eqtrd 2796 . . . . 5 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 = 0)
134133, 120, 1313eqtr4d 2806 . . . 4 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 = 𝐶)
135 oveq2 7428 . . . . . . . . 9 (𝐶 = 𝐴 → (𝐵 − 𝐶) = (𝐵 − 𝐴))
136135adantl 487 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 − 𝐶) = (𝐵 − 𝐴))
137136fveq2d 6889 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (abs‘(𝐵 − 𝐶)) = (abs‘(𝐵 − 𝐴)))
13840ad2antrr 739 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (abs‘(𝐵 − 𝐶)) < (2 · 𝐴))
139137, 138eqbrtrrd 5129 . . . . . 6 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (abs‘(𝐵 − 𝐴)) < (2 · 𝐴))
14093ad2antrr 739 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (2 · 𝐴) ∈ ℕ)
1417ad2antrr 739 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → 𝐵 ∈ ℤ)
1423ad2antrr 739 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → 𝐴 ∈ ℤ)
143 simplr 781 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (2 · 𝐴) ∥ (𝐵 − -𝐶))
1447zcnd 12804 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ ℂ)
14536, 36, 144ppncand 11709 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐴 + 𝐵))
14636, 144addcomd 11512 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 + 𝐵) = (𝐵 + 𝐴))
147145, 146eqtrd 2796 . . . . . . . . . . . 12 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐵 + 𝐴))
148147ad2antrr 739 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐵 + 𝐴))
149 oveq2 7428 . . . . . . . . . . . 12 (𝐶 = 𝐴 → (𝐵 + 𝐶) = (𝐵 + 𝐴))
150149adantl 487 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 + 𝐶) = (𝐵 + 𝐴))
151148, 150eqtr4d 2799 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐵 + 𝐶))
15238oveq1d 7435 . . . . . . . . . . 11 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) + (𝐵 − 𝐴)) = ((𝐴 + 𝐴) + (𝐵 − 𝐴)))
153152ad2antrr 739 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((2 · 𝐴) + (𝐵 − 𝐴)) = ((𝐴 + 𝐴) + (𝐵 − 𝐴)))
15416zcnd 12804 . . . . . . . . . . . 12 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ ℂ)
155144, 154subnegd 11676 . . . . . . . . . . 11 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − -𝐶) = (𝐵 + 𝐶))
156155ad2antrr 739 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 − -𝐶) = (𝐵 + 𝐶))
157151, 153, 1563eqtr4d 2806 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((2 · 𝐴) + (𝐵 − 𝐴)) = (𝐵 − -𝐶))
158143, 157breqtrrd 5133 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (2 · 𝐴) ∥ ((2 · 𝐴) + (𝐵 − 𝐴)))
1595ad2antrr 739 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (2 · 𝐴) ∈ ℤ)
1607, 3zsubcld 12808 . . . . . . . . . 10 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − 𝐴) ∈ ℤ)
161160ad2antrr 739 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 − 𝐴) ∈ ℤ)
162 dvdsadd 16472 . . . . . . . . 9 (((2 · 𝐴) ∈ ℤ ∧ (𝐵 − 𝐴) ∈ ℤ) → ((2 · 𝐴) ∥ (𝐵 − 𝐴) ↔ (2 · 𝐴) ∥ ((2 · 𝐴) + (𝐵 − 𝐴))))
163159, 161, 162syl2anc 596 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((2 · 𝐴) ∥ (𝐵 − 𝐴) ↔ (2 · 𝐴) ∥ ((2 · 𝐴) + (𝐵 − 𝐴))))
164158, 163mpbird 260 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (2 · 𝐴) ∥ (𝐵 − 𝐴))
165 congabseq 43980 . . . . . . 7 ((((2 · 𝐴) ∈ ℕ ∧ 𝐵 ∈ ℤ ∧ 𝐴 ∈ ℤ) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐴)) → ((abs‘(𝐵 − 𝐴)) < (2 · 𝐴) ↔ 𝐵 = 𝐴))
166140, 141, 142, 164, 165syl31anc 1400 . . . . . 6 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((abs‘(𝐵 − 𝐴)) < (2 · 𝐴) ↔ 𝐵 = 𝐴))
167139, 166mpbid 235 . . . . 5 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → 𝐵 = 𝐴)
168 simpr 490 . . . . 5 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → 𝐶 = 𝐴)
169167, 168eqtr4d 2799 . . . 4 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → 𝐵 = 𝐶)
170 nnnn0 12613 . . . . . . . 8 (𝐴 ∈ ℕ → 𝐴 ∈ ℕ0)
1711703ad2ant1 1151 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℕ0)
172 nn0uz 13003 . . . . . . 7 ℕ0 = (ℤ≥‘0)
173171, 172eleqtrdi 2871 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ (ℤ≥‘0))
174 fzm1 13741 . . . . . . 7 (𝐴 ∈ (ℤ≥‘0) → (𝐶 ∈ (0...𝐴) ↔ (𝐶 ∈ (0...(𝐴 − 1)) ∨ 𝐶 = 𝐴)))
175174biimpa 482 . . . . . 6 ((𝐴 ∈ (ℤ≥‘0) ∧ 𝐶 ∈ (0...𝐴)) → (𝐶 ∈ (0...(𝐴 − 1)) ∨ 𝐶 = 𝐴))
176173, 29, 175syl2anc 596 . . . . 5 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐶 ∈ (0...(𝐴 − 1)) ∨ 𝐶 = 𝐴))
177176adantr 486 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) → (𝐶 ∈ (0...(𝐴 − 1)) ∨ 𝐶 = 𝐴))
178134, 169, 177mpjaodan 973 . . 3 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) → 𝐵 = 𝐶)
17953, 178jaodan 972 . 2 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ ((2 · 𝐴) ∥ (𝐵 − 𝐶) ∨ (2 · 𝐴) ∥ (𝐵 − -𝐶))) → 𝐵 = 𝐶)
18014, 179impbida 813 1 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 = 𝐶 ↔ ((2 · 𝐴) ∥ (𝐵 − 𝐶) ∨ (2 · 𝐴) ∥ (𝐵 − -𝐶))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145   class class class wbr 5103  ‘cfv 6538  (class class class)co 7420  ℂcc 11198  ℝcr 11199  0cc0 11200  1c1 11201   + caddc 11203   · cmul 11205   < clt 11343   ≤ cle 11344   − cmin 11541  -cneg 11542  ℕcn 12335  2c2 12397  ℕ0cn0 12606  ℤcz 12693  ℤ≥cuz 12965  ℝ+crp 13120  ...cfz 13639  abscabs 15401   ∥ cdvds 16422
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7751  ax-cnex 11256  ax-resscn 11257  ax-1cn 11258  ax-icn 11259  ax-addcl 11260  ax-addrcl 11261  ax-mulcl 11262  ax-mulrcl 11263  ax-mulcom 11264  ax-addass 11265  ax-mulass 11266  ax-distr 11267  ax-i2m1 11268  ax-1ne0 11269  ax-1rid 11270  ax-rnegex 11271  ax-rrecex 11272  ax-cnre 11273  ax-pre-lttri 11274  ax-pre-lttrn 11275  ax-pre-ltadd 11276  ax-pre-mulgt0 11277  ax-pre-sup 11278
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-om 7878  df-1st 8001  df-2nd 8002  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-er 8717  df-en 8974  df-dom 8975  df-sdom 8976  df-sup 9434  df-pnf 11345  df-mnf 11346  df-xr 11347  df-ltxr 11348  df-le 11349  df-sub 11543  df-neg 11544  df-div 11974  df-nn 12336  df-2 12405  df-3 12406  df-n0 12607  df-z 12694  df-uz 12966  df-rp 13121  df-fz 13640  df-seq 14145  df-exp 14205  df-cj 15266  df-re 15267  df-im 15268  df-sqrt 15402  df-abs 15403  df-dvds 16423
This theorem is used by:  jm2.27a  44011
  Copyright terms: Public domain W3C validator