Step | Hyp | Ref
| Expression |
1 | | oveq1 7418 |
. . . 4
β’ (π = 0 β (π Β· π) = (0 Β· π)) |
2 | 1 | breq2d 5160 |
. . 3
β’ (π = 0 β (π β€ (π Β· π) β π β€ (0 Β· π))) |
3 | | oveq1 7418 |
. . . 4
β’ (π = π β (π Β· π) = (π Β· π)) |
4 | 3 | breq2d 5160 |
. . 3
β’ (π = π β (π β€ (π Β· π) β π β€ (π Β· π))) |
5 | | oveq1 7418 |
. . . 4
β’ (π = (π + 1) β (π Β· π) = ((π + 1) Β· π)) |
6 | 5 | breq2d 5160 |
. . 3
β’ (π = (π + 1) β (π β€ (π Β· π) β π β€ ((π + 1) Β· π))) |
7 | | archirng.6 |
. . . . 5
β’ (π β 0 < π) |
8 | | archirng.1 |
. . . . . . 7
β’ (π β π β oGrp) |
9 | | isogrp 32478 |
. . . . . . . 8
β’ (π β oGrp β (π β Grp β§ π β oMnd)) |
10 | 9 | simprbi 497 |
. . . . . . 7
β’ (π β oGrp β π β oMnd) |
11 | | omndtos 32481 |
. . . . . . 7
β’ (π β oMnd β π β Toset) |
12 | 8, 10, 11 | 3syl 18 |
. . . . . 6
β’ (π β π β Toset) |
13 | | ogrpgrp 32479 |
. . . . . . . 8
β’ (π β oGrp β π β Grp) |
14 | 8, 13 | syl 17 |
. . . . . . 7
β’ (π β π β Grp) |
15 | | archirng.b |
. . . . . . . 8
β’ π΅ = (Baseβπ) |
16 | | archirng.0 |
. . . . . . . 8
β’ 0 =
(0gβπ) |
17 | 15, 16 | grpidcl 18886 |
. . . . . . 7
β’ (π β Grp β 0 β π΅) |
18 | 14, 17 | syl 17 |
. . . . . 6
β’ (π β 0 β π΅) |
19 | | archirng.4 |
. . . . . 6
β’ (π β π β π΅) |
20 | | archirng.l |
. . . . . . 7
β’ β€ =
(leβπ) |
21 | | archirng.i |
. . . . . . 7
β’ < =
(ltβπ) |
22 | 15, 20, 21 | tltnle 18379 |
. . . . . 6
β’ ((π β Toset β§ 0 β π΅ β§ π β π΅) β ( 0 < π β Β¬ π β€ 0 )) |
23 | 12, 18, 19, 22 | syl3anc 1371 |
. . . . 5
β’ (π β ( 0 < π β Β¬ π β€ 0 )) |
24 | 7, 23 | mpbid 231 |
. . . 4
β’ (π β Β¬ π β€ 0 ) |
25 | | archirng.3 |
. . . . . 6
β’ (π β π β π΅) |
26 | | archirng.x |
. . . . . . 7
β’ Β· =
(.gβπ) |
27 | 15, 16, 26 | mulg0 18993 |
. . . . . 6
β’ (π β π΅ β (0 Β· π) = 0 ) |
28 | 25, 27 | syl 17 |
. . . . 5
β’ (π β (0 Β· π) = 0 ) |
29 | 28 | breq2d 5160 |
. . . 4
β’ (π β (π β€ (0 Β· π) β π β€ 0 )) |
30 | 24, 29 | mtbird 324 |
. . 3
β’ (π β Β¬ π β€ (0 Β· π)) |
31 | 25, 19 | jca 512 |
. . . 4
β’ (π β (π β π΅ β§ π β π΅)) |
32 | | omndmnd 32480 |
. . . . . 6
β’ (π β oMnd β π β Mnd) |
33 | 8, 10, 32 | 3syl 18 |
. . . . 5
β’ (π β π β Mnd) |
34 | | archirng.2 |
. . . . 5
β’ (π β π β Archi) |
35 | 15, 16, 26, 20, 21 | isarchi2 32589 |
. . . . . 6
β’ ((π β Toset β§ π β Mnd) β (π β Archi β
βπ₯ β π΅ βπ¦ β π΅ ( 0 < π₯ β βπ β β π¦ β€ (π Β· π₯)))) |
36 | 35 | biimpa 477 |
. . . . 5
β’ (((π β Toset β§ π β Mnd) β§ π β Archi) β
βπ₯ β π΅ βπ¦ β π΅ ( 0 < π₯ β βπ β β π¦ β€ (π Β· π₯))) |
37 | 12, 33, 34, 36 | syl21anc 836 |
. . . 4
β’ (π β βπ₯ β π΅ βπ¦ β π΅ ( 0 < π₯ β βπ β β π¦ β€ (π Β· π₯))) |
38 | | archirng.5 |
. . . 4
β’ (π β 0 < π) |
39 | | breq2 5152 |
. . . . . 6
β’ (π₯ = π β ( 0 < π₯ β 0 < π)) |
40 | | oveq2 7419 |
. . . . . . . 8
β’ (π₯ = π β (π Β· π₯) = (π Β· π)) |
41 | 40 | breq2d 5160 |
. . . . . . 7
β’ (π₯ = π β (π¦ β€ (π Β· π₯) β π¦ β€ (π Β· π))) |
42 | 41 | rexbidv 3178 |
. . . . . 6
β’ (π₯ = π β (βπ β β π¦ β€ (π Β· π₯) β βπ β β π¦ β€ (π Β· π))) |
43 | 39, 42 | imbi12d 344 |
. . . . 5
β’ (π₯ = π β (( 0 < π₯ β βπ β β π¦ β€ (π Β· π₯)) β ( 0 < π β βπ β β π¦ β€ (π Β· π)))) |
44 | | breq1 5151 |
. . . . . . 7
β’ (π¦ = π β (π¦ β€ (π Β· π) β π β€ (π Β· π))) |
45 | 44 | rexbidv 3178 |
. . . . . 6
β’ (π¦ = π β (βπ β β π¦ β€ (π Β· π) β βπ β β π β€ (π Β· π))) |
46 | 45 | imbi2d 340 |
. . . . 5
β’ (π¦ = π β (( 0 < π β βπ β β π¦ β€ (π Β· π)) β ( 0 < π β βπ β β π β€ (π Β· π)))) |
47 | 43, 46 | rspc2v 3622 |
. . . 4
β’ ((π β π΅ β§ π β π΅) β (βπ₯ β π΅ βπ¦ β π΅ ( 0 < π₯ β βπ β β π¦ β€ (π Β· π₯)) β ( 0 < π β βπ β β π β€ (π Β· π)))) |
48 | 31, 37, 38, 47 | syl3c 66 |
. . 3
β’ (π β βπ β β π β€ (π Β· π)) |
49 | 2, 4, 6, 30, 48 | nn0min 32281 |
. 2
β’ (π β βπ β β0 (Β¬ π β€ (π Β· π) β§ π β€ ((π + 1) Β· π))) |
50 | 12 | adantr 481 |
. . . . 5
β’ ((π β§ π β β0) β π β Toset) |
51 | 14 | adantr 481 |
. . . . . 6
β’ ((π β§ π β β0) β π β Grp) |
52 | | simpr 485 |
. . . . . . 7
β’ ((π β§ π β β0) β π β
β0) |
53 | 52 | nn0zd 12588 |
. . . . . 6
β’ ((π β§ π β β0) β π β
β€) |
54 | 25 | adantr 481 |
. . . . . 6
β’ ((π β§ π β β0) β π β π΅) |
55 | 15, 26 | mulgcl 19007 |
. . . . . 6
β’ ((π β Grp β§ π β β€ β§ π β π΅) β (π Β· π) β π΅) |
56 | 51, 53, 54, 55 | syl3anc 1371 |
. . . . 5
β’ ((π β§ π β β0) β (π Β· π) β π΅) |
57 | 19 | adantr 481 |
. . . . 5
β’ ((π β§ π β β0) β π β π΅) |
58 | 15, 20, 21 | tltnle 18379 |
. . . . 5
β’ ((π β Toset β§ (π Β· π) β π΅ β§ π β π΅) β ((π Β· π) < π β Β¬ π β€ (π Β· π))) |
59 | 50, 56, 57, 58 | syl3anc 1371 |
. . . 4
β’ ((π β§ π β β0) β ((π Β· π) < π β Β¬ π β€ (π Β· π))) |
60 | 59 | anbi1d 630 |
. . 3
β’ ((π β§ π β β0) β (((π Β· π) < π β§ π β€ ((π + 1) Β· π)) β (Β¬ π β€ (π Β· π) β§ π β€ ((π + 1) Β· π)))) |
61 | 60 | rexbidva 3176 |
. 2
β’ (π β (βπ β β0 ((π Β· π) < π β§ π β€ ((π + 1) Β· π)) β βπ β β0 (Β¬ π β€ (π Β· π) β§ π β€ ((π + 1) Β· π)))) |
62 | 49, 61 | mpbird 256 |
1
β’ (π β βπ β β0 ((π Β· π) < π β§ π β€ ((π + 1) Β· π))) |