Metamath Proof Explorer


Theorem archiabllem2c

Description: Lemma for archiabl . (Contributed by Thierry Arnoux, 1-May-2018)

Ref Expression
Hypotheses archiabllem.b โŠข ๐ต = ( Base โ€˜ ๐‘Š )
archiabllem.0 โŠข 0 = ( 0g โ€˜ ๐‘Š )
archiabllem.e โŠข โ‰ค = ( le โ€˜ ๐‘Š )
archiabllem.t โŠข < = ( lt โ€˜ ๐‘Š )
archiabllem.m โŠข ยท = ( .g โ€˜ ๐‘Š )
archiabllem.g โŠข ( ๐œ‘ โ†’ ๐‘Š โˆˆ oGrp )
archiabllem.a โŠข ( ๐œ‘ โ†’ ๐‘Š โˆˆ Archi )
archiabllem2.1 โŠข + = ( +g โ€˜ ๐‘Š )
archiabllem2.2 โŠข ( ๐œ‘ โ†’ ( oppg โ€˜ ๐‘Š ) โˆˆ oGrp )
archiabllem2.3 โŠข ( ( ๐œ‘ โˆง ๐‘Ž โˆˆ ๐ต โˆง 0 < ๐‘Ž ) โ†’ โˆƒ ๐‘ โˆˆ ๐ต ( 0 < ๐‘ โˆง ๐‘ < ๐‘Ž ) )
archiabllem2b.4 โŠข ( ๐œ‘ โ†’ ๐‘‹ โˆˆ ๐ต )
archiabllem2b.5 โŠข ( ๐œ‘ โ†’ ๐‘Œ โˆˆ ๐ต )
Assertion archiabllem2c ( ๐œ‘ โ†’ ยฌ ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) )

Proof

Step Hyp Ref Expression
1 archiabllem.b โŠข ๐ต = ( Base โ€˜ ๐‘Š )
2 archiabllem.0 โŠข 0 = ( 0g โ€˜ ๐‘Š )
3 archiabllem.e โŠข โ‰ค = ( le โ€˜ ๐‘Š )
4 archiabllem.t โŠข < = ( lt โ€˜ ๐‘Š )
5 archiabllem.m โŠข ยท = ( .g โ€˜ ๐‘Š )
6 archiabllem.g โŠข ( ๐œ‘ โ†’ ๐‘Š โˆˆ oGrp )
7 archiabllem.a โŠข ( ๐œ‘ โ†’ ๐‘Š โˆˆ Archi )
8 archiabllem2.1 โŠข + = ( +g โ€˜ ๐‘Š )
9 archiabllem2.2 โŠข ( ๐œ‘ โ†’ ( oppg โ€˜ ๐‘Š ) โˆˆ oGrp )
10 archiabllem2.3 โŠข ( ( ๐œ‘ โˆง ๐‘Ž โˆˆ ๐ต โˆง 0 < ๐‘Ž ) โ†’ โˆƒ ๐‘ โˆˆ ๐ต ( 0 < ๐‘ โˆง ๐‘ < ๐‘Ž ) )
11 archiabllem2b.4 โŠข ( ๐œ‘ โ†’ ๐‘‹ โˆˆ ๐ต )
12 archiabllem2b.5 โŠข ( ๐œ‘ โ†’ ๐‘Œ โˆˆ ๐ต )
13 simprr โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต ) โˆง ( 0 < ๐‘ก โˆง ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) ) ) โ†’ ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
14 simpl1l โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐œ‘ )
15 14 6 syl โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘Š โˆˆ oGrp )
16 simpl1r โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) )
17 6 adantr โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ๐‘Š โˆˆ oGrp )
18 ogrpgrp โŠข ( ๐‘Š โˆˆ oGrp โ†’ ๐‘Š โˆˆ Grp )
19 17 18 syl โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ๐‘Š โˆˆ Grp )
20 12 adantr โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ๐‘Œ โˆˆ ๐ต )
21 11 adantr โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ๐‘‹ โˆˆ ๐ต )
22 1 8 grpcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ๐‘Œ โˆˆ ๐ต โˆง ๐‘‹ โˆˆ ๐ต ) โ†’ ( ๐‘Œ + ๐‘‹ ) โˆˆ ๐ต )
23 19 20 21 22 syl3anc โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ( ๐‘Œ + ๐‘‹ ) โˆˆ ๐ต )
24 14 16 23 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘Œ + ๐‘‹ ) โˆˆ ๐ต )
25 14 6 18 3syl โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘Š โˆˆ Grp )
26 simpr2 โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘š โˆˆ โ„ค )
27 26 peano2zd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘š + 1 ) โˆˆ โ„ค )
28 simp2 โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ๐‘ก โˆˆ ๐ต )
29 28 adantr โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘ก โˆˆ ๐ต )
30 1 5 mulgcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ๐‘š + 1 ) โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) โ†’ ( ( ๐‘š + 1 ) ยท ๐‘ก ) โˆˆ ๐ต )
31 25 27 29 30 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘š + 1 ) ยท ๐‘ก ) โˆˆ ๐ต )
32 simpr1 โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘› โˆˆ โ„ค )
33 32 peano2zd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘› + 1 ) โˆˆ โ„ค )
34 1 5 mulgcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ๐‘› + 1 ) โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) โ†’ ( ( ๐‘› + 1 ) ยท ๐‘ก ) โˆˆ ๐ต )
35 25 33 29 34 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘› + 1 ) ยท ๐‘ก ) โˆˆ ๐ต )
36 1 8 grpcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ( ๐‘š + 1 ) ยท ๐‘ก ) โˆˆ ๐ต โˆง ( ( ๐‘› + 1 ) ยท ๐‘ก ) โˆˆ ๐ต ) โ†’ ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆˆ ๐ต )
37 25 31 35 36 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆˆ ๐ต )
38 21 3ad2ant1 โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ๐‘‹ โˆˆ ๐ต )
39 38 adantr โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘‹ โˆˆ ๐ต )
40 20 3ad2ant1 โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ๐‘Œ โˆˆ ๐ต )
41 40 adantr โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘Œ โˆˆ ๐ต )
42 1 8 grpcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ๐‘‹ โˆˆ ๐ต โˆง ๐‘Œ โˆˆ ๐ต ) โ†’ ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต )
43 25 39 41 42 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต )
44 isogrp โŠข ( ๐‘Š โˆˆ oGrp โ†” ( ๐‘Š โˆˆ Grp โˆง ๐‘Š โˆˆ oMnd ) )
45 44 simprbi โŠข ( ๐‘Š โˆˆ oGrp โ†’ ๐‘Š โˆˆ oMnd )
46 14 6 45 3syl โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘Š โˆˆ oMnd )
47 simpr3 โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) )
48 47 simprd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) )
49 48 simprd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) )
50 47 simpld โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) )
51 50 simprd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) )
52 isogrp โŠข ( ( oppg โ€˜ ๐‘Š ) โˆˆ oGrp โ†” ( ( oppg โ€˜ ๐‘Š ) โˆˆ Grp โˆง ( oppg โ€˜ ๐‘Š ) โˆˆ oMnd ) )
53 52 simprbi โŠข ( ( oppg โ€˜ ๐‘Š ) โˆˆ oGrp โ†’ ( oppg โ€˜ ๐‘Š ) โˆˆ oMnd )
54 14 9 53 3syl โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( oppg โ€˜ ๐‘Š ) โˆˆ oMnd )
55 1 3 8 46 35 41 39 31 49 51 54 omndadd2rd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘Œ + ๐‘‹ ) โ‰ค ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) )
56 eqid โŠข ( -g โ€˜ ๐‘Š ) = ( -g โ€˜ ๐‘Š )
57 1 3 56 ogrpsub โŠข ( ( ๐‘Š โˆˆ oGrp โˆง ( ( ๐‘Œ + ๐‘‹ ) โˆˆ ๐ต โˆง ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆˆ ๐ต โˆง ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต ) โˆง ( ๐‘Œ + ๐‘‹ ) โ‰ค ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โ‰ค ( ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
58 15 24 37 43 55 57 syl131anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โ‰ค ( ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
59 26 zcnd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘š โˆˆ โ„‚ )
60 32 zcnd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘› โˆˆ โ„‚ )
61 1cnd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ 1 โˆˆ โ„‚ )
62 59 60 61 61 add4d โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘š + ๐‘› ) + ( 1 + 1 ) ) = ( ( ๐‘š + 1 ) + ( ๐‘› + 1 ) ) )
63 1p1e2 โŠข ( 1 + 1 ) = 2
64 63 oveq2i โŠข ( ( ๐‘š + ๐‘› ) + ( 1 + 1 ) ) = ( ( ๐‘š + ๐‘› ) + 2 )
65 addcom โŠข ( ( ๐‘š โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„‚ ) โ†’ ( ๐‘š + ๐‘› ) = ( ๐‘› + ๐‘š ) )
66 65 oveq1d โŠข ( ( ๐‘š โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„‚ ) โ†’ ( ( ๐‘š + ๐‘› ) + 2 ) = ( ( ๐‘› + ๐‘š ) + 2 ) )
67 64 66 eqtrid โŠข ( ( ๐‘š โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„‚ ) โ†’ ( ( ๐‘š + ๐‘› ) + ( 1 + 1 ) ) = ( ( ๐‘› + ๐‘š ) + 2 ) )
68 2cnd โŠข ( ( ๐‘š โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„‚ ) โ†’ 2 โˆˆ โ„‚ )
69 simpr โŠข ( ( ๐‘š โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„‚ ) โ†’ ๐‘› โˆˆ โ„‚ )
70 simpl โŠข ( ( ๐‘š โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„‚ ) โ†’ ๐‘š โˆˆ โ„‚ )
71 69 70 addcld โŠข ( ( ๐‘š โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„‚ ) โ†’ ( ๐‘› + ๐‘š ) โˆˆ โ„‚ )
72 68 71 addcomd โŠข ( ( ๐‘š โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„‚ ) โ†’ ( 2 + ( ๐‘› + ๐‘š ) ) = ( ( ๐‘› + ๐‘š ) + 2 ) )
73 67 72 eqtr4d โŠข ( ( ๐‘š โˆˆ โ„‚ โˆง ๐‘› โˆˆ โ„‚ ) โ†’ ( ( ๐‘š + ๐‘› ) + ( 1 + 1 ) ) = ( 2 + ( ๐‘› + ๐‘š ) ) )
74 59 60 73 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘š + ๐‘› ) + ( 1 + 1 ) ) = ( 2 + ( ๐‘› + ๐‘š ) ) )
75 62 74 eqtr3d โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘š + 1 ) + ( ๐‘› + 1 ) ) = ( 2 + ( ๐‘› + ๐‘š ) ) )
76 75 oveq1d โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘š + 1 ) + ( ๐‘› + 1 ) ) ยท ๐‘ก ) = ( ( 2 + ( ๐‘› + ๐‘š ) ) ยท ๐‘ก ) )
77 2z โŠข 2 โˆˆ โ„ค
78 77 a1i โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ 2 โˆˆ โ„ค )
79 32 26 zaddcld โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘› + ๐‘š ) โˆˆ โ„ค )
80 1 5 8 mulgdir โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( 2 โˆˆ โ„ค โˆง ( ๐‘› + ๐‘š ) โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) ) โ†’ ( ( 2 + ( ๐‘› + ๐‘š ) ) ยท ๐‘ก ) = ( ( 2 ยท ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
81 25 78 79 29 80 syl13anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( 2 + ( ๐‘› + ๐‘š ) ) ยท ๐‘ก ) = ( ( 2 ยท ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
82 76 81 eqtrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘š + 1 ) + ( ๐‘› + 1 ) ) ยท ๐‘ก ) = ( ( 2 ยท ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
83 1 5 8 mulgdir โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ( ๐‘š + 1 ) โˆˆ โ„ค โˆง ( ๐‘› + 1 ) โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) ) โ†’ ( ( ( ๐‘š + 1 ) + ( ๐‘› + 1 ) ) ยท ๐‘ก ) = ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) )
84 25 27 33 29 83 syl13anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘š + 1 ) + ( ๐‘› + 1 ) ) ยท ๐‘ก ) = ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) )
85 1 5 8 mulg2 โŠข ( ๐‘ก โˆˆ ๐ต โ†’ ( 2 ยท ๐‘ก ) = ( ๐‘ก + ๐‘ก ) )
86 29 85 syl โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( 2 ยท ๐‘ก ) = ( ๐‘ก + ๐‘ก ) )
87 86 oveq1d โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( 2 ยท ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) = ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
88 82 84 87 3eqtr3d โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) = ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
89 88 oveq1d โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ( ๐‘š + 1 ) ยท ๐‘ก ) + ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) = ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
90 58 89 breqtrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โ‰ค ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
91 88 37 eqeltrrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) โˆˆ ๐ต )
92 eqid โŠข ( invg โ€˜ ๐‘Š ) = ( invg โ€˜ ๐‘Š )
93 1 8 92 56 grpsubval โŠข ( ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) โˆˆ ๐ต โˆง ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) = ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) )
94 91 43 93 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) = ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) )
95 90 94 breqtrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โ‰ค ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) )
96 14 9 syl โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( oppg โ€˜ ๐‘Š ) โˆˆ oGrp )
97 1 92 grpinvcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต ) โ†’ ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) โˆˆ ๐ต )
98 25 43 97 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) โˆˆ ๐ต )
99 79 znegcld โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ - ( ๐‘› + ๐‘š ) โˆˆ โ„ค )
100 1 5 mulgcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง - ( ๐‘› + ๐‘š ) โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) โ†’ ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) โˆˆ ๐ต )
101 25 99 29 100 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) โˆˆ ๐ต )
102 1 5 8 mulgdir โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) ) โ†’ ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) = ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) )
103 25 32 26 29 102 syl13anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) = ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) )
104 1 5 mulgcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ๐‘› โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) โ†’ ( ๐‘› ยท ๐‘ก ) โˆˆ ๐ต )
105 25 32 29 104 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘› ยท ๐‘ก ) โˆˆ ๐ต )
106 1 5 mulgcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ๐‘š โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) โ†’ ( ๐‘š ยท ๐‘ก ) โˆˆ ๐ต )
107 25 26 29 106 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘š ยท ๐‘ก ) โˆˆ ๐ต )
108 50 simpld โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘› ยท ๐‘ก ) < ๐‘‹ )
109 1 4 8 ogrpaddlt โŠข ( ( ๐‘Š โˆˆ oGrp โˆง ( ( ๐‘› ยท ๐‘ก ) โˆˆ ๐ต โˆง ๐‘‹ โˆˆ ๐ต โˆง ( ๐‘š ยท ๐‘ก ) โˆˆ ๐ต ) โˆง ( ๐‘› ยท ๐‘ก ) < ๐‘‹ ) โ†’ ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) )
110 15 105 39 107 108 109 syl131anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) )
111 48 simpld โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘š ยท ๐‘ก ) < ๐‘Œ )
112 1 4 8 15 96 107 41 39 111 ogrpaddltrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ๐‘Œ ) )
113 omndtos โŠข ( ๐‘Š โˆˆ oMnd โ†’ ๐‘Š โˆˆ Toset )
114 tospos โŠข ( ๐‘Š โˆˆ Toset โ†’ ๐‘Š โˆˆ Poset )
115 46 113 114 3syl โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ๐‘Š โˆˆ Poset )
116 1 8 grpcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ๐‘› ยท ๐‘ก ) โˆˆ ๐ต โˆง ( ๐‘š ยท ๐‘ก ) โˆˆ ๐ต ) โ†’ ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) โˆˆ ๐ต )
117 25 105 107 116 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) โˆˆ ๐ต )
118 1 8 grpcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ๐‘‹ โˆˆ ๐ต โˆง ( ๐‘š ยท ๐‘ก ) โˆˆ ๐ต ) โ†’ ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) โˆˆ ๐ต )
119 25 39 107 118 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) โˆˆ ๐ต )
120 1 4 plttr โŠข ( ( ๐‘Š โˆˆ Poset โˆง ( ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) โˆˆ ๐ต โˆง ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) โˆˆ ๐ต โˆง ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต ) ) โ†’ ( ( ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) โˆง ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ๐‘Œ ) ) โ†’ ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ๐‘Œ ) ) )
121 115 117 119 43 120 syl13anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) โˆง ( ๐‘‹ + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ๐‘Œ ) ) โ†’ ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ๐‘Œ ) ) )
122 110 112 121 mp2and โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘› ยท ๐‘ก ) + ( ๐‘š ยท ๐‘ก ) ) < ( ๐‘‹ + ๐‘Œ ) )
123 103 122 eqbrtrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) < ( ๐‘‹ + ๐‘Œ ) )
124 103 117 eqeltrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) โˆˆ ๐ต )
125 1 4 92 ogrpinvlt โŠข ( ( ( ๐‘Š โˆˆ oGrp โˆง ( oppg โ€˜ ๐‘Š ) โˆˆ oGrp ) โˆง ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) โˆˆ ๐ต โˆง ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต ) โ†’ ( ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) < ( ๐‘‹ + ๐‘Œ ) โ†” ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) < ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ) )
126 15 96 124 43 125 syl211anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) < ( ๐‘‹ + ๐‘Œ ) โ†” ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) < ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ) )
127 123 126 mpbid โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) < ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
128 1 5 92 mulgneg โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ๐‘› + ๐‘š ) โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) โ†’ ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) = ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
129 25 79 29 128 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) = ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
130 127 129 breqtrrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) < ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) )
131 1 4 8 15 96 98 101 91 130 ogrpaddltrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) < ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
132 1 56 grpsubcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ๐‘Œ + ๐‘‹ ) โˆˆ ๐ต โˆง ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โˆˆ ๐ต )
133 25 24 43 132 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โˆˆ ๐ต )
134 1 8 grpcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) โˆˆ ๐ต โˆง ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) โˆˆ ๐ต ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) โˆˆ ๐ต )
135 25 91 98 134 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) โˆˆ ๐ต )
136 1 8 grpcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) โˆˆ ๐ต โˆง ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) โˆˆ ๐ต ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) โˆˆ ๐ต )
137 25 91 101 136 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) โˆˆ ๐ต )
138 1 3 4 plelttr โŠข ( ( ๐‘Š โˆˆ Poset โˆง ( ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โˆˆ ๐ต โˆง ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) โˆˆ ๐ต โˆง ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) โˆˆ ๐ต ) ) โ†’ ( ( ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โ‰ค ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) โˆง ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) < ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ) )
139 115 133 135 137 138 syl13anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โ‰ค ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) โˆง ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( ( invg โ€˜ ๐‘Š ) โ€˜ ( ๐‘‹ + ๐‘Œ ) ) ) < ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ) )
140 95 131 139 mp2and โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
141 1 8 grpcl โŠข ( ( ๐‘Š โˆˆ Grp โˆง ๐‘ก โˆˆ ๐ต โˆง ๐‘ก โˆˆ ๐ต ) โ†’ ( ๐‘ก + ๐‘ก ) โˆˆ ๐ต )
142 25 29 29 141 syl3anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘ก + ๐‘ก ) โˆˆ ๐ต )
143 1 8 grpass โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ( ๐‘ก + ๐‘ก ) โˆˆ ๐ต โˆง ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) โˆˆ ๐ต โˆง ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) โˆˆ ๐ต ) ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) = ( ( ๐‘ก + ๐‘ก ) + ( ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ) )
144 25 142 124 101 143 syl13anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) = ( ( ๐‘ก + ๐‘ก ) + ( ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ) )
145 60 59 addcld โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ๐‘› + ๐‘š ) โˆˆ โ„‚ )
146 145 negidd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘› + ๐‘š ) + - ( ๐‘› + ๐‘š ) ) = 0 )
147 146 oveq1d โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘› + ๐‘š ) + - ( ๐‘› + ๐‘š ) ) ยท ๐‘ก ) = ( 0 ยท ๐‘ก ) )
148 1 5 8 mulgdir โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ( ๐‘› + ๐‘š ) โˆˆ โ„ค โˆง - ( ๐‘› + ๐‘š ) โˆˆ โ„ค โˆง ๐‘ก โˆˆ ๐ต ) ) โ†’ ( ( ( ๐‘› + ๐‘š ) + - ( ๐‘› + ๐‘š ) ) ยท ๐‘ก ) = ( ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
149 25 79 99 29 148 syl13anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘› + ๐‘š ) + - ( ๐‘› + ๐‘š ) ) ยท ๐‘ก ) = ( ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) )
150 1 2 5 mulg0 โŠข ( ๐‘ก โˆˆ ๐ต โ†’ ( 0 ยท ๐‘ก ) = 0 )
151 29 150 syl โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( 0 ยท ๐‘ก ) = 0 )
152 147 149 151 3eqtr3d โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) = 0 )
153 152 oveq2d โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘ก + ๐‘ก ) + ( ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) ) = ( ( ๐‘ก + ๐‘ก ) + 0 ) )
154 1 8 2 grprid โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ๐‘ก + ๐‘ก ) โˆˆ ๐ต ) โ†’ ( ( ๐‘ก + ๐‘ก ) + 0 ) = ( ๐‘ก + ๐‘ก ) )
155 25 142 154 syl2anc โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘ก + ๐‘ก ) + 0 ) = ( ๐‘ก + ๐‘ก ) )
156 144 153 155 3eqtrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ( ๐‘ก + ๐‘ก ) + ( ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) + ( - ( ๐‘› + ๐‘š ) ยท ๐‘ก ) ) = ( ๐‘ก + ๐‘ก ) )
157 140 156 breqtrd โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ( ๐‘› โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ๐‘ก + ๐‘ก ) )
158 157 3anassrs โŠข ( ( ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โˆง ๐‘› โˆˆ โ„ค ) โˆง ๐‘š โˆˆ โ„ค ) โˆง ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ๐‘ก + ๐‘ก ) )
159 17 3ad2ant1 โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ๐‘Š โˆˆ oGrp )
160 7 adantr โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ๐‘Š โˆˆ Archi )
161 160 3ad2ant1 โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ๐‘Š โˆˆ Archi )
162 simp3 โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ 0 < ๐‘ก )
163 9 adantr โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ( oppg โ€˜ ๐‘Š ) โˆˆ oGrp )
164 163 3ad2ant1 โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ( oppg โ€˜ ๐‘Š ) โˆˆ oGrp )
165 1 2 4 3 5 159 161 28 38 162 164 archirngz โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ โˆƒ ๐‘› โˆˆ โ„ค ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) )
166 1 2 4 3 5 159 161 28 40 162 164 archirngz โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ โˆƒ ๐‘š โˆˆ โ„ค ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) )
167 reeanv โŠข ( โˆƒ ๐‘› โˆˆ โ„ค โˆƒ ๐‘š โˆˆ โ„ค ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) โ†” ( โˆƒ ๐‘› โˆˆ โ„ค ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง โˆƒ ๐‘š โˆˆ โ„ค ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) )
168 165 166 167 sylanbrc โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ โˆƒ ๐‘› โˆˆ โ„ค โˆƒ ๐‘š โˆˆ โ„ค ( ( ( ๐‘› ยท ๐‘ก ) < ๐‘‹ โˆง ๐‘‹ โ‰ค ( ( ๐‘› + 1 ) ยท ๐‘ก ) ) โˆง ( ( ๐‘š ยท ๐‘ก ) < ๐‘Œ โˆง ๐‘Œ โ‰ค ( ( ๐‘š + 1 ) ยท ๐‘ก ) ) ) )
169 158 168 r19.29vva โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ๐‘ก + ๐‘ก ) )
170 159 45 113 3syl โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ๐‘Š โˆˆ Toset )
171 19 21 20 42 syl3anc โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต )
172 19 23 171 132 syl3anc โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โˆˆ ๐ต )
173 172 3ad2ant1 โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โˆˆ ๐ต )
174 159 18 syl โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ๐‘Š โˆˆ Grp )
175 174 28 28 141 syl3anc โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ( ๐‘ก + ๐‘ก ) โˆˆ ๐ต )
176 1 3 4 tltnle โŠข ( ( ๐‘Š โˆˆ Toset โˆง ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) โˆˆ ๐ต โˆง ( ๐‘ก + ๐‘ก ) โˆˆ ๐ต ) โ†’ ( ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ๐‘ก + ๐‘ก ) โ†” ยฌ ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) ) )
177 170 173 175 176 syl3anc โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ( ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ๐‘ก + ๐‘ก ) โ†” ยฌ ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) ) )
178 169 177 mpbid โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต โˆง 0 < ๐‘ก ) โ†’ ยฌ ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
179 178 3expa โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต ) โˆง 0 < ๐‘ก ) โ†’ ยฌ ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
180 179 adantrr โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต ) โˆง ( 0 < ๐‘ก โˆง ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) ) ) โ†’ ยฌ ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
181 13 180 pm2.21fal โŠข ( ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘ก โˆˆ ๐ต ) โˆง ( 0 < ๐‘ก โˆง ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) ) ) โ†’ โŠฅ )
182 10 3adant1r โŠข ( ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โˆง ๐‘Ž โˆˆ ๐ต โˆง 0 < ๐‘Ž ) โ†’ โˆƒ ๐‘ โˆˆ ๐ต ( 0 < ๐‘ โˆง ๐‘ < ๐‘Ž ) )
183 1 2 56 grpsubid โŠข ( ( ๐‘Š โˆˆ Grp โˆง ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต ) โ†’ ( ( ๐‘‹ + ๐‘Œ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) = 0 )
184 19 171 183 syl2anc โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ( ( ๐‘‹ + ๐‘Œ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) = 0 )
185 simpr โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) )
186 1 4 56 ogrpsublt โŠข ( ( ๐‘Š โˆˆ oGrp โˆง ( ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต โˆง ( ๐‘Œ + ๐‘‹ ) โˆˆ ๐ต โˆง ( ๐‘‹ + ๐‘Œ ) โˆˆ ๐ต ) โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ( ( ๐‘‹ + ๐‘Œ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
187 17 171 23 171 185 186 syl131anc โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ ( ( ๐‘‹ + ๐‘Œ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) < ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
188 184 187 eqbrtrrd โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ 0 < ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) )
189 1 2 3 4 5 17 160 8 163 182 172 188 archiabllem2a โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ โˆƒ ๐‘ก โˆˆ ๐ต ( 0 < ๐‘ก โˆง ( ๐‘ก + ๐‘ก ) โ‰ค ( ( ๐‘Œ + ๐‘‹ ) ( -g โ€˜ ๐‘Š ) ( ๐‘‹ + ๐‘Œ ) ) ) )
190 181 189 r19.29a โŠข ( ( ๐œ‘ โˆง ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) ) โ†’ โŠฅ )
191 190 inegd โŠข ( ๐œ‘ โ†’ ยฌ ( ๐‘‹ + ๐‘Œ ) < ( ๐‘Œ + ๐‘‹ ) )