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

Proof of Theorem acongeq
StepHypRef Expression
1 2z 12768 . . . . . . 7 2 ∈ ℤ
2 nnz 12754 . . . . . . . 8 (𝐴 ∈ ℕ → 𝐴 ∈ ℤ)
323ad2ant1 1151 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℤ)
4 zmulcl 12785 . . . . . . 7 ((2 ∈ ℤ ∧ 𝐴 ∈ ℤ) → (2 · 𝐴) ∈ ℤ)
51, 3, 4sylancr 599 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) ∈ ℤ)
6 elfzelz 13696 . . . . . . 7 (𝐵 ∈ (0...𝐴) → 𝐵 ∈ ℤ)
763ad2ant2 1152 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ ℤ)
8 congid 44244 . . . . . 6 (((2 · 𝐴) ∈ ℤ ∧ 𝐵 ∈ ℤ) → (2 · 𝐴) ∥ (𝐵 − 𝐵))
95, 7, 8syl2anc 596 . . . . 5 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) ∥ (𝐵 − 𝐵))
109adantr 486 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → (2 · 𝐴) ∥ (𝐵 − 𝐵))
11 oveq2 7459 . . . . 5 (𝐵 = 𝐶 → (𝐵 − 𝐵) = (𝐵 − 𝐶))
1211adantl 487 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → (𝐵 − 𝐵) = (𝐵 − 𝐶))
1310, 12breqtrd 5137 . . 3 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → (2 · 𝐴) ∥ (𝐵 − 𝐶))
1413orcd 887 . 2 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → ((2 · 𝐴) ∥ (𝐵 − 𝐶) ∨ (2 · 𝐴) ∥ (𝐵 − -𝐶)))
15 elfzelz 13696 . . . . . . . . . 10 (𝐶 ∈ (0...𝐴) → 𝐶 ∈ ℤ)
16153ad2ant3 1153 . . . . . . . . 9 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ ℤ)
177, 16zsubcld 12848 . . . . . . . 8 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − 𝐶) ∈ ℤ)
1817zcnd 12844 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − 𝐶) ∈ ℂ)
1918abscld 15650 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − 𝐶)) ∈ ℝ)
20 nnre 12382 . . . . . . . 8 (𝐴 ∈ ℕ → 𝐴 ∈ ℝ)
21203ad2ant1 1151 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℝ)
22 0re 11349 . . . . . . 7 0 ∈ ℝ
23 resubcl 11661 . . . . . . 7 ((𝐴 ∈ ℝ ∧ 0 ∈ ℝ) → (𝐴 − 0) ∈ ℝ)
2421, 22, 23sylancl 598 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) ∈ ℝ)
25 2re 12457 . . . . . . 7 2 ∈ ℝ
26 remulcl 11324 . . . . . . 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 11922 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) ≤ (𝐴 − 0))
31 fzmaxdif 44254 . . . . . . 7 (((𝐴 ∈ ℤ ∧ 𝐵 ∈ (0...𝐴)) ∧ (𝐴 ∈ ℤ ∧ 𝐶 ∈ (0...𝐴)) ∧ (𝐴 − 0) ≤ (𝐴 − 0)) → (abs‘(𝐵 − 𝐶)) ≤ (𝐴 − 0))
323, 28, 3, 29, 30, 31syl221anc 1409 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − 𝐶)) ≤ (𝐴 − 0))
33 nnrp 13172 . . . . . . . . 9 (𝐴 ∈ ℕ → 𝐴 ∈ ℝ+)
34333ad2ant1 1151 . . . . . . . 8 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℝ+)
3521, 34ltaddrpd 13237 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 < (𝐴 + 𝐴))
3621recnd 11376 . . . . . . . 8 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℂ)
3736subid1d 11697 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) = 𝐴)
38362timesd 12629 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) = (𝐴 + 𝐴))
3935, 37, 383brtr4d 5143 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) < (2 · 𝐴))
4019, 24, 27, 32, 39lelttrd 11507 . . . . 5 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − 𝐶)) < (2 · 𝐴))
4140adantr 486 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → (abs‘(𝐵 − 𝐶)) < (2 · 𝐴))
42 2nn 12456 . . . . . 6 2 ∈ ℕ
43 simpl1 1210 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐴 ∈ ℕ)
44 nnmulcl 12399 . . . . . 6 ((2 ∈ ℕ ∧ 𝐴 ∈ ℕ) → (2 · 𝐴) ∈ ℕ)
4542, 43, 44sylancr 599 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → (2 · 𝐴) ∈ ℕ)
46 simpl2 1211 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐵 ∈ (0...𝐴))
4746elfzelzd 13697 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐵 ∈ ℤ)
48 simpl3 1212 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐶 ∈ (0...𝐴))
4948elfzelzd 13697 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐶 ∈ ℤ)
50 simpr 490 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → (2 · 𝐴) ∥ (𝐵 − 𝐶))
51 congabseq 44247 . . . . 5 ((((2 · 𝐴) ∈ ℕ ∧ 𝐵 ∈ ℤ ∧ 𝐶 ∈ ℤ) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → ((abs‘(𝐵 − 𝐶)) < (2 · 𝐴) ↔ 𝐵 = 𝐶))
5245, 47, 49, 50, 51syl31anc 1401 . . . 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 13700 . . . . . . . . . . 11 (𝐵 ∈ (0...𝐴) → 0 ≤ 𝐵)
5654, 55syl 18 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ≤ 𝐵)
577zred 12843 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ ℝ)
5816zred 12843 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ ℝ)
5958renegcld 11782 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → -𝐶 ∈ ℝ)
6057, 59resubcld 11783 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − -𝐶) ∈ ℝ)
6160recnd 11376 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − -𝐶) ∈ ℂ)
6261abscld 15650 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − -𝐶)) ∈ ℝ)
6362ad2antrr 739 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) ∈ ℝ)
64 1re 11347 . . . . . . . . . . . . . . . 16 1 ∈ ℝ
65 resubcl 11661 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℝ ∧ 1 ∈ ℝ) → (𝐴 − 1) ∈ ℝ)
6621, 64, 65sylancl 598 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 1) ∈ ℝ)
6766renegcld 11782 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → -(𝐴 − 1) ∈ ℝ)
6821, 67resubcld 11783 . . . . . . . . . . . . 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 12844 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 ∈ ℂ)
7316znegcld 12845 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → -𝐶 ∈ ℤ)
7473ad2antrr 739 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 ∈ ℤ)
7574zcnd 12844 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 ∈ ℂ)
7672, 75abssubd 15667 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) = (abs‘( -𝐶 − 𝐵)))
77 0zd 12745 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ∈ ℤ)
78 simpr 490 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 ∈ (0...(𝐴 − 1)))
79 0zd 12745 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 0 ∈ ℤ)
80 1z 12766 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℤ
81 zsubcl 12778 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℤ ∧ 1 ∈ ℤ) → (𝐴 − 1) ∈ ℤ)
823, 80, 81sylancl 598 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 1) ∈ ℤ)
83 fzneg 44255 . . . . . . . . . . . . . . . . . 18 ((𝐶 ∈ ℤ ∧ 0 ∈ ℤ ∧ (𝐴 − 1) ∈ ℤ) → (𝐶 ∈ (0...(𝐴 − 1)) ↔ -𝐶 ∈ ( -(𝐴 − 1)... -0)))
8416, 79, 82, 83syl3anc 1399 . . . . . . . . . . . . . . . . 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 11643 . . . . . . . . . . . . . . . . 17 -0 = 0
8887a1i 11 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -0 = 0)
8988oveq2d 7467 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → ( -(𝐴 − 1)... -0) = ( -(𝐴 − 1)...0))
9086, 89eleqtrd 2866 . . . . . . . . . . . . . 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 12687 . . . . . . . . . . . . . . . . . 18 ((2 · 𝐴) ∈ ℕ → ((2 · 𝐴) − 1) ∈ ℕ0)
9593, 94syl 18 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) − 1) ∈ ℕ0)
9695nn0ge0d 12710 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 0 ≤ ((2 · 𝐴) − 1))
97 0m0e0 12501 . . . . . . . . . . . . . . . . 17 (0 − 0) = 0
9897a1i 11 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (0 − 0) = 0)
99 1cnd 11341 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 1 ∈ ℂ)
10036, 36, 99addsubassd 11728 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((𝐴 + 𝐴) − 1) = (𝐴 + (𝐴 − 1)))
10138oveq1d 7466 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) − 1) = ((𝐴 + 𝐴) − 1))
102 ax-1cn 11297 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℂ
103 subcl 11595 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → (𝐴 − 1) ∈ ℂ)
10436, 102, 103sylancl 598 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 1) ∈ ℂ)
10536, 104subnegd 11715 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) = (𝐴 + (𝐴 − 1)))
106100, 101, 1053eqtr4rd 2809 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) = ((2 · 𝐴) − 1))
10796, 98, 1063brtr4d 5143 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (0 − 0) ≤ (𝐴 − -(𝐴 − 1)))
108107ad2antrr 739 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (0 − 0) ≤ (𝐴 − -(𝐴 − 1)))
109 fzmaxdif 44254 . . . . . . . . . . . . . 14 (((0 ∈ ℤ ∧ -𝐶 ∈ ( -(𝐴 − 1)...0)) ∧ (𝐴 ∈ ℤ ∧ 𝐵 ∈ (0...𝐴)) ∧ (0 − 0) ≤ (𝐴 − -(𝐴 − 1))) → (abs‘( -𝐶 − 𝐵)) ≤ (𝐴 − -(𝐴 − 1)))
11077, 90, 91, 54, 108, 109syl221anc 1409 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘( -𝐶 − 𝐵)) ≤ (𝐴 − -(𝐴 − 1)))
11176, 110eqbrtrd 5133 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) ≤ (𝐴 − -(𝐴 − 1)))
11227ltm1d 12289 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) − 1) < (2 · 𝐴))
113106, 112eqbrtrd 5133 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) < (2 · 𝐴))
114113ad2antrr 739 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (𝐴 − -(𝐴 − 1)) < (2 · 𝐴))
11563, 69, 70, 111, 114lelttrd 11507 . . . . . . . . . . 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 44247 . . . . . . . . . . . 12 ((((2 · 𝐴) ∈ ℕ ∧ 𝐵 ∈ ℤ ∧ -𝐶 ∈ ℤ) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) → ((abs‘(𝐵 − -𝐶)) < (2 · 𝐴) ↔ 𝐵 = -𝐶))
119116, 71, 74, 117, 118syl31anc 1401 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → ((abs‘(𝐵 − -𝐶)) < (2 · 𝐴) ↔ 𝐵 = -𝐶))
120115, 119mpbid 235 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 = -𝐶)
12156, 120breqtrd 5137 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ≤ -𝐶)
122 elfzelz 13696 . . . . . . . . . . . 12 (𝐶 ∈ (0...(𝐴 − 1)) → 𝐶 ∈ ℤ)
123122zred 12843 . . . . . . . . . . 11 (𝐶 ∈ (0...(𝐴 − 1)) → 𝐶 ∈ ℝ)
124123adantl 487 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 ∈ ℝ)
125124le0neg1d 11927 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (𝐶 ≤ 0 ↔ 0 ≤ -𝐶))
126121, 125mpbird 260 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 ≤ 0)
127 elfzle1 13700 . . . . . . . . 9 (𝐶 ∈ (0...(𝐴 − 1)) → 0 ≤ 𝐶)
128127adantl 487 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ≤ 𝐶)
129 letri3 11434 . . . . . . . . 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 11590 . . . . . 6 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 = -0)
133132, 88eqtrd 2798 . . . . 5 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 = 0)
134133, 120, 1313eqtr4d 2808 . . . 4 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 = 𝐶)
135 oveq2 7459 . . . . . . . . 9 (𝐶 = 𝐴 → (𝐵 − 𝐶) = (𝐵 − 𝐴))
136135adantl 487 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 − 𝐶) = (𝐵 − 𝐴))
137136fveq2d 6920 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (abs‘(𝐵 − 𝐶)) = (abs‘(𝐵 − 𝐴)))
13840ad2antrr 739 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (abs‘(𝐵 − 𝐶)) < (2 · 𝐴))
139137, 138eqbrtrrd 5135 . . . . . 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 12844 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ ℂ)
14536, 36, 144ppncand 11748 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐴 + 𝐵))
14636, 144addcomd 11551 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 + 𝐵) = (𝐵 + 𝐴))
147145, 146eqtrd 2798 . . . . . . . . . . . 12 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐵 + 𝐴))
148147ad2antrr 739 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐵 + 𝐴))
149 oveq2 7459 . . . . . . . . . . . 12 (𝐶 = 𝐴 → (𝐵 + 𝐶) = (𝐵 + 𝐴))
150149adantl 487 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 + 𝐶) = (𝐵 + 𝐴))
151148, 150eqtr4d 2801 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐵 + 𝐶))
15238oveq1d 7466 . . . . . . . . . . 11 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) + (𝐵 − 𝐴)) = ((𝐴 + 𝐴) + (𝐵 − 𝐴)))
153152ad2antrr 739 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((2 · 𝐴) + (𝐵 − 𝐴)) = ((𝐴 + 𝐴) + (𝐵 − 𝐴)))
15416zcnd 12844 . . . . . . . . . . . 12 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ ℂ)
155144, 154subnegd 11715 . . . . . . . . . . 11 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − -𝐶) = (𝐵 + 𝐶))
156155ad2antrr 739 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 − -𝐶) = (𝐵 + 𝐶))
157151, 153, 1563eqtr4d 2808 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((2 · 𝐴) + (𝐵 − 𝐴)) = (𝐵 − -𝐶))
158143, 157breqtrrd 5139 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (2 · 𝐴) ∥ ((2 · 𝐴) + (𝐵 − 𝐴)))
1595ad2antrr 739 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (2 · 𝐴) ∈ ℤ)
1607, 3zsubcld 12848 . . . . . . . . . 10 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − 𝐴) ∈ ℤ)
161160ad2antrr 739 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 − 𝐴) ∈ ℤ)
162 dvdsadd 16516 . . . . . . . . 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 44247 . . . . . . 7 ((((2 · 𝐴) ∈ ℕ ∧ 𝐵 ∈ ℤ ∧ 𝐴 ∈ ℤ) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐴)) → ((abs‘(𝐵 − 𝐴)) < (2 · 𝐴) ↔ 𝐵 = 𝐴))
166140, 141, 142, 164, 165syl31anc 1401 . . . . . 6 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((abs‘(𝐵 − 𝐴)) < (2 · 𝐴) ↔ 𝐵 = 𝐴))
167139, 166mpbid 235 . . . . 5 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → 𝐵 = 𝐴)
168 simpr 490 . . . . 5 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → 𝐶 = 𝐴)
169167, 168eqtr4d 2801 . . . 4 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → 𝐵 = 𝐶)
170 nnnn0 12653 . . . . . . . 8 (𝐴 ∈ ℕ → 𝐴 ∈ ℕ0)
1711703ad2ant1 1151 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℕ0)
172 nn0uz 13043 . . . . . . 7 ℕ0 = (ℤ≥‘0)
173171, 172eleqtrdi 2874 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ (ℤ≥‘0))
174 fzm1 13781 . . . . . . 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 2147   class class class wbr 5108  ‘cfv 6566  (class class class)co 7451  ℂcc 11237  ℝcr 11238  0cc0 11239  1c1 11240   + caddc 11242   · cmul 11244   < clt 11382   ≤ cle 11383   − cmin 11580   -cneg 11581  ℕcn 12375  2c2 12437  ℕ0cn0 12646  ℤcz 12733  ℤ≥cuz 13005  ℝ+crp 13160  ...cfz 13679  abscabs 15444   ∥ cdvds 16466
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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783  ax-cnex 11295  ax-resscn 11296  ax-1cn 11297  ax-icn 11298  ax-addcl 11299  ax-addrcl 11300  ax-mulcl 11301  ax-mulrcl 11302  ax-mulcom 11303  ax-addass 11304  ax-mulass 11305  ax-distr 11306  ax-i2m1 11307  ax-1ne0 11308  ax-1rid 11309  ax-rnegex 11310  ax-rrecex 11311  ax-cnre 11312  ax-pre-lttri 11313  ax-pre-lttrn 11314  ax-pre-ltadd 11315  ax-pre-mulgt0 11316  ax-pre-sup 11317
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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4841  df-uni 4873  df-iun 4958  df-br 5109  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-pred 6330  df-ord 6391  df-on 6392  df-lim 6393  df-suc 6394  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-riota 7408  df-ov 7454  df-oprab 7455  df-mpo 7456  df-om 7912  df-1st 8035  df-2nd 8036  df-frecs 8337  df-wrecs 8368  df-recs 8417  df-rdg 8456  df-er 8755  df-en 9012  df-dom 9013  df-sdom 9014  df-sup 9471  df-pnf 11384  df-mnf 11385  df-xr 11386  df-ltxr 11387  df-le 11388  df-sub 11582  df-neg 11583  df-div 12014  df-nn 12376  df-2 12445  df-3 12446  df-n0 12647  df-z 12734  df-uz 13006  df-rp 13161  df-fz 13680  df-seq 14185  df-exp 14245  df-cj 15309  df-re 15310  df-im 15311  df-sqrt 15445  df-abs 15446  df-dvds 16467
This theorem is used by:  jm2.27a  44278
  Copyright terms: Public domain W3C validator