Metamath Proof Explorer


Theorem omndmul2

Description: In an ordered monoid, the ordering is compatible with group power. This version does not require the monoid to be commutative. (Contributed by Thierry Arnoux, 23-Mar-2018)

Ref Expression
Hypotheses omndmul.0 โŠข ๐ต = ( Base โ€˜ ๐‘€ )
omndmul.1 โŠข โ‰ค = ( le โ€˜ ๐‘€ )
omndmul2.2 โŠข ยท = ( .g โ€˜ ๐‘€ )
omndmul2.3 โŠข 0 = ( 0g โ€˜ ๐‘€ )
Assertion omndmul2 ( ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†’ 0 โ‰ค ( ๐‘ ยท ๐‘‹ ) )

Proof

Step Hyp Ref Expression
1 omndmul.0 โŠข ๐ต = ( Base โ€˜ ๐‘€ )
2 omndmul.1 โŠข โ‰ค = ( le โ€˜ ๐‘€ )
3 omndmul2.2 โŠข ยท = ( .g โ€˜ ๐‘€ )
4 omndmul2.3 โŠข 0 = ( 0g โ€˜ ๐‘€ )
5 df-3an โŠข ( ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†” ( ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 ) ) โˆง 0 โ‰ค ๐‘‹ ) )
6 anass โŠข ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โ†” ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 ) ) )
7 6 anbi1i โŠข ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†” ( ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 ) ) โˆง 0 โ‰ค ๐‘‹ ) )
8 5 7 bitr4i โŠข ( ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†” ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) )
9 simplr โŠข ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†’ ๐‘ โˆˆ โ„•0 )
10 oveq1 โŠข ( ๐‘š = 0 โ†’ ( ๐‘š ยท ๐‘‹ ) = ( 0 ยท ๐‘‹ ) )
11 10 breq2d โŠข ( ๐‘š = 0 โ†’ ( 0 โ‰ค ( ๐‘š ยท ๐‘‹ ) โ†” 0 โ‰ค ( 0 ยท ๐‘‹ ) ) )
12 oveq1 โŠข ( ๐‘š = ๐‘› โ†’ ( ๐‘š ยท ๐‘‹ ) = ( ๐‘› ยท ๐‘‹ ) )
13 12 breq2d โŠข ( ๐‘š = ๐‘› โ†’ ( 0 โ‰ค ( ๐‘š ยท ๐‘‹ ) โ†” 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) )
14 oveq1 โŠข ( ๐‘š = ( ๐‘› + 1 ) โ†’ ( ๐‘š ยท ๐‘‹ ) = ( ( ๐‘› + 1 ) ยท ๐‘‹ ) )
15 14 breq2d โŠข ( ๐‘š = ( ๐‘› + 1 ) โ†’ ( 0 โ‰ค ( ๐‘š ยท ๐‘‹ ) โ†” 0 โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘‹ ) ) )
16 oveq1 โŠข ( ๐‘š = ๐‘ โ†’ ( ๐‘š ยท ๐‘‹ ) = ( ๐‘ ยท ๐‘‹ ) )
17 16 breq2d โŠข ( ๐‘š = ๐‘ โ†’ ( 0 โ‰ค ( ๐‘š ยท ๐‘‹ ) โ†” 0 โ‰ค ( ๐‘ ยท ๐‘‹ ) ) )
18 omndtos โŠข ( ๐‘€ โˆˆ oMnd โ†’ ๐‘€ โˆˆ Toset )
19 tospos โŠข ( ๐‘€ โˆˆ Toset โ†’ ๐‘€ โˆˆ Poset )
20 18 19 syl โŠข ( ๐‘€ โˆˆ oMnd โ†’ ๐‘€ โˆˆ Poset )
21 omndmnd โŠข ( ๐‘€ โˆˆ oMnd โ†’ ๐‘€ โˆˆ Mnd )
22 1 4 mndidcl โŠข ( ๐‘€ โˆˆ Mnd โ†’ 0 โˆˆ ๐ต )
23 21 22 syl โŠข ( ๐‘€ โˆˆ oMnd โ†’ 0 โˆˆ ๐ต )
24 1 2 posref โŠข ( ( ๐‘€ โˆˆ Poset โˆง 0 โˆˆ ๐ต ) โ†’ 0 โ‰ค 0 )
25 20 23 24 syl2anc โŠข ( ๐‘€ โˆˆ oMnd โ†’ 0 โ‰ค 0 )
26 25 ad3antrrr โŠข ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†’ 0 โ‰ค 0 )
27 1 4 3 mulg0 โŠข ( ๐‘‹ โˆˆ ๐ต โ†’ ( 0 ยท ๐‘‹ ) = 0 )
28 27 ad3antlr โŠข ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†’ ( 0 ยท ๐‘‹ ) = 0 )
29 26 28 breqtrrd โŠข ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†’ 0 โ‰ค ( 0 ยท ๐‘‹ ) )
30 20 ad5antr โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ ๐‘€ โˆˆ Poset )
31 21 ad5antr โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ ๐‘€ โˆˆ Mnd )
32 31 22 syl โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ 0 โˆˆ ๐ต )
33 simplr โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ ๐‘› โˆˆ โ„•0 )
34 simp-5r โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ ๐‘‹ โˆˆ ๐ต )
35 1 3 31 33 34 mulgnn0cld โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ ( ๐‘› ยท ๐‘‹ ) โˆˆ ๐ต )
36 simpr32 โŠข ( ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 โˆง ( 0 โ‰ค ๐‘‹ โˆง ๐‘› โˆˆ โ„•0 โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) ) ) โ†’ ๐‘› โˆˆ โ„•0 )
37 1nn0 โŠข 1 โˆˆ โ„•0
38 37 a1i โŠข ( ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 โˆง ( 0 โ‰ค ๐‘‹ โˆง ๐‘› โˆˆ โ„•0 โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) ) ) โ†’ 1 โˆˆ โ„•0 )
39 36 38 nn0addcld โŠข ( ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 โˆง ( 0 โ‰ค ๐‘‹ โˆง ๐‘› โˆˆ โ„•0 โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) ) ) โ†’ ( ๐‘› + 1 ) โˆˆ โ„•0 )
40 39 3anassrs โŠข ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง ( 0 โ‰ค ๐‘‹ โˆง ๐‘› โˆˆ โ„•0 โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) ) โ†’ ( ๐‘› + 1 ) โˆˆ โ„•0 )
41 40 3anassrs โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ ( ๐‘› + 1 ) โˆˆ โ„•0 )
42 1 3 31 41 34 mulgnn0cld โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ ( ( ๐‘› + 1 ) ยท ๐‘‹ ) โˆˆ ๐ต )
43 32 35 42 3jca โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ ( 0 โˆˆ ๐ต โˆง ( ๐‘› ยท ๐‘‹ ) โˆˆ ๐ต โˆง ( ( ๐‘› + 1 ) ยท ๐‘‹ ) โˆˆ ๐ต ) )
44 simpr โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) )
45 simp-4l โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ๐‘€ โˆˆ oMnd )
46 21 ad4antr โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ๐‘€ โˆˆ Mnd )
47 46 22 syl โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ 0 โˆˆ ๐ต )
48 simp-4r โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ๐‘‹ โˆˆ ๐ต )
49 simpr โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ๐‘› โˆˆ โ„•0 )
50 1 3 46 49 48 mulgnn0cld โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( ๐‘› ยท ๐‘‹ ) โˆˆ ๐ต )
51 simplr โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ 0 โ‰ค ๐‘‹ )
52 eqid โŠข ( +g โ€˜ ๐‘€ ) = ( +g โ€˜ ๐‘€ )
53 1 2 52 omndadd โŠข ( ( ๐‘€ โˆˆ oMnd โˆง ( 0 โˆˆ ๐ต โˆง ๐‘‹ โˆˆ ๐ต โˆง ( ๐‘› ยท ๐‘‹ ) โˆˆ ๐ต ) โˆง 0 โ‰ค ๐‘‹ ) โ†’ ( 0 ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) โ‰ค ( ๐‘‹ ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) )
54 45 47 48 50 51 53 syl131anc โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( 0 ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) โ‰ค ( ๐‘‹ ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) )
55 1 52 4 mndlid โŠข ( ( ๐‘€ โˆˆ Mnd โˆง ( ๐‘› ยท ๐‘‹ ) โˆˆ ๐ต ) โ†’ ( 0 ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) = ( ๐‘› ยท ๐‘‹ ) )
56 46 50 55 syl2anc โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( 0 ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) = ( ๐‘› ยท ๐‘‹ ) )
57 37 a1i โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ 1 โˆˆ โ„•0 )
58 1 3 52 mulgnn0dir โŠข ( ( ๐‘€ โˆˆ Mnd โˆง ( 1 โˆˆ โ„•0 โˆง ๐‘› โˆˆ โ„•0 โˆง ๐‘‹ โˆˆ ๐ต ) ) โ†’ ( ( 1 + ๐‘› ) ยท ๐‘‹ ) = ( ( 1 ยท ๐‘‹ ) ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) )
59 46 57 49 48 58 syl13anc โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( ( 1 + ๐‘› ) ยท ๐‘‹ ) = ( ( 1 ยท ๐‘‹ ) ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) )
60 1cnd โŠข ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ( ๐‘ โˆˆ โ„•0 โˆง 0 โ‰ค ๐‘‹ โˆง ๐‘› โˆˆ โ„•0 ) ) โ†’ 1 โˆˆ โ„‚ )
61 simpr3 โŠข ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ( ๐‘ โˆˆ โ„•0 โˆง 0 โ‰ค ๐‘‹ โˆง ๐‘› โˆˆ โ„•0 ) ) โ†’ ๐‘› โˆˆ โ„•0 )
62 61 nn0cnd โŠข ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ( ๐‘ โˆˆ โ„•0 โˆง 0 โ‰ค ๐‘‹ โˆง ๐‘› โˆˆ โ„•0 ) ) โ†’ ๐‘› โˆˆ โ„‚ )
63 60 62 addcomd โŠข ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ( ๐‘ โˆˆ โ„•0 โˆง 0 โ‰ค ๐‘‹ โˆง ๐‘› โˆˆ โ„•0 ) ) โ†’ ( 1 + ๐‘› ) = ( ๐‘› + 1 ) )
64 63 3anassrs โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( 1 + ๐‘› ) = ( ๐‘› + 1 ) )
65 64 oveq1d โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( ( 1 + ๐‘› ) ยท ๐‘‹ ) = ( ( ๐‘› + 1 ) ยท ๐‘‹ ) )
66 1 3 mulg1 โŠข ( ๐‘‹ โˆˆ ๐ต โ†’ ( 1 ยท ๐‘‹ ) = ๐‘‹ )
67 48 66 syl โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( 1 ยท ๐‘‹ ) = ๐‘‹ )
68 67 oveq1d โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( ( 1 ยท ๐‘‹ ) ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) = ( ๐‘‹ ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) )
69 59 65 68 3eqtr3rd โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( ๐‘‹ ( +g โ€˜ ๐‘€ ) ( ๐‘› ยท ๐‘‹ ) ) = ( ( ๐‘› + 1 ) ยท ๐‘‹ ) )
70 54 56 69 3brtr3d โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โ†’ ( ๐‘› ยท ๐‘‹ ) โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘‹ ) )
71 70 adantr โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ ( ๐‘› ยท ๐‘‹ ) โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘‹ ) )
72 1 2 postr โŠข ( ( ๐‘€ โˆˆ Poset โˆง ( 0 โˆˆ ๐ต โˆง ( ๐‘› ยท ๐‘‹ ) โˆˆ ๐ต โˆง ( ( ๐‘› + 1 ) ยท ๐‘‹ ) โˆˆ ๐ต ) ) โ†’ ( ( 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) โˆง ( ๐‘› ยท ๐‘‹ ) โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘‹ ) ) โ†’ 0 โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘‹ ) ) )
73 72 imp โŠข ( ( ( ๐‘€ โˆˆ Poset โˆง ( 0 โˆˆ ๐ต โˆง ( ๐‘› ยท ๐‘‹ ) โˆˆ ๐ต โˆง ( ( ๐‘› + 1 ) ยท ๐‘‹ ) โˆˆ ๐ต ) ) โˆง ( 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) โˆง ( ๐‘› ยท ๐‘‹ ) โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘‹ ) ) ) โ†’ 0 โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘‹ ) )
74 30 43 44 71 73 syl22anc โŠข ( ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘› โˆˆ โ„•0 ) โˆง 0 โ‰ค ( ๐‘› ยท ๐‘‹ ) ) โ†’ 0 โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘‹ ) )
75 11 13 15 17 29 74 nn0indd โŠข ( ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โˆง ๐‘ โˆˆ โ„•0 ) โ†’ 0 โ‰ค ( ๐‘ ยท ๐‘‹ ) )
76 9 75 mpdan โŠข ( ( ( ( ๐‘€ โˆˆ oMnd โˆง ๐‘‹ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†’ 0 โ‰ค ( ๐‘ ยท ๐‘‹ ) )
77 8 76 sylbi โŠข ( ( ๐‘€ โˆˆ oMnd โˆง ( ๐‘‹ โˆˆ ๐ต โˆง ๐‘ โˆˆ โ„•0 ) โˆง 0 โ‰ค ๐‘‹ ) โ†’ 0 โ‰ค ( ๐‘ ยท ๐‘‹ ) )