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 33849
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 12772 . . 3 -1 ∈ ℤ
2 archirng.1 . . . . . . . . . 10 (𝜑 → 𝑊 ∈ oGrp)
3 ogrpgrp 20390 . . . . . . . . . 10 (𝑊 ∈ oGrp → 𝑊 ∈ Grp)
42, 3syl 18 . . . . . . . . 9 (𝜑 → 𝑊 ∈ Grp)
5 1zzd 12767 . . . . . . . . 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 19352 . . . . . . . . 9 ((𝑊 ∈ Grp ∧ 1 ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ( -1 · 𝑋) = ((invg‘𝑊)‘(1 · 𝑋)))
114, 5, 6, 10syl3anc 1399 . . . . . . . 8 (𝜑 → ( -1 · 𝑋) = ((invg‘𝑊)‘(1 · 𝑋)))
127, 8mulg1 19341 . . . . . . . . . 10 (𝑋 ∈ 𝐵 → (1 · 𝑋) = 𝑋)
136, 12syl 18 . . . . . . . . 9 (𝜑 → (1 · 𝑋) = 𝑋)
1413fveq2d 6920 . . . . . . . 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 20408 . . . . . . . . 9 ((𝑊 ∈ oGrp ∧ 𝑋 ∈ 𝐵) → ( 0 < 𝑋 ↔ ((invg‘𝑊)‘𝑋) < 0 ))
2019biimpa 482 . . . . . . . 8 (((𝑊 ∈ oGrp ∧ 𝑋 ∈ 𝐵) ∧ 0 < 𝑋) → ((invg‘𝑊)‘𝑋) < 0 )
212, 6, 16, 20syl21anc 851 . . . . . . 7 (𝜑 → ((invg‘𝑊)‘𝑋) < 0 )
2215, 21eqbrtrd 5133 . . . . . 6 (𝜑 → ( -1 · 𝑋) < 0 )
2322adantr 486 . . . . 5 ((𝜑 ∧ 𝑌 = 0 ) → ( -1 · 𝑋) < 0 )
24 simpr 490 . . . . 5 ((𝜑 ∧ 𝑌 = 0 ) → 𝑌 = 0 )
2523, 24breqtrrd 5139 . . . 4 ((𝜑 ∧ 𝑌 = 0 ) → ( -1 · 𝑋) < 𝑌)
26 isogrp 20389 . . . . . . . . . 10 (𝑊 ∈ oGrp ↔ (𝑊 ∈ Grp ∧ 𝑊 ∈ oMnd))
2726simprbi 503 . . . . . . . . 9 (𝑊 ∈ oGrp → 𝑊 ∈ oMnd)
28 omndtos 20392 . . . . . . . . 9 (𝑊 ∈ oMnd → 𝑊 ∈ Toset)
292, 27, 283syl 19 . . . . . . . 8 (𝜑 → 𝑊 ∈ Toset)
30 tospos 18642 . . . . . . . 8 (𝑊 ∈ Toset → 𝑊 ∈ Poset)
3129, 30syl 18 . . . . . . 7 (𝜑 → 𝑊 ∈ Poset)
327, 18grpidcl 19226 . . . . . . . 8 (𝑊 ∈ Grp → 0 ∈ 𝐵)
332, 3, 323syl 19 . . . . . . 7 (𝜑 → 0 ∈ 𝐵)
34 archirng.l . . . . . . . 8 ≤ = (le‘𝑊)
357, 34posref 18542 . . . . . . 7 ((𝑊 ∈ Poset ∧ 0 ∈ 𝐵) → 0 ≤ 0 )
3631, 33, 35syl2anc 596 . . . . . 6 (𝜑 → 0 ≤ 0 )
3736adantr 486 . . . . 5 ((𝜑 ∧ 𝑌 = 0 ) → 0 ≤ 0 )
38 1m1e0 12455 . . . . . . . . . 10 (1 − 1) = 0
3938negeqi 11589 . . . . . . . . 9 -(1 − 1) = -0
40 ax-1cn 11297 . . . . . . . . . 10 1 ∈ ℂ
4140, 40negsubdii 11682 . . . . . . . . 9 -(1 − 1) = ( -1 + 1)
42 neg0 11643 . . . . . . . . 9 -0 = 0
4339, 41, 423eqtr3i 2794 . . . . . . . 8 ( -1 + 1) = 0
4443oveq1i 7461 . . . . . . 7 (( -1 + 1) · 𝑋) = (0 · 𝑋)
457, 18, 8mulg0 19334 . . . . . . . 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 5143 . . . 4 ((𝜑 ∧ 𝑌 = 0 ) → 𝑌 ≤ (( -1 + 1) · 𝑋))
5025, 49jca 521 . . 3 ((𝜑 ∧ 𝑌 = 0 ) → (( -1 · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -1 + 1) · 𝑋)))
51 oveq1 7458 . . . . . 6 (𝑛 = -1 → (𝑛 · 𝑋) = ( -1 · 𝑋))
5251breq1d 5118 . . . . 5 (𝑛 = -1 → ((𝑛 · 𝑋) < 𝑌 ↔ ( -1 · 𝑋) < 𝑌))
53 oveq1 7458 . . . . . . 7 (𝑛 = -1 → (𝑛 + 1) = ( -1 + 1))
5453oveq1d 7466 . . . . . 6 (𝑛 = -1 → ((𝑛 + 1) · 𝑋) = (( -1 + 1) · 𝑋))
5554breq2d 5120 . . . . 5 (𝑛 = -1 → (𝑌 ≤ ((𝑛 + 1) · 𝑋) ↔ 𝑌 ≤ (( -1 + 1) · 𝑋)))
5652, 55anbi12d 644 . . . 4 (𝑛 = -1 → (((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)) ↔ (( -1 · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -1 + 1) · 𝑋))))
5756rspcev 3580 . . 3 (( -1 ∈ ℤ ∧ (( -1 · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -1 + 1) · 𝑋))) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
581, 50, 57sylancr 599 . 2 ((𝜑 ∧ 𝑌 = 0 ) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
59 simpr 490 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℕ0)
6059nn0zd 12758 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℤ)
6160ad2antrr 739 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → 𝑚 ∈ ℤ)
6261znegcld 12845 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → -𝑚 ∈ ℤ)
63 2z 12768 . . . . . . 7 2 ∈ ℤ
6463a1i 11 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → 2 ∈ ℤ)
6562, 64zsubcld 12848 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ( -𝑚 − 2) ∈ ℤ)
66 nn0cn 12656 . . . . . . . . . . 11 (𝑚 ∈ ℕ0 → 𝑚 ∈ ℂ)
6766adantl 487 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑚 ∈ ℂ)
68 2cnd 12461 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 2 ∈ ℂ)
6967, 68negdi2d 11722 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → -(𝑚 + 2) = ( -𝑚 − 2))
7069oveq1d 7466 . . . . . . . 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 12846 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 + 1) ∈ ℤ)
776ad2antrr 739 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑋 ∈ 𝐵)
787, 8mulgcl 19351 . . . . . . . . . . 11 ((𝑊 ∈ Grp ∧ (𝑚 + 1) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ((𝑚 + 1) · 𝑋) ∈ 𝐵)
7975, 76, 77, 78syl3anc 1399 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 1) · 𝑋) ∈ 𝐵)
8063a1i 11 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 2 ∈ ℤ)
8160, 80zaddcld 12847 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 + 2) ∈ ℤ)
827, 8mulgcl 19351 . . . . . . . . . . 11 ((𝑊 ∈ Grp ∧ (𝑚 + 2) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ((𝑚 + 2) · 𝑋) ∈ 𝐵)
8375, 81, 77, 82syl3anc 1399 . . . . . . . . . 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 20403 . . . . . . . . . . . 12 ((𝑊 ∈ oGrp ∧ ( 0 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵 ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵) ∧ 0 < 𝑋) → ( 0 (+g‘𝑊)((𝑚 + 1) · 𝑋)) < (𝑋(+g‘𝑊)((𝑚 + 1) · 𝑋)))
8871, 84, 77, 79, 85, 87syl131anc 1411 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( 0 (+g‘𝑊)((𝑚 + 1) · 𝑋)) < (𝑋(+g‘𝑊)((𝑚 + 1) · 𝑋)))
897, 86, 18grplid 19228 . . . . . . . . . . . 12 ((𝑊 ∈ Grp ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵) → ( 0 (+g‘𝑊)((𝑚 + 1) · 𝑋)) = ((𝑚 + 1) · 𝑋))
9075, 79, 89syl2anc 596 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( 0 (+g‘𝑊)((𝑚 + 1) · 𝑋)) = ((𝑚 + 1) · 𝑋))
91 1cnd 11341 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ ℕ0 → 1 ∈ ℂ)
9266, 91, 91addassd 11370 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) = (𝑚 + (1 + 1)))
93 1p1e2 12506 . . . . . . . . . . . . . . . . 17 (1 + 1) = 2
9493oveq2i 7462 . . . . . . . . . . . . . . . 16 (𝑚 + (1 + 1)) = (𝑚 + 2)
9592, 94eqtrdi 2814 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) = (𝑚 + 2))
9666, 91addcld 11367 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ0 → (𝑚 + 1) ∈ ℂ)
9796, 91addcomd 11551 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → ((𝑚 + 1) + 1) = (1 + (𝑚 + 1)))
9895, 97eqtr3d 2800 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → (𝑚 + 2) = (1 + (𝑚 + 1)))
9998oveq1d 7466 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ0 → ((𝑚 + 2) · 𝑋) = ((1 + (𝑚 + 1)) · 𝑋))
10099adantl 487 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 2) · 𝑋) = ((1 + (𝑚 + 1)) · 𝑋))
101 1zzd 12767 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 1 ∈ ℤ)
1027, 8, 86mulgdir 19366 . . . . . . . . . . . . 13 ((𝑊 ∈ Grp ∧ (1 ∈ ℤ ∧ (𝑚 + 1) ∈ ℤ ∧ 𝑋 ∈ 𝐵)) → ((1 + (𝑚 + 1)) · 𝑋) = ((1 · 𝑋)(+g‘𝑊)((𝑚 + 1) · 𝑋)))
10375, 101, 76, 77, 102syl13anc 1400 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((1 + (𝑚 + 1)) · 𝑋) = ((1 · 𝑋)(+g‘𝑊)((𝑚 + 1) · 𝑋)))
10477, 12syl 18 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (1 · 𝑋) = 𝑋)
105104oveq1d 7466 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((1 · 𝑋)(+g‘𝑊)((𝑚 + 1) · 𝑋)) = (𝑋(+g‘𝑊)((𝑚 + 1) · 𝑋)))
106100, 103, 1053eqtrrd 2803 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑋(+g‘𝑊)((𝑚 + 1) · 𝑋)) = ((𝑚 + 2) · 𝑋))
10788, 90, 1063brtr3d 5142 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 1) · 𝑋) < ((𝑚 + 2) · 𝑋))
1087, 17, 9ogrpinvlt 20409 . . . . . . . . . . 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 1401 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((invg‘𝑊)‘((𝑚 + 2) · 𝑋)) < ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
1117, 8, 9mulgneg 19352 . . . . . . . . . 10 ((𝑊 ∈ Grp ∧ (𝑚 + 2) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ( -(𝑚 + 2) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 2) · 𝑋)))
11275, 81, 77, 111syl3anc 1399 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 2) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 2) · 𝑋)))
1137, 8, 9mulgneg 19352 . . . . . . . . . 10 ((𝑊 ∈ Grp ∧ (𝑚 + 1) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ( -(𝑚 + 1) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
11475, 76, 77, 113syl3anc 1399 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 1) · 𝑋) = ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
115110, 112, 1143brtr4d 5143 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 2) · 𝑋) < ( -(𝑚 + 1) · 𝑋))
11670, 115eqbrtrrd 5135 . . . . . . 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 19248 . . . . . . . . . . . 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 18543 . . . . . . . . . 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 1406 . . . . . . . 8 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ((invg‘𝑊)‘𝑌) = ((𝑚 + 1) · 𝑋))
131130fveq2d 6920 . . . . . . 7 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) = ((invg‘𝑊)‘((𝑚 + 1) · 𝑋)))
1327, 9grpinvinv 19266 . . . . . . . . 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 5139 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → (( -𝑚 − 2) · 𝑋) < 𝑌)
137 1cnd 11341 . . . . . . . . . . . . 13 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 1 ∈ ℂ)
13867, 68, 137addsubassd 11728 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((𝑚 + 2) − 1) = (𝑚 + (2 − 1)))
139 2m1e1 12507 . . . . . . . . . . . . 13 (2 − 1) = 1
140139oveq2i 7462 . . . . . . . . . . . 12 (𝑚 + (2 − 1)) = (𝑚 + 1)
141138, 140eqtr2di 2815 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 + 1) = ((𝑚 + 2) − 1))
142141negeqd 11590 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → -(𝑚 + 1) = -((𝑚 + 2) − 1))
14367, 68addcld 11367 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 + 2) ∈ ℂ)
144143, 137negsubdid 11723 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → -((𝑚 + 2) − 1) = ( -(𝑚 + 2) + 1))
14569oveq1d 7466 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 2) + 1) = (( -𝑚 − 2) + 1))
146142, 144, 1453eqtrrd 2803 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (( -𝑚 − 2) + 1) = -(𝑚 + 1))
147146oveq1d 7466 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((( -𝑚 − 2) + 1) · 𝑋) = ( -(𝑚 + 1) · 𝑋))
14829ad2antrr 739 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑊 ∈ Toset)
149148, 30syl 18 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → 𝑊 ∈ Poset)
15060znegcld 12845 . . . . . . . . . . . 12 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → -𝑚 ∈ ℤ)
151150, 80zsubcld 12848 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -𝑚 − 2) ∈ ℤ)
152151peano2zd 12846 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (( -𝑚 − 2) + 1) ∈ ℤ)
1537, 8mulgcl 19351 . . . . . . . . . 10 ((𝑊 ∈ Grp ∧ (( -𝑚 − 2) + 1) ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ((( -𝑚 − 2) + 1) · 𝑋) ∈ 𝐵)
15475, 152, 77, 153syl3anc 1399 . . . . . . . . 9 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((( -𝑚 − 2) + 1) · 𝑋) ∈ 𝐵)
1557, 34posref 18542 . . . . . . . . 9 ((𝑊 ∈ Poset ∧ ((( -𝑚 − 2) + 1) · 𝑋) ∈ 𝐵) → ((( -𝑚 − 2) + 1) · 𝑋) ≤ ((( -𝑚 − 2) + 1) · 𝑋))
156149, 154, 155syl2anc 596 . . . . . . . 8 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ((( -𝑚 − 2) + 1) · 𝑋) ≤ ((( -𝑚 − 2) + 1) · 𝑋))
157147, 156eqbrtrrd 5135 . . . . . . 7 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → ( -(𝑚 + 1) · 𝑋) ≤ ((( -𝑚 − 2) + 1) · 𝑋))
158157ad2antrr 739 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → ( -(𝑚 + 1) · 𝑋) ≤ ((( -𝑚 − 2) + 1) · 𝑋))
159135, 158eqbrtrd 5133 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌)) → 𝑌 ≤ ((( -𝑚 − 2) + 1) · 𝑋))
160 oveq1 7458 . . . . . . . 8 (𝑛 = ( -𝑚 − 2) → (𝑛 · 𝑋) = (( -𝑚 − 2) · 𝑋))
161160breq1d 5118 . . . . . . 7 (𝑛 = ( -𝑚 − 2) → ((𝑛 · 𝑋) < 𝑌 ↔ (( -𝑚 − 2) · 𝑋) < 𝑌))
162 oveq1 7458 . . . . . . . . 9 (𝑛 = ( -𝑚 − 2) → (𝑛 + 1) = (( -𝑚 − 2) + 1))
163162oveq1d 7466 . . . . . . . 8 (𝑛 = ( -𝑚 − 2) → ((𝑛 + 1) · 𝑋) = ((( -𝑚 − 2) + 1) · 𝑋))
164163breq2d 5120 . . . . . . 7 (𝑛 = ( -𝑚 − 2) → (𝑌 ≤ ((𝑛 + 1) · 𝑋) ↔ 𝑌 ≤ ((( -𝑚 − 2) + 1) · 𝑋)))
165161, 164anbi12d 644 . . . . . 6 (𝑛 = ( -𝑚 − 2) → (((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)) ↔ ((( -𝑚 − 2) · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((( -𝑚 − 2) + 1) · 𝑋))))
166165rspcev 3580 . . . . 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 12845 . . . . 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 1382 . . . . . . 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 20409 . . . . . . . 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 1401 . . . . . 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 5142 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ( -(𝑚 + 1) · 𝑋) < 𝑌)
184 simp-4l 795 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → 𝜑)
1857, 8mulgcl 19351 . . . . . . . . . . . 12 ((𝑊 ∈ Grp ∧ 𝑚 ∈ ℤ ∧ 𝑋 ∈ 𝐵) → (𝑚 · 𝑋) ∈ 𝐵)
18675, 60, 77, 185syl3anc 1399 . . . . . . . . . . 11 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (𝑚 · 𝑋) ∈ 𝐵)
1877, 17, 9ogrpinvlt 20409 . . . . . . . . . . 11 (((𝑊 ∈ oGrp ∧ (oppg‘𝑊) ∈ oGrp) ∧ (𝑚 · 𝑋) ∈ 𝐵 ∧ ((invg‘𝑊)‘𝑌) ∈ 𝐵) → ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ↔ ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < ((invg‘𝑊)‘(𝑚 · 𝑋))))
18874, 186, 123, 187syl3anc 1399 . . . . . . . . . 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 11654 . . . . . . . . . . . . . . 15 ((𝑚 ∈ ℂ ∧ 1 ∈ ℂ) → -(𝑚 + 1) = ( -𝑚 + -1))
19366, 40, 192sylancl 598 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → -(𝑚 + 1) = ( -𝑚 + -1))
194193oveq1d 7466 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ0 → ( -(𝑚 + 1) + 1) = (( -𝑚 + -1) + 1))
19566negcld 11695 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → -𝑚 ∈ ℂ)
19691negcld 11695 . . . . . . . . . . . . . . 15 (𝑚 ∈ ℕ0 → -1 ∈ ℂ)
197195, 196, 91addassd 11370 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → (( -𝑚 + -1) + 1) = ( -𝑚 + ( -1 + 1)))
19843oveq2i 7462 . . . . . . . . . . . . . . 15 ( -𝑚 + ( -1 + 1)) = ( -𝑚 + 0)
199198a1i 11 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → ( -𝑚 + ( -1 + 1)) = ( -𝑚 + 0))
200195addridd 11549 . . . . . . . . . . . . . 14 (𝑚 ∈ ℕ0 → ( -𝑚 + 0) = -𝑚)
201197, 199, 2003eqtrd 2802 . . . . . . . . . . . . 13 (𝑚 ∈ ℕ0 → (( -𝑚 + -1) + 1) = -𝑚)
202194, 201eqtrd 2798 . . . . . . . . . . . 12 (𝑚 ∈ ℕ0 → ( -(𝑚 + 1) + 1) = -𝑚)
203202oveq1d 7466 . . . . . . . . . . 11 (𝑚 ∈ ℕ0 → (( -(𝑚 + 1) + 1) · 𝑋) = ( -𝑚 · 𝑋))
204203adantl 487 . . . . . . . . . 10 (((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) → (( -(𝑚 + 1) + 1) · 𝑋) = ( -𝑚 · 𝑋))
2057, 8, 9mulgneg 19352 . . . . . . . . . . 11 ((𝑊 ∈ Grp ∧ 𝑚 ∈ ℤ ∧ 𝑋 ∈ 𝐵) → ( -𝑚 · 𝑋) = ((invg‘𝑊)‘(𝑚 · 𝑋)))
20675, 60, 77, 205syl3anc 1399 . . . . . . . . . 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 5142 . . . . . 6 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → 𝑌 < (( -(𝑚 + 1) + 1) · 𝑋))
211 ovexd 7486 . . . . . . 7 (𝜑 → (( -(𝑚 + 1) + 1) · 𝑋) ∈ V)
21234, 17pltle 18555 . . . . . . 7 ((𝑊 ∈ oGrp ∧ 𝑌 ∈ 𝐵 ∧ (( -(𝑚 + 1) + 1) · 𝑋) ∈ V) → (𝑌 < (( -(𝑚 + 1) + 1) · 𝑋) → 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋)))
2132, 120, 211, 212syl3anc 1399 . . . . . 6 (𝜑 → (𝑌 < (( -(𝑚 + 1) + 1) · 𝑋) → 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋)))
214184, 210, 213sylc 66 . . . . 5 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋))
215 oveq1 7458 . . . . . . . 8 (𝑛 = -(𝑚 + 1) → (𝑛 · 𝑋) = ( -(𝑚 + 1) · 𝑋))
216215breq1d 5118 . . . . . . 7 (𝑛 = -(𝑚 + 1) → ((𝑛 · 𝑋) < 𝑌 ↔ ( -(𝑚 + 1) · 𝑋) < 𝑌))
217 oveq1 7458 . . . . . . . . 9 (𝑛 = -(𝑚 + 1) → (𝑛 + 1) = ( -(𝑚 + 1) + 1))
218217oveq1d 7466 . . . . . . . 8 (𝑛 = -(𝑚 + 1) → ((𝑛 + 1) · 𝑋) = (( -(𝑚 + 1) + 1) · 𝑋))
219218breq2d 5120 . . . . . . 7 (𝑛 = -(𝑚 + 1) → (𝑌 ≤ ((𝑛 + 1) · 𝑋) ↔ 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋)))
220216, 219anbi12d 644 . . . . . 6 (𝑛 = -(𝑚 + 1) → (((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)) ↔ (( -(𝑚 + 1) · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋))))
221220rspcev 3580 . . . . 5 (( -(𝑚 + 1) ∈ ℤ ∧ (( -(𝑚 + 1) · 𝑋) < 𝑌 ∧ 𝑌 ≤ (( -(𝑚 + 1) + 1) · 𝑋))) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
222169, 183, 214, 221syl12anc 850 . . . 4 (((((𝜑 ∧ 𝑌 < 0 ) ∧ 𝑚 ∈ ℕ0) ∧ ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋))) ∧ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
2237, 34, 17tlt2 33626 . . . . . 6 ((𝑊 ∈ Toset ∧ ((𝑚 + 1) · 𝑋) ∈ 𝐵 ∧ ((invg‘𝑊)‘𝑌) ∈ 𝐵) → (((𝑚 + 1) · 𝑋) ≤ ((invg‘𝑊)‘𝑌) ∨ ((invg‘𝑊)‘𝑌) < ((𝑚 + 1) · 𝑋)))
224148, 79, 123, 223syl3anc 1399 . . . . 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 5118 . . . . . 6 (𝜑 → (((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < 0 ↔ 𝑌 < 0 ))
234233biimpar 483 . . . . 5 ((𝜑 ∧ 𝑌 < 0 ) → ((invg‘𝑊)‘((invg‘𝑊)‘𝑌)) < 0 )
2357, 17, 9, 18ogrpinv0lt 20408 . . . . . . 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 33848 . . 3 ((𝜑 ∧ 𝑌 < 0 ) → ∃𝑚 ∈ ℕ0 ((𝑚 · 𝑋) < ((invg‘𝑊)‘𝑌) ∧ ((invg‘𝑊)‘𝑌) ≤ ((𝑚 + 1) · 𝑋)))
240226, 239r19.29a 3174 . 2 ((𝜑 ∧ 𝑌 < 0 ) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
241 nn0ssz 12756 . . 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 33848 . . 3 ((𝜑 ∧ 0 < 𝑌) → ∃𝑛 ∈ ℕ0 ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
249 ssrexv 3983 . . 3 (ℕ0 ⊆ ℤ → (∃𝑛 ∈ ℕ0 ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋))))
250241, 248, 249mpsyl 69 . 2 ((𝜑 ∧ 0 < 𝑌) → ∃𝑛 ∈ ℤ ((𝑛 · 𝑋) < 𝑌 ∧ 𝑌 ≤ ((𝑛 + 1) · 𝑋)))
2517, 17tlt3 33627 . . 3 ((𝑊 ∈ Toset ∧ 𝑌 ∈ 𝐵 ∧ 0 ∈ 𝐵) → (𝑌 = 0 ∨ 𝑌 < 0 ∨ 0 < 𝑌))
25229, 120, 33, 251syl3anc 1399 . 2 (𝜑 → (𝑌 = 0 ∨ 𝑌 < 0 ∨ 0 < 𝑌))
25358, 240, 250, 252mpjao3dan 1460 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 1570   ∈ wcel 2147  ∃wrex 3090  Vcvv 3454   ⊆ wss 3900   class class class wbr 5108  ‘cfv 6566  (class class class)co 7451  ℂcc 11237  0cc0 11239  1c1 11240   + caddc 11242   − cmin 11580   -cneg 11581  2c2 12437  ℕ0cn0 12646  ℤcz 12733  Basecbs 17431  +gcplusg 17472  lecple 17479  0gc0g 17660  Posetcpo 18531  ltcplt 18532  Tosetctos 18638  Grpcgrp 19194  invgcminusg 19195  .gcmg 19327  oppgcoppg 19610  oMndcomnd 20384  oGrpcogrp 20385  Archicarchi 33837
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
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-tpos 8281  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-pnf 11384  df-mnf 11385  df-xr 11386  df-ltxr 11387  df-le 11388  df-sub 11582  df-neg 11583  df-nn 12376  df-2 12445  df-3 12446  df-4 12447  df-5 12448  df-6 12449  df-7 12450  df-8 12451  df-9 12452  df-n0 12647  df-z 12734  df-dec 12855  df-uz 13006  df-fz 13680  df-seq 14185  df-sets 17386  df-slot 17404  df-ndx 17416  df-base 17432  df-plusg 17486  df-ple 17493  df-0g 17662  df-proset 18518  df-poset 18537  df-plt 18552  df-toset 18639  df-mgm 18866  df-sgrp 18958  df-mnd 18974  df-grp 19197  df-minusg 19198  df-mulg 19328  df-oppg 19611  df-omnd 20386  df-ogrp 20387  df-inftm 33838  df-archi 33839
This theorem is used by:  archiabllem2c  33855
  Copyright terms: Public domain W3C validator