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

Proof of Theorem acongeq
StepHypRef Expression
1 2z 12735 . . . . . . 7 2 ∈ ℤ
2 nnz 12721 . . . . . . . 8 (𝐴 ∈ ℕ → 𝐴 ∈ ℤ)
323ad2ant1 1151 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℤ)
4 zmulcl 12752 . . . . . . 7 ((2 ∈ ℤ ∧ 𝐴 ∈ ℤ) → (2 · 𝐴) ∈ ℤ)
51, 3, 4sylancr 599 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) ∈ ℤ)
6 elfzelz 13663 . . . . . . 7 (𝐵 ∈ (0...𝐴) → 𝐵 ∈ ℤ)
763ad2ant2 1152 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ ℤ)
8 congid 44115 . . . . . 6 (((2 · 𝐴) ∈ ℤ ∧ 𝐵 ∈ ℤ) → (2 · 𝐴) ∥ (𝐵 − 𝐵))
95, 7, 8syl2anc 596 . . . . 5 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) ∥ (𝐵 − 𝐵))
109adantr 486 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → (2 · 𝐴) ∥ (𝐵 − 𝐵))
11 oveq2 7432 . . . . 5 (𝐵 = 𝐶 → (𝐵 − 𝐵) = (𝐵 − 𝐶))
1211adantl 487 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → (𝐵 − 𝐵) = (𝐵 − 𝐶))
1310, 12breqtrd 5130 . . 3 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → (2 · 𝐴) ∥ (𝐵 − 𝐶))
1413orcd 887 . 2 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ 𝐵 = 𝐶) → ((2 · 𝐴) ∥ (𝐵 − 𝐶) ∨ (2 · 𝐴) ∥ (𝐵 − -𝐶)))
15 elfzelz 13663 . . . . . . . . . 10 (𝐶 ∈ (0...𝐴) → 𝐶 ∈ ℤ)
16153ad2ant3 1153 . . . . . . . . 9 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ ℤ)
177, 16zsubcld 12815 . . . . . . . 8 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − 𝐶) ∈ ℤ)
1817zcnd 12811 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − 𝐶) ∈ ℂ)
1918abscld 15615 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − 𝐶)) ∈ ℝ)
20 nnre 12349 . . . . . . . 8 (𝐴 ∈ ℕ → 𝐴 ∈ ℝ)
21203ad2ant1 1151 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℝ)
22 0re 11317 . . . . . . 7 0 ∈ ℝ
23 resubcl 11629 . . . . . . 7 ((𝐴 ∈ ℝ ∧ 0 ∈ ℝ) → (𝐴 − 0) ∈ ℝ)
2421, 22, 23sylancl 598 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) ∈ ℝ)
25 2re 12424 . . . . . . 7 2 ∈ ℝ
26 remulcl 11292 . . . . . . 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 11889 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) ≤ (𝐴 − 0))
31 fzmaxdif 44125 . . . . . . 7 (((𝐴 ∈ ℤ ∧ 𝐵 ∈ (0...𝐴)) ∧ (𝐴 ∈ ℤ ∧ 𝐶 ∈ (0...𝐴)) ∧ (𝐴 − 0) ≤ (𝐴 − 0)) → (abs‘(𝐵 − 𝐶)) ≤ (𝐴 − 0))
323, 28, 3, 29, 30, 31syl221anc 1408 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − 𝐶)) ≤ (𝐴 − 0))
33 nnrp 13139 . . . . . . . . 9 (𝐴 ∈ ℕ → 𝐴 ∈ ℝ+)
34333ad2ant1 1151 . . . . . . . 8 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℝ+)
3521, 34ltaddrpd 13204 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 < (𝐴 + 𝐴))
3621recnd 11344 . . . . . . . 8 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℂ)
3736subid1d 11665 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) = 𝐴)
38362timesd 12596 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (2 · 𝐴) = (𝐴 + 𝐴))
3935, 37, 383brtr4d 5136 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 0) < (2 · 𝐴))
4019, 24, 27, 32, 39lelttrd 11475 . . . . 5 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − 𝐶)) < (2 · 𝐴))
4140adantr 486 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → (abs‘(𝐵 − 𝐶)) < (2 · 𝐴))
42 2nn 12423 . . . . . 6 2 ∈ ℕ
43 simpl1 1210 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐴 ∈ ℕ)
44 nnmulcl 12366 . . . . . 6 ((2 ∈ ℕ ∧ 𝐴 ∈ ℕ) → (2 · 𝐴) ∈ ℕ)
4542, 43, 44sylancr 599 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → (2 · 𝐴) ∈ ℕ)
46 simpl2 1211 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐵 ∈ (0...𝐴))
4746elfzelzd 13664 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐵 ∈ ℤ)
48 simpl3 1212 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐶 ∈ (0...𝐴))
4948elfzelzd 13664 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → 𝐶 ∈ ℤ)
50 simpr 490 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − 𝐶)) → (2 · 𝐴) ∥ (𝐵 − 𝐶))
51 congabseq 44118 . . . . 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 13667 . . . . . . . . . . 11 (𝐵 ∈ (0...𝐴) → 0 ≤ 𝐵)
5654, 55syl 18 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ≤ 𝐵)
577zred 12810 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ ℝ)
5816zred 12810 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ ℝ)
5958renegcld 11750 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → -𝐶 ∈ ℝ)
6057, 59resubcld 11751 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − -𝐶) ∈ ℝ)
6160recnd 11344 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − -𝐶) ∈ ℂ)
6261abscld 15615 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (abs‘(𝐵 − -𝐶)) ∈ ℝ)
6362ad2antrr 739 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) ∈ ℝ)
64 1re 11315 . . . . . . . . . . . . . . . 16 1 ∈ ℝ
65 resubcl 11629 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℝ ∧ 1 ∈ ℝ) → (𝐴 − 1) ∈ ℝ)
6621, 64, 65sylancl 598 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 1) ∈ ℝ)
6766renegcld 11750 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → -(𝐴 − 1) ∈ ℝ)
6821, 67resubcld 11751 . . . . . . . . . . . . 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 12811 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 ∈ ℂ)
7316znegcld 12812 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → -𝐶 ∈ ℤ)
7473ad2antrr 739 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 ∈ ℤ)
7574zcnd 12811 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 ∈ ℂ)
7672, 75abssubd 15632 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) = (abs‘( -𝐶 − 𝐵)))
77 0zd 12712 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ∈ ℤ)
78 simpr 490 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 ∈ (0...(𝐴 − 1)))
79 0zd 12712 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 0 ∈ ℤ)
80 1z 12733 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℤ
81 zsubcl 12745 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℤ ∧ 1 ∈ ℤ) → (𝐴 − 1) ∈ ℤ)
823, 80, 81sylancl 598 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 1) ∈ ℤ)
83 fzneg 44126 . . . . . . . . . . . . . . . . . 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 11611 . . . . . . . . . . . . . . . . 17 -0 = 0
8887a1i 11 . . . . . . . . . . . . . . . 16 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -0 = 0)
8988oveq2d 7440 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → ( -(𝐴 − 1)... -0) = ( -(𝐴 − 1)...0))
9086, 89eleqtrd 2862 . . . . . . . . . . . . . 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 12654 . . . . . . . . . . . . . . . . . 18 ((2 · 𝐴) ∈ ℕ → ((2 · 𝐴) − 1) ∈ ℕ0)
9593, 94syl 18 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) − 1) ∈ ℕ0)
9695nn0ge0d 12677 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 0 ≤ ((2 · 𝐴) − 1))
97 0m0e0 12468 . . . . . . . . . . . . . . . . 17 (0 − 0) = 0
9897a1i 11 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (0 − 0) = 0)
99 1cnd 11309 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 1 ∈ ℂ)
10036, 36, 99addsubassd 11696 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((𝐴 + 𝐴) − 1) = (𝐴 + (𝐴 − 1)))
10138oveq1d 7439 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) − 1) = ((𝐴 + 𝐴) − 1))
102 ax-1cn 11265 . . . . . . . . . . . . . . . . . . 19 1 ∈ ℂ
103 subcl 11563 . . . . . . . . . . . . . . . . . . 19 ((𝐴 ∈ ℂ ∧ 1 ∈ ℂ) → (𝐴 − 1) ∈ ℂ)
10436, 102, 103sylancl 598 . . . . . . . . . . . . . . . . . 18 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − 1) ∈ ℂ)
10536, 104subnegd 11683 . . . . . . . . . . . . . . . . 17 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) = (𝐴 + (𝐴 − 1)))
106100, 101, 1053eqtr4rd 2806 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) = ((2 · 𝐴) − 1))
10796, 98, 1063brtr4d 5136 . . . . . . . . . . . . . . 15 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (0 − 0) ≤ (𝐴 − -(𝐴 − 1)))
108107ad2antrr 739 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (0 − 0) ≤ (𝐴 − -(𝐴 − 1)))
109 fzmaxdif 44125 . . . . . . . . . . . . . 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 5126 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (abs‘(𝐵 − -𝐶)) ≤ (𝐴 − -(𝐴 − 1)))
11227ltm1d 12256 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) − 1) < (2 · 𝐴))
113106, 112eqbrtrd 5126 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 − -(𝐴 − 1)) < (2 · 𝐴))
114113ad2antrr 739 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (𝐴 − -(𝐴 − 1)) < (2 · 𝐴))
11563, 69, 70, 111, 114lelttrd 11475 . . . . . . . . . . 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 44118 . . . . . . . . . . . 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 5130 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ≤ -𝐶)
122 elfzelz 13663 . . . . . . . . . . . 12 (𝐶 ∈ (0...(𝐴 − 1)) → 𝐶 ∈ ℤ)
123122zred 12810 . . . . . . . . . . 11 (𝐶 ∈ (0...(𝐴 − 1)) → 𝐶 ∈ ℝ)
124123adantl 487 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 ∈ ℝ)
125124le0neg1d 11894 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → (𝐶 ≤ 0 ↔ 0 ≤ -𝐶))
126121, 125mpbird 260 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐶 ≤ 0)
127 elfzle1 13667 . . . . . . . . 9 (𝐶 ∈ (0...(𝐴 − 1)) → 0 ≤ 𝐶)
128127adantl 487 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 0 ≤ 𝐶)
129 letri3 11402 . . . . . . . . 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 11558 . . . . . 6 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 = -0)
133132, 88eqtrd 2795 . . . . 5 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → -𝐶 = 0)
134133, 120, 1313eqtr4d 2805 . . . 4 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 ∈ (0...(𝐴 − 1))) → 𝐵 = 𝐶)
135 oveq2 7432 . . . . . . . . 9 (𝐶 = 𝐴 → (𝐵 − 𝐶) = (𝐵 − 𝐴))
136135adantl 487 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 − 𝐶) = (𝐵 − 𝐴))
137136fveq2d 6894 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (abs‘(𝐵 − 𝐶)) = (abs‘(𝐵 − 𝐴)))
13840ad2antrr 739 . . . . . . 7 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (abs‘(𝐵 − 𝐶)) < (2 · 𝐴))
139137, 138eqbrtrrd 5128 . . . . . 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 12811 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐵 ∈ ℂ)
14536, 36, 144ppncand 11716 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐴 + 𝐵))
14636, 144addcomd 11519 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐴 + 𝐵) = (𝐵 + 𝐴))
147145, 146eqtrd 2795 . . . . . . . . . . . 12 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐵 + 𝐴))
148147ad2antrr 739 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐵 + 𝐴))
149 oveq2 7432 . . . . . . . . . . . 12 (𝐶 = 𝐴 → (𝐵 + 𝐶) = (𝐵 + 𝐴))
150149adantl 487 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 + 𝐶) = (𝐵 + 𝐴))
151148, 150eqtr4d 2798 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((𝐴 + 𝐴) + (𝐵 − 𝐴)) = (𝐵 + 𝐶))
15238oveq1d 7439 . . . . . . . . . . 11 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → ((2 · 𝐴) + (𝐵 − 𝐴)) = ((𝐴 + 𝐴) + (𝐵 − 𝐴)))
153152ad2antrr 739 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((2 · 𝐴) + (𝐵 − 𝐴)) = ((𝐴 + 𝐴) + (𝐵 − 𝐴)))
15416zcnd 12811 . . . . . . . . . . . 12 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐶 ∈ ℂ)
155144, 154subnegd 11683 . . . . . . . . . . 11 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − -𝐶) = (𝐵 + 𝐶))
156155ad2antrr 739 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 − -𝐶) = (𝐵 + 𝐶))
157151, 153, 1563eqtr4d 2805 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → ((2 · 𝐴) + (𝐵 − 𝐴)) = (𝐵 − -𝐶))
158143, 157breqtrrd 5132 . . . . . . . 8 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (2 · 𝐴) ∥ ((2 · 𝐴) + (𝐵 − 𝐴)))
1595ad2antrr 739 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (2 · 𝐴) ∈ ℤ)
1607, 3zsubcld 12815 . . . . . . . . . 10 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → (𝐵 − 𝐴) ∈ ℤ)
161160ad2antrr 739 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → (𝐵 − 𝐴) ∈ ℤ)
162 dvdsadd 16481 . . . . . . . . 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 44118 . . . . . . 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 2798 . . . 4 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) ∧ (2 · 𝐴) ∥ (𝐵 − -𝐶)) ∧ 𝐶 = 𝐴) → 𝐵 = 𝐶)
170 nnnn0 12620 . . . . . . . 8 (𝐴 ∈ ℕ → 𝐴 ∈ ℕ0)
1711703ad2ant1 1151 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ ℕ0)
172 nn0uz 13010 . . . . . . 7 ℕ0 = (ℤ≥‘0)
173171, 172eleqtrdi 2870 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ (0...𝐴) ∧ 𝐶 ∈ (0...𝐴)) → 𝐴 ∈ (ℤ≥‘0))
174 fzm1 13748 . . . . . . 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 1569   ∈ wcel 2144   class class class wbr 5102  ‘cfv 6543  (class class class)co 7424  ℂcc 11205  ℝcr 11206  0cc0 11207  1c1 11208   + caddc 11210   · cmul 11212   < clt 11350   ≤ cle 11351   − cmin 11548   -cneg 11549  ℕcn 12342  2c2 12404  ℕ0cn0 12613  ℤcz 12700  ℤ≥cuz 12972  ℝ+crp 13127  ...cfz 13646  abscabs 15410   ∥ cdvds 16431
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-sep 5248  ax-nul 5259  ax-pow 5327  ax-pr 5391  ax-un 7755  ax-cnex 11263  ax-resscn 11264  ax-1cn 11265  ax-icn 11266  ax-addcl 11267  ax-addrcl 11268  ax-mulcl 11269  ax-mulrcl 11270  ax-mulcom 11271  ax-addass 11272  ax-mulass 11273  ax-distr 11274  ax-i2m1 11275  ax-1ne0 11276  ax-1rid 11277  ax-rnegex 11278  ax-rrecex 11279  ax-cnre 11280  ax-pre-lttri 11281  ax-pre-lttrn 11282  ax-pre-ltadd 11283  ax-pre-mulgt0 11284  ax-pre-sup 11285
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  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 6307  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-riota 7381  df-ov 7427  df-oprab 7428  df-mpo 7429  df-om 7882  df-1st 8005  df-2nd 8006  df-frecs 8307  df-wrecs 8338  df-recs 8387  df-rdg 8426  df-er 8725  df-en 8982  df-dom 8983  df-sdom 8984  df-sup 9441  df-pnf 11352  df-mnf 11353  df-xr 11354  df-ltxr 11355  df-le 11356  df-sub 11550  df-neg 11551  df-div 11981  df-nn 12343  df-2 12412  df-3 12413  df-n0 12614  df-z 12701  df-uz 12973  df-rp 13128  df-fz 13647  df-seq 14152  df-exp 14212  df-cj 15275  df-re 15276  df-im 15277  df-sqrt 15411  df-abs 15412  df-dvds 16432
This theorem is used by:  jm2.27a  44149
  Copyright terms: Public domain W3C validator