Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  archirngz Structured version   Visualization version   GIF version

Theorem archirngz 33803
Description: Property of Archimedean left and right ordered groups. (Contributed by Thierry Arnoux, 6-May-2018.)
Hypotheses
Ref Expression
archirng.b 𝐵 = (Base‘𝑊)
archirng.0 0 = (0g‘𝑊)
archirng.i < = (lt‘𝑊)
archirng.l ≤ = (le‘𝑊)
archirng.x · = (.g‘𝑊)
archirng.1 (𝜑 → 𝑊 ∈ oGrp)
archirng.2 (𝜑 → 𝑊 ∈ Archi)
archirng.3 (𝜑 → 𝑋 ∈ 𝐵)
archirng.4 (𝜑 → 𝑌 ∈ 𝐵)
archirng.5 (𝜑 → 0 < 𝑋)
archirngz.1 (𝜑 → (oppg‘𝑊) ∈ oGrp)
Assertion
Ref Expression
archirngz (𝜑 → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
Distinct variable groups:   𝑛,𝑋   𝑛,𝑌   𝜑,𝑛   0 ,𝑛   ≤ ,𝑛   < ,𝑛   · ,𝑛
Allowed substitution hints:   𝐵(𝑛)   𝑊(𝑛)

Proof of Theorem archirngz
Dummy variable 𝑚 is distinct from all other variables.
StepHypRef Expression
1 neg1z 12742 . . 3 -1 ∈ ℤ
2 archirng.1 . . . . . . . . . 10 (𝜑 → 𝑊 ∈ oGrp)
3 ogrpgrp 20351 . . . . . . . . . 10 (𝑊 ∈ oGrp → 𝑊 ∈ Grp)
42, 3syl 18 . . . . . . . . 9 (𝜑 → 𝑊 ∈ Grp)
5 1zzd 12737 . . . . . . . . 9 (𝜑 → 1 ∈ ℤ)
6 archirng.3 . . . . . . . . 9 (𝜑 → 𝑋 ∈ 𝐵)
7 archirng.b . . . . . . . . . 10 𝐵 = (Base‘𝑊)
8 archirng.x . . . . . . . . . 10 · = (.g‘𝑊)
9 eqid 2763 . . . . . . . . . 10 (invg‘𝑊) = (invg‘𝑊)
107, 8, 9mulgneg 19314 . . . . . . . . 9 ((𝑊 ∈ Grp ∧ 1 ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ( -1 · 𝑋) = ((invg‘𝑊)‘(1 · 𝑋)))
114, 5, 6, 10syl3anc 1398 . . . . . . . 8 (𝜑 → ( -1 · 𝑋) = ((invg‘𝑊)‘(1 · 𝑋)))
127, 8mulg1 19303 . . . . . . . . . 10 (𝑋 ∈ 𝐵 → (1 · 𝑋) = 𝑋)
136, 12syl 18 . . . . . . . . 9 (𝜑 → (1 · 𝑋) = 𝑋)
1413fveq2d 6897 . . . . . . . 8 (𝜑 → ((invg‘𝑊)‘(1 · 𝑋)) = ((invg‘𝑊)‘𝑋))
1511, 14eqtrd 2798 . . . . . . 7 (𝜑 → ( -1 · 𝑋) = ((invg‘𝑊)‘𝑋))
16 archirng.5 . . . . . . . 8 (𝜑 → 0 < 𝑋)
17 archirng.i . . . . . . . . . 10 < = (lt‘𝑊)
18 archirng.0 . . . . . . . . . 10 0 = (0g‘𝑊)
197, 17, 9, 18ogrpinv0lt 20369 . . . . . . . . 9 ((𝑊 ∈ oGrp ∧ 𝑋 ∈ 𝐵) → ( 0 < 𝑋 ↔ ((invg‘𝑊)‘𝑋) < 0 ))
2019biimpa 482 . . . . . . . 8 (((𝑊 ∈ oGrp ∧ 𝑋 ∈ 𝐵) ∧ 0 < 𝑋) → ((invg‘𝑊)‘𝑋) < 0 )
212, 6, 16, 20syl21anc 851 . . . . . . 7 (𝜑 → ((invg‘𝑊)‘𝑋) < 0 )
2215, 21eqbrtrd 5129 . . . . . 6 (𝜑 → ( -1 · 𝑋) < 0 )
2322adantr 486 . . . . 5 ((𝜑 ∧ 𝑌 = 0 ) → ( -1 · 𝑋) < 0 )
24 simpr 490 . . . . 5 ((𝜑 ∧ 𝑌 = 0 ) → 𝑌 = 0 )
2523, 24breqtrrd 5135 . . . 4 ((𝜑 ∧ 𝑌 = 0 ) → ( -1 · 𝑋) < 𝑌)
26 isogrp 20350 . . . . . . . . . 10 (𝑊 ∈ oGrp ↔ (𝑊 ∈ Grp ∧ 𝑊 ∈ oMnd))
2726simprbi 503 . . . . . . . . 9 (𝑊 ∈ oGrp → 𝑊 ∈ oMnd)
28 omndtos 20353 . . . . . . . . 9 (𝑊 ∈ oMnd → 𝑊 ∈ Toset)
292, 27, 283syl 19 . . . . . . . 8 (𝜑 → 𝑊 ∈ Toset)
30 tospos 18604 . . . . . . . 8 (𝑊 ∈ Toset → 𝑊 ∈ Poset)
3129, 30syl 18 . . . . . . 7 (𝜑 → 𝑊 ∈ Poset)
327, 18grpidcl 19188 . . . . . . . 8 (𝑊 ∈ Grp → 0 ∈ 𝐵)
332, 3, 323syl 19 . . . . . . 7 (𝜑 → 0 ∈ 𝐵)
34 archirng.l . . . . . . . 8 ≤ = (le‘𝑊)
357, 34posref 18504 . . . . . . 7 ((𝑊 ∈ Poset ∧ 0 ∈ 𝐵) → 0 ≤ 0 )
3631, 33, 35syl2anc 596 . . . . . 6 (𝜑 → 0 ≤ 0 )
3736adantr 486 . . . . 5 ((𝜑 ∧ 𝑌 = 0 ) → 0 ≤ 0 )
38 1m1e0 12425 . . . . . . . . . 10 (1 − 1) = 0
3938negeqi 11560 . . . . . . . . 9 -(1 − 1) = -0
40 ax-1cn 11268 . . . . . . . . . 10 1 ∈ ℂ
4140, 40negsubdii 11653 . . . . . . . . 9 -(1 − 1) = ( -1 + 1)
42 neg0 11614 . . . . . . . . 9 -0 = 0
4339, 41, 423eqtr3i 2794 . . . . . . . 8 ( -1 + 1) = 0
4443oveq1i 7437 . . . . . . 7 (( -1 + 1) · 𝑋) = (0 · 𝑋)
457, 18, 8mulg0 19296 . . . . . . . 8 (𝑋 ∈ 𝐵 → (0 · 𝑋) = 0 )
466, 45syl 18 . . . . . . 7 (𝜑 → (0 · 𝑋) = 0 )
4744, 46eqtrid 2810 . . . . . 6 (𝜑 → (( -1 + 1) · 𝑋) = 0 )
4847adantr 486 . . . . 5 ((𝜑 ∧ 𝑌 = 0 ) → (( -1 + 1) · 𝑋) = 0 )
4937, 24, 483brtr4d 5139 . . . 4 ((𝜑 ∧ 𝑌 = 0 ) → 𝑌 ≤ (( -1 + 1) · 𝑋))
5025, 49jca 521 . . 3 ((𝜑 ∧ 𝑌 = 0 ) → (( -1 · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -1 + 1) · 𝑋)))
51 oveq1 7434 . . . . . 6 (𝑛 = -1 → (𝑛 · 𝑋) = ( -1 · 𝑋))
5251breq1d 5115 . . . . 5 (𝑛 = -1 → ((𝑛 · 𝑋) < 𝑌 ↔ ( -1 · 𝑋) < 𝑌))
53 oveq1 7434 . . . . . . 7 (𝑛 = -1 → (𝑛 + 1) = ( -1 + 1))
5453oveq1d 7442 . . . . . 6 (𝑛 = -1 → ((𝑛 + 1) · 𝑋) = (( -1 + 1) · 𝑋))
5554breq2d 5117 . . . . 5 (𝑛 = -1 → (𝑌 ≤ ((𝑛 + 1) · 𝑋) ↔ 𝑌 ≤ (( -1 + 1) · 𝑋)))
5652, 55anbi12d 644 . . . 4 (𝑛 = -1 → (((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)) ↔ (( -1 · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -1 + 1) · 𝑋))))
5756rspcev 3579 . . 3 (( -1 ∈ ℤ ∧ (( -1 · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -1 + 1) · 𝑋))) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
581, 50, 57sylancr 599 . 2 ((𝜑 ∧ 𝑌 = 0 ) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
59 simpr 490 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℕ0)
6059nn0zd 12728 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℤ)
6160ad2antrr 739 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → 𝑚 ∈ ℤ)
6261znegcld 12815 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → -𝑚 ∈ ℤ)
63 2z 12738 . . . . . . 7 2 ∈ ℤ
6463a1i 11 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → 2 ∈ ℤ)
6562, 64zsubcld 12818 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ( -𝑚 − 2) ∈ ℤ)
66 nn0cn 12626 . . . . . . . . . . 11 (𝑚 ∈ ℕ0 → 𝑚 ∈ ℂ)
6766adantl 487 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℂ)
68 2cnd 12431 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 2 ∈ ℂ)
6967, 68negdi2d 11693 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → -(𝑚 + 2) = ( -𝑚 − 2))
7069oveq1d 7442 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 2) · 𝑋) = (( -𝑚 − 2) · 𝑋))
712ad2antrr 739 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑊 ∈ oGrp)
72 archirngz.1 . . . . . . . . . . . 12 (𝜑 → (oppg‘𝑊) ∈ oGrp)
7372ad2antrr 739 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (oppg‘𝑊) ∈ oGrp)
7471, 73jca 521 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑊 ∈ oGrp ∧ (oppg‘𝑊) ∈ oGrp))
754ad2antrr 739 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑊 ∈ Grp)
7660peano2zd 12816 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 + 1) ∈ ℤ)
776ad2antrr 739 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑋 ∈ 𝐵)
787, 8mulgcl 19313 . . . . . . . . . . 11 ((𝑊 ∈ Grp ∧ (𝑚 + 1) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ((𝑚 + 1) · 𝑋) ∈ 𝐵)
7975, 76, 77, 78syl3anc 1398 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 1) · 𝑋) ∈ 𝐵)
8063a1i 11 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 2 ∈ ℤ)
8160, 80zaddcld 12817 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 + 2) ∈ ℤ)
827, 8mulgcl 19313 . . . . . . . . . . 11 ((𝑊 ∈ Grp ∧ (𝑚 + 2) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ((𝑚 + 2) · 𝑋) ∈ 𝐵)
8375, 81, 77, 82syl3anc 1398 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 2) · 𝑋) ∈ 𝐵)
8475, 32syl 18 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 0 ∈ 𝐵)
8516ad2antrr 739 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 0 < 𝑋)
86 eqid 2763 . . . . . . . . . . . . 13 (+g‘𝑊) = (+g‘𝑊)
877, 17, 86ogrpaddlt 20364 . . . . . . . . . . . 12 ((𝑊 ∈ oGrp ∧ ( 0 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵 ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵) ∧ 0 < 𝑋) → ( 0 (+g‘𝑊)((𝑚 + 1) · 𝑋)) < (𝑋(+g‘𝑊)((𝑚 + 1) · 𝑋)))
8871, 84, 77, 79, 85, 87syl131anc 1410 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( 0 (+g‘𝑊)((𝑚 + 1) · 𝑋)) < (𝑋(+g‘𝑊)((𝑚 + 1) · 𝑋)))
897, 86, 18grplid 19190 . . . . . . . . . . . 12 ((𝑊 ∈ Grp ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵) → ( 0 (+g‘𝑊)((𝑚 + 1) · 𝑋)) = ((𝑚 + 1) · 𝑋))
9075, 79, 89syl2anc 596 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( 0 (+g‘𝑊)((𝑚 + 1) · 𝑋)) = ((𝑚 + 1) · 𝑋))
91 1cnd 11312 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ0 → 1 ∈ ℂ)
9266, 91, 91addassd 11341 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) = (𝑚 + (1 + 1)))
93 1p1e2 12476 . . . . . . . . . . . . . . . . 17 (1 + 1) = 2
9493oveq2i 7438 . . . . . . . . . . . . . . . 16 (𝑚 + (1 + 1)) = (𝑚 + 2)
9592, 94eqtrdi 2814 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) = (𝑚 + 2))
9666, 91addcld 11338 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℂ)
9796, 91addcomd 11522 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) = (1 + (𝑚 + 1)))
9895, 97eqtr3d 2800 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → (𝑚 + 2) = (1 + (𝑚 + 1)))
9998oveq1d 7442 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ0 → ((𝑚 + 2) · 𝑋) = ((1 + (𝑚 + 1)) · 𝑋))
10099adantl 487 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 2) · 𝑋) = ((1 + (𝑚 + 1)) · 𝑋))
101 1zzd 12737 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 1 ∈ ℤ)
1027, 8, 86mulgdir 19328 . . . . . . . . . . . . 13 ((𝑊 ∈ Grp ∧ (1 ∈ ℤ ∧ (𝑚 + 1) ∈ ℤ ∧ 𝑋 ∈ 𝐵)) → ((1 + (𝑚 + 1)) · 𝑋) = ((1 · 𝑋)(+g‘𝑊)((𝑚 + 1) · 𝑋)))
10375, 101, 76, 77, 102syl13anc 1399 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((1 + (𝑚 + 1)) · 𝑋) = ((1 · 𝑋)(+g‘𝑊)((𝑚 + 1) · 𝑋)))
10477, 12syl 18 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (1 · 𝑋) = 𝑋)
105104oveq1d 7442 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((1 · 𝑋)(+g‘𝑊)((𝑚 + 1) · 𝑋)) = (𝑋(+g‘𝑊)((𝑚 + 1) · 𝑋)))
106100, 103, 1053eqtrrd 2803 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑋(+g‘𝑊)((𝑚 + 1) · 𝑋)) = ((𝑚 + 2) · 𝑋))
10788, 90, 1063brtr3d 5138 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 1) · 𝑋) < ((𝑚 + 2) · 𝑋))
1087, 17, 9ogrpinvlt 20370 . . . . . . . . . . 11 (((𝑊 ∈ oGrp ∧ (oppg‘𝑊) ∈ oGrp) ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵 ∧ ((𝑚 + 2) · 𝑋) ∈ 𝐵) → (((𝑚 + 1) · 𝑋) < ((𝑚 + 2) · 𝑋) ↔ ((invg‘𝑊)‘((𝑚 + 2) · 𝑋)) < ((invg‘𝑊)‘((𝑚 + 1) · 𝑋))))
109108biimpa 482 . . . . . . . . . 10 ((((𝑊 ∈ oGrp ∧ (oppg‘𝑊) ∈ oGrp) ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵 ∧ ((𝑚 + 2) · 𝑋) ∈ 𝐵) ∧ ((𝑚 + 1) · 𝑋) < ((𝑚 + 2) · 𝑋)) → ((invg‘𝑊)‘((𝑚 + 2) · 𝑋)) < ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
11074, 79, 83, 107, 109syl31anc 1400 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((invg‘𝑊)‘((𝑚 + 2) · 𝑋)) < ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
1117, 8, 9mulgneg 19314 . . . . . . . . . 10 ((𝑊 ∈ Grp ∧ (𝑚 + 2) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ( -(𝑚 + 2) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 2) · 𝑋)))
11275, 81, 77, 111syl3anc 1398 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 2) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 2) · 𝑋)))
1137, 8, 9mulgneg 19314 . . . . . . . . . 10 ((𝑊 ∈ Grp ∧ (𝑚 + 1) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ( -(𝑚 + 1) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
11475, 76, 77, 113syl3anc 1398 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 1) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
115110, 112, 1143brtr4d 5139 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 2) · 𝑋) < ( -(𝑚 + 1) · 𝑋))
11670, 115eqbrtrrd 5131 . . . . . . 7 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (( -𝑚 − 2) · 𝑋) < ( -(𝑚 + 1) · 𝑋))
117116ad2antrr 739 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → (( -𝑚 − 2) · 𝑋) < ( -(𝑚 + 1) · 𝑋))
118114ad2antrr 739 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ( -(𝑚 + 1) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
11931ad4antr 745 . . . . . . . . 9 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → 𝑊 ∈ Poset)
120 archirng.4 . . . . . . . . . . . 12 (𝜑 → 𝑌 ∈ 𝐵)
1217, 9grpinvcl 19210 . . . . . . . . . . . 12 ((𝑊 ∈ Grp ∧ 𝑌 ∈ 𝐵) → ((invg‘𝑊)‘𝑌) ∈ 𝐵)
1224, 120, 121syl2anc 596 . . . . . . . . . . 11 (𝜑 → ((invg‘𝑊)‘𝑌) ∈ 𝐵)
123122ad2antrr 739 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((invg‘𝑊)‘𝑌) ∈ 𝐵)
124123ad2antrr 739 . . . . . . . . 9 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ((invg‘𝑊)‘𝑌) ∈ 𝐵)
12579ad2antrr 739 . . . . . . . . 9 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ((𝑚 + 1) · 𝑋) ∈ 𝐵)
126 simplrr 790 . . . . . . . . 9 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))
127 simpr 490 . . . . . . . . 9 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌))
1287, 34posasymb 18505 . . . . . . . . . 10 ((𝑊 ∈ Poset ∧ ((invg‘𝑊)‘𝑌) ∈ 𝐵 ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵) → ((((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) ↔ ((invg‘𝑊)‘𝑌) = ((𝑚 + 1) · 𝑋)))
129128biimpa 482 . . . . . . . . 9 (((𝑊 ∈ Poset ∧ ((invg‘𝑊)‘𝑌) ∈ 𝐵 ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵) ∧ (((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌))) → ((invg‘𝑊)‘𝑌) = ((𝑚 + 1) · 𝑋))
130119, 124, 125, 126, 127, 129syl32anc 1405 . . . . . . . 8 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ((invg‘𝑊)‘𝑌) = ((𝑚 + 1) · 𝑋))
131130fveq2d 6897 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) = ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
1327, 9grpinvinv 19228 . . . . . . . . 9 ((𝑊 ∈ Grp ∧ 𝑌 ∈ 𝐵) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) = 𝑌)
1334, 120, 132syl2anc 596 . . . . . . . 8 (𝜑 → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) = 𝑌)
134133ad4antr 745 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) = 𝑌)
135118, 131, 1343eqtr2rd 2805 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → 𝑌 = ( -(𝑚 + 1) · 𝑋))
136117, 135breqtrrd 5135 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → (( -𝑚 − 2) · 𝑋) < 𝑌)
137 1cnd 11312 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 1 ∈ ℂ)
13867, 68, 137addsubassd 11699 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 2) − 1) = (𝑚 + (2 − 1)))
139 2m1e1 12477 . . . . . . . . . . . . 13 (2 − 1) = 1
140139oveq2i 7438 . . . . . . . . . . . 12 (𝑚 + (2 − 1)) = (𝑚 + 1)
141138, 140eqtr2di 2815 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 + 1) = ((𝑚 + 2) − 1))
142141negeqd 11561 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → -(𝑚 + 1) = -((𝑚 + 2) − 1))
14367, 68addcld 11338 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 + 2) ∈ ℂ)
144143, 137negsubdid 11694 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → -((𝑚 + 2) − 1) = ( -(𝑚 + 2) + 1))
14569oveq1d 7442 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 2) + 1) = (( -𝑚 − 2) + 1))
146142, 144, 1453eqtrrd 2803 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (( -𝑚 − 2) + 1) = -(𝑚 + 1))
147146oveq1d 7442 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((( -𝑚 − 2) + 1) · 𝑋) = ( -(𝑚 + 1) · 𝑋))
14829ad2antrr 739 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑊 ∈ Toset)
149148, 30syl 18 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑊 ∈ Poset)
15060znegcld 12815 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → -𝑚 ∈ ℤ)
151150, 80zsubcld 12818 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -𝑚 − 2) ∈ ℤ)
152151peano2zd 12816 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (( -𝑚 − 2) + 1) ∈ ℤ)
1537, 8mulgcl 19313 . . . . . . . . . 10 ((𝑊 ∈ Grp ∧ (( -𝑚 − 2) + 1) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ((( -𝑚 − 2) + 1) · 𝑋) ∈ 𝐵)
15475, 152, 77, 153syl3anc 1398 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((( -𝑚 − 2) + 1) · 𝑋) ∈ 𝐵)
1557, 34posref 18504 . . . . . . . . 9 ((𝑊 ∈ Poset ∧ ((( -𝑚 − 2) + 1) · 𝑋) ∈ 𝐵) → ((( -𝑚 − 2) + 1) · 𝑋) ≤ ((( -𝑚 − 2) + 1) · 𝑋))
156149, 154, 155syl2anc 596 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((( -𝑚 − 2) + 1) · 𝑋) ≤ ((( -𝑚 − 2) + 1) · 𝑋))
157147, 156eqbrtrrd 5131 . . . . . . 7 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 1) · 𝑋) ≤ ((( -𝑚 − 2) + 1) · 𝑋))
158157ad2antrr 739 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ( -(𝑚 + 1) · 𝑋) ≤ ((( -𝑚 − 2) + 1) · 𝑋))
159135, 158eqbrtrd 5129 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → 𝑌 ≤ ((( -𝑚 − 2) + 1) · 𝑋))
160 oveq1 7434 . . . . . . . 8 (𝑛 = ( -𝑚 − 2) → (𝑛 · 𝑋) = (( -𝑚 − 2) · 𝑋))
161160breq1d 5115 . . . . . . 7 (𝑛 = ( -𝑚 − 2) → ((𝑛 · 𝑋) < 𝑌 ↔ (( -𝑚 − 2) · 𝑋) < 𝑌))
162 oveq1 7434 . . . . . . . . 9 (𝑛 = ( -𝑚 − 2) → (𝑛 + 1) = (( -𝑚 − 2) + 1))
163162oveq1d 7442 . . . . . . . 8 (𝑛 = ( -𝑚 − 2) → ((𝑛 + 1) · 𝑋) = ((( -𝑚 − 2) + 1) · 𝑋))
164163breq2d 5117 . . . . . . 7 (𝑛 = ( -𝑚 − 2) → (𝑌 ≤ ((𝑛 + 1) · 𝑋) ↔ 𝑌 ≤ ((( -𝑚 − 2) + 1) · 𝑋)))
165161, 164anbi12d 644 . . . . . 6 (𝑛 = ( -𝑚 − 2) → (((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)) ↔ ((( -𝑚 − 2) · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((( -𝑚 − 2) + 1) · 𝑋))))
166165rspcev 3579 . . . . 5 ((( -𝑚 − 2) ∈ ℤ ∧ ((( -𝑚 − 2) · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((( -𝑚 − 2) + 1) · 𝑋))) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
16765, 136, 159, 166syl12anc 850 . . . 4 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
16876ad2antrr 739 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → (𝑚 + 1) ∈ ℤ)
169168znegcld 12815 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → -(𝑚 + 1) ∈ ℤ)
1702ad2antrr 739 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ (𝑚 ∈ ℕ0 ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋)) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋))) → 𝑊 ∈ oGrp)
17172ad2antrr 739 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ (𝑚 ∈ ℕ0 ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋)) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋))) → (oppg‘𝑊) ∈ oGrp)
172170, 171jca 521 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ (𝑚 ∈ ℕ0 ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋)) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋))) → (𝑊 ∈ oGrp ∧ (oppg‘𝑊) ∈ oGrp))
1731723anassrs 1381 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → (𝑊 ∈ oGrp ∧ (oppg‘𝑊) ∈ oGrp))
174123ad2antrr 739 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ((invg‘𝑊)‘𝑌) ∈ 𝐵)
17579ad2antrr 739 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ((𝑚 + 1) · 𝑋) ∈ 𝐵)
176 simpr 490 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋))
1777, 17, 9ogrpinvlt 20370 . . . . . . . 8 (((𝑊 ∈ oGrp ∧ (oppg‘𝑊) ∈ oGrp) ∧ ((invg‘𝑊)‘𝑌) ∈ 𝐵 ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵) → (((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋) ↔ ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)) < ((invg‘𝑊)‘((invg‘𝑊)‘𝑌))))
178177biimpa 482 . . . . . . 7 ((((𝑊 ∈ oGrp ∧ (oppg‘𝑊) ∈ oGrp) ∧ ((invg‘𝑊)‘𝑌) ∈ 𝐵 ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)) < ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)))
179173, 174, 175, 176, 178syl31anc 1400 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)) < ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)))
180114ad2antrr 739 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ( -(𝑚 + 1) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
181180eqcomd 2769 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)) = ( -(𝑚 + 1) · 𝑋))
182133ad4antr 745 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) = 𝑌)
183179, 181, 1823brtr3d 5138 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ( -(𝑚 + 1) · 𝑋) < 𝑌)
184 simp-4l 795 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → 𝜑)
1857, 8mulgcl 19313 . . . . . . . . . . . 12 ((𝑊 ∈ Grp ∧ 𝑚 ∈ ℤ ∧ 𝑋 ∈ 𝐵) → (𝑚 · 𝑋) ∈ 𝐵)
18675, 60, 77, 185syl3anc 1398 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 · 𝑋) ∈ 𝐵)
1877, 17, 9ogrpinvlt 20370 . . . . . . . . . . 11 (((𝑊 ∈ oGrp ∧ (oppg‘𝑊) ∈ oGrp) ∧ (𝑚 · 𝑋) ∈ 𝐵 ∧ ((invg‘𝑊)‘𝑌) ∈ 𝐵) → ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ↔ ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < ((invg‘𝑊)‘(𝑚 · 𝑋))))
18874, 186, 123, 187syl3anc 1398 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ↔ ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < ((invg‘𝑊)‘(𝑚 · 𝑋))))
189188biimpa 482 . . . . . . . . 9 ((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ (𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌)) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < ((invg‘𝑊)‘(𝑚 · 𝑋)))
190189adantrr 730 . . . . . . . 8 ((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < ((invg‘𝑊)‘(𝑚 · 𝑋)))
191190adantr 486 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < ((invg‘𝑊)‘(𝑚 · 𝑋)))
192 negdi 11625 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℂ ∧ 1 ∈ ℂ) → -(𝑚 + 1) = ( -𝑚 + -1))
19366, 40, 192sylancl 598 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → -(𝑚 + 1) = ( -𝑚 + -1))
194193oveq1d 7442 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ0 → ( -(𝑚 + 1) + 1) = (( -𝑚 + -1) + 1))
19566negcld 11666 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → -𝑚 ∈ ℂ)
19691negcld 11666 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → -1 ∈ ℂ)
197195, 196, 91addassd 11341 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → (( -𝑚 + -1) + 1) = ( -𝑚 + ( -1 + 1)))
19843oveq2i 7438 . . . . . . . . . . . . . . 15 ( -𝑚 + ( -1 + 1)) = ( -𝑚 + 0)
199198a1i 11 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → ( -𝑚 + ( -1 + 1)) = ( -𝑚 + 0))
200195addridd 11520 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → ( -𝑚 + 0) = -𝑚)
201197, 199, 2003eqtrd 2802 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ0 → (( -𝑚 + -1) + 1) = -𝑚)
202194, 201eqtrd 2798 . . . . . . . . . . . 12 (𝑚 ∈ ℕ0 → ( -(𝑚 + 1) + 1) = -𝑚)
203202oveq1d 7442 . . . . . . . . . . 11 (𝑚 ∈ ℕ0 → (( -(𝑚 + 1) + 1) · 𝑋) = ( -𝑚 · 𝑋))
204203adantl 487 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (( -(𝑚 + 1) + 1) · 𝑋) = ( -𝑚 · 𝑋))
2057, 8, 9mulgneg 19314 . . . . . . . . . . 11 ((𝑊 ∈ Grp ∧ 𝑚 ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ( -𝑚 · 𝑋) = ((invg‘𝑊)‘(𝑚 · 𝑋)))
20675, 60, 77, 205syl3anc 1398 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -𝑚 · 𝑋) = ((invg‘𝑊)‘(𝑚 · 𝑋)))
207204, 206eqtrd 2798 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (( -(𝑚 + 1) + 1) · 𝑋) = ((invg‘𝑊)‘(𝑚 · 𝑋)))
208207ad2antrr 739 . . . . . . . 8 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → (( -(𝑚 + 1) + 1) · 𝑋) = ((invg‘𝑊)‘(𝑚 · 𝑋)))
209208eqcomd 2769 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ((invg‘𝑊)‘(𝑚 · 𝑋)) = (( -(𝑚 + 1) + 1) · 𝑋))
210191, 182, 2093brtr3d 5138 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → 𝑌 < (( -(𝑚 + 1) + 1) · 𝑋))
211 ovexd 7462 . . . . . . 7 (𝜑 → (( -(𝑚 + 1) + 1) · 𝑋) ∈ V)
21234, 17pltle 18517 . . . . . . 7 ((𝑊 ∈ oGrp ∧ 𝑌 ∈ 𝐵 ∧ (( -(𝑚 + 1) + 1) · 𝑋) ∈ V) → (𝑌 < (( -(𝑚 + 1) + 1) · 𝑋) → 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋)))
2132, 120, 211, 212syl3anc 1398 . . . . . 6 (𝜑 → (𝑌 < (( -(𝑚 + 1) + 1) · 𝑋) → 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋)))
214184, 210, 213sylc 66 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋))
215 oveq1 7434 . . . . . . . 8 (𝑛 = -(𝑚 + 1) → (𝑛 · 𝑋) = ( -(𝑚 + 1) · 𝑋))
216215breq1d 5115 . . . . . . 7 (𝑛 = -(𝑚 + 1) → ((𝑛 · 𝑋) < 𝑌 ↔ ( -(𝑚 + 1) · 𝑋) < 𝑌))
217 oveq1 7434 . . . . . . . . 9 (𝑛 = -(𝑚 + 1) → (𝑛 + 1) = ( -(𝑚 + 1) + 1))
218217oveq1d 7442 . . . . . . . 8 (𝑛 = -(𝑚 + 1) → ((𝑛 + 1) · 𝑋) = (( -(𝑚 + 1) + 1) · 𝑋))
219218breq2d 5117 . . . . . . 7 (𝑛 = -(𝑚 + 1) → (𝑌 ≤ ((𝑛 + 1) · 𝑋) ↔ 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋)))
220216, 219anbi12d 644 . . . . . 6 (𝑛 = -(𝑚 + 1) → (((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)) ↔ (( -(𝑚 + 1) · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋))))
221220rspcev 3579 . . . . 5 (( -(𝑚 + 1) ∈ ℤ ∧ (( -(𝑚 + 1) · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋))) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
222169, 183, 214, 221syl12anc 850 . . . 4 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
2237, 34, 17tlt2 33583 . . . . . 6 ((𝑊 ∈ Toset ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵 ∧ ((invg‘𝑊)‘𝑌) ∈ 𝐵) → (((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌) ∨ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)))
224148, 79, 123, 223syl3anc 1398 . . . . 5 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌) ∨ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)))
225224adantr 486 . . . 4 ((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) → (((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌) ∨ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)))
226167, 222, 225mpjaodan 973 . . 3 ((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
2272adantr 486 . . . 4 ((𝜑 ∧ 𝑌 < 0 ) → 𝑊 ∈ oGrp)
228 archirng.2 . . . . 5 (𝜑 → 𝑊 ∈ Archi)
229228adantr 486 . . . 4 ((𝜑 ∧ 𝑌 < 0 ) → 𝑊 ∈ Archi)
2306adantr 486 . . . 4 ((𝜑 ∧ 𝑌 < 0 ) → 𝑋 ∈ 𝐵)
231122adantr 486 . . . 4 ((𝜑 ∧ 𝑌 < 0 ) → ((invg‘𝑊)‘𝑌) ∈ 𝐵)
23216adantr 486 . . . 4 ((𝜑 ∧ 𝑌 < 0 ) → 0 < 𝑋)
233133breq1d 5115 . . . . . 6 (𝜑 → (((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < 0 ↔ 𝑌 < 0 ))
234233biimpar 483 . . . . 5 ((𝜑 ∧ 𝑌 < 0 ) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < 0 )
2357, 17, 9, 18ogrpinv0lt 20369 . . . . . . 7 ((𝑊 ∈ oGrp ∧ ((invg‘𝑊)‘𝑌) ∈ 𝐵) → ( 0 < ((invg‘𝑊)‘𝑌) ↔ ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < 0 ))
2362, 122, 235syl2anc 596 . . . . . 6 (𝜑 → ( 0 < ((invg‘𝑊)‘𝑌) ↔ ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < 0 ))
237236biimpar 483 . . . . 5 ((𝜑 ∧ ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < 0 ) → 0 < ((invg‘𝑊)‘𝑌))
238234, 237syldan 603 . . . 4 ((𝜑 ∧ 𝑌 < 0 ) → 0 < ((invg‘𝑊)‘𝑌))
2397, 18, 17, 34, 8, 227, 229, 230, 231, 232, 238archirng 33802 . . 3 ((𝜑 ∧ 𝑌 < 0 ) → ∃𝑚 ∈ ℕ0 ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋)))
240226, 239r19.29a 3173 . 2 ((𝜑 ∧ 𝑌 < 0 ) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
241 nn0ssz 12726 . . 3 ℕ0 ⊆ ℤ
2422adantr 486 . . . 4 ((𝜑 ∧ 0 < 𝑌) → 𝑊 ∈ oGrp)
243228adantr 486 . . . 4 ((𝜑 ∧ 0 < 𝑌) → 𝑊 ∈ Archi)
2446adantr 486 . . . 4 ((𝜑 ∧ 0 < 𝑌) → 𝑋 ∈ 𝐵)
245120adantr 486 . . . 4 ((𝜑 ∧ 0 < 𝑌) → 𝑌 ∈ 𝐵)
24616adantr 486 . . . 4 ((𝜑 ∧ 0 < 𝑌) → 0 < 𝑋)
247 simpr 490 . . . 4 ((𝜑 ∧ 0 < 𝑌) → 0 < 𝑌)
2487, 18, 17, 34, 8, 242, 243, 244, 245, 246, 247archirng 33802 . . 3 ((𝜑 ∧ 0 < 𝑌) → ∃𝑛 ∈ ℕ0 ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
249 ssrexv 3982 . . 3 (ℕ0 ⊆ ℤ → (∃𝑛 ∈ ℕ0 ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋))))
250241, 248, 249mpsyl 69 . 2 ((𝜑 ∧ 0 < 𝑌) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
2517, 17tlt3 33584 . . 3 ((𝑊 ∈ Toset ∧ 𝑌 ∈ 𝐵 ∧ 0 ∈ 𝐵) → (𝑌 = 0 ∨ 𝑌 < 0 ∨ 0 < 𝑌))
25229, 120, 33, 251syl3anc 1398 . 2 (𝜑 → (𝑌 = 0 ∨ 𝑌 < 0 ∨ 0 < 𝑌))
25358, 240, 250, 252mpjao3dan 1459 1 (𝜑 → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   ∨ w3o 1102   ∧ w3a 1103   = wceq 1569   ∈ wcel 2146  ∃wrex 3089  Vcvv 3453   ⊆ wss 3899   class class class wbr 5105  ‘cfv 6546  (class class class)co 7427  ℂcc 11208  0cc0 11210  1c1 11211   + caddc 11213   − cmin 11551   -cneg 11552  2c2 12407  ℕ0cn0 12616  ℤcz 12703  Basecbs 17399  +gcplusg 17440  lecple 17447  0gc0g 17622  Posetcpo 18493  ltcplt 18494  Tosetctos 18600  Grpcgrp 19156  invgcminusg 19157  .gcmg 19289  oppgcoppg 19571  oMndcomnd 20345  oGrpcogrp 20346  Archicarchi 33791
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 1944  ax-6 2001  ax-7 2042  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2196  ax-12 2215  ax-ext 2735  ax-sep 5251  ax-nul 5262  ax-pow 5330  ax-pr 5394  ax-un 7758  ax-cnex 11266  ax-resscn 11267  ax-1cn 11268  ax-icn 11269  ax-addcl 11270  ax-addrcl 11271  ax-mulcl 11272  ax-mulrcl 11273  ax-mulcom 11274  ax-addass 11275  ax-mulass 11276  ax-distr 11277  ax-i2m1 11278  ax-1ne0 11279  ax-1rid 11280  ax-rnegex 11281  ax-rrecex 11282  ax-cnre 11283  ax-pre-lttri 11284  ax-pre-lttrn 11285  ax-pre-ltadd 11286  ax-pre-mulgt0 11287
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 2101  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3455  df-sbc 3742  df-csb 3851  df-ss 3900  df-pss 4016  df-dif 4049  df-in 4093  df-un 4153  df-nul 4281  df-if 4485  df-pw 4561  df-sn 4588  df-pr 4590  df-op 4838  df-uni 4870  df-iun 4955  df-br 5106  df-opab 5170  df-mpt 5189  df-tr 5215  df-id 5549  df-eprel 5554  df-po 5562  df-so 5563  df-fr 5607  df-we 5609  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6310  df-ord 6371  df-on 6372  df-lim 6373  df-suc 6374  df-iota 6500  df-fun 6548  df-fn 6549  df-f 6550  df-f1 6551  df-fo 6552  df-f1o 6553  df-fv 6554  df-riota 7384  df-ov 7430  df-oprab 7431  df-mpo 7432  df-om 7885  df-1st 8008  df-2nd 8009  df-tpos 8254  df-frecs 8310  df-wrecs 8341  df-recs 8390  df-rdg 8429  df-er 8728  df-en 8985  df-dom 8986  df-sdom 8987  df-pnf 11355  df-mnf 11356  df-xr 11357  df-ltxr 11358  df-le 11359  df-sub 11553  df-neg 11554  df-nn 12346  df-2 12415  df-3 12416  df-4 12417  df-5 12418  df-6 12419  df-7 12420  df-8 12421  df-9 12422  df-n0 12617  df-z 12704  df-dec 12825  df-uz 12976  df-fz 13650  df-seq 14155  df-sets 17354  df-slot 17372  df-ndx 17384  df-base 17400  df-plusg 17453  df-ple 17460  df-0g 17624  df-proset 18480  df-poset 18499  df-plt 18514  df-toset 18601  df-mgm 18828  df-sgrp 18920  df-mnd 18936  df-grp 19159  df-minusg 19160  df-mulg 19290  df-oppg 19572  df-omnd 20347  df-ogrp 20348  df-inftm 33792  df-archi 33793
This theorem is used by:  archiabllem2c  33809
  Copyright terms: Public domain W3C validator