Metamath Proof Explorer


Theorem odadd2

Description: The order of a product in an abelian group is divisible by the LCM of the orders of the factors divided by the GCD. (Contributed by Mario Carneiro, 20-Oct-2015)

Ref Expression
Hypotheses odadd1.1 โŠข ๐‘‚ = ( od โ€˜ ๐บ )
odadd1.2 โŠข ๐‘‹ = ( Base โ€˜ ๐บ )
odadd1.3 โŠข + = ( +g โ€˜ ๐บ )
Assertion odadd2 ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) )

Proof

Step Hyp Ref Expression
1 odadd1.1 โŠข ๐‘‚ = ( od โ€˜ ๐บ )
2 odadd1.2 โŠข ๐‘‹ = ( Base โ€˜ ๐บ )
3 odadd1.3 โŠข + = ( +g โ€˜ ๐บ )
4 2 1 odcl โŠข ( ๐ด โˆˆ ๐‘‹ โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„•0 )
5 4 3ad2ant2 โŠข ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„•0 )
6 5 nn0zd โŠข ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„ค )
7 2 1 odcl โŠข ( ๐ต โˆˆ ๐‘‹ โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„•0 )
8 7 3ad2ant3 โŠข ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„•0 )
9 8 nn0zd โŠข ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„ค )
10 6 9 zmulcld โŠข ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค )
11 10 adantr โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค )
12 dvds0 โŠข ( ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ 0 )
13 11 12 syl โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ 0 )
14 simpr โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 )
15 14 sq0id โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) = 0 )
16 15 oveq2d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) = ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท 0 ) )
17 ablgrp โŠข ( ๐บ โˆˆ Abel โ†’ ๐บ โˆˆ Grp )
18 2 3 grpcl โŠข ( ( ๐บ โˆˆ Grp โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ๐ด + ๐ต ) โˆˆ ๐‘‹ )
19 17 18 syl3an1 โŠข ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ๐ด + ๐ต ) โˆˆ ๐‘‹ )
20 2 1 odcl โŠข ( ( ๐ด + ๐ต ) โˆˆ ๐‘‹ โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„•0 )
21 19 20 syl โŠข ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„•0 )
22 21 nn0zd โŠข ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค )
23 22 adantr โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค )
24 23 zcnd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„‚ )
25 24 mul01d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท 0 ) = 0 )
26 16 25 eqtrd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) = 0 )
27 13 26 breqtrrd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) = 0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) )
28 6 adantr โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„ค )
29 9 adantr โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„ค )
30 28 29 gcdcld โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„•0 )
31 30 nn0cnd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„‚ )
32 31 sqvald โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) = ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
33 32 oveq2d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) = ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) )
34 gcddvds โŠข ( ( ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„ค ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ด ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ต ) ) )
35 28 29 34 syl2anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ด ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ต ) ) )
36 35 simpld โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ด ) )
37 30 nn0zd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค )
38 simpr โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 )
39 dvdsval2 โŠข ( ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 โˆง ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„ค ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ด ) โ†” ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค ) )
40 37 38 28 39 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ด ) โ†” ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค ) )
41 36 40 mpbid โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค )
42 41 zcnd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„‚ )
43 35 simprd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ต ) )
44 dvdsval2 โŠข ( ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 โˆง ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„ค ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ต ) โ†” ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค ) )
45 37 38 29 44 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ๐‘‚ โ€˜ ๐ต ) โ†” ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค ) )
46 43 45 mpbid โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค )
47 46 zcnd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„‚ )
48 42 31 47 31 mul4d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) = ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) )
49 28 zcnd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„‚ )
50 49 31 38 divcan1d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) = ( ๐‘‚ โ€˜ ๐ด ) )
51 29 zcnd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„‚ )
52 51 31 38 divcan1d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) = ( ๐‘‚ โ€˜ ๐ต ) )
53 50 52 oveq12d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) = ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) )
54 33 48 53 3eqtr2d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) = ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) )
55 22 adantr โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค )
56 dvdsmul2 โŠข ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„ค ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) )
57 55 28 56 syl2anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) )
58 simpl1 โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ๐บ โˆˆ Abel )
59 55 29 zmulcld โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค )
60 simpl2 โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ๐ด โˆˆ ๐‘‹ )
61 simpl3 โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ๐ต โˆˆ ๐‘‹ )
62 eqid โŠข ( .g โ€˜ ๐บ ) = ( .g โ€˜ ๐บ )
63 2 62 3 mulgdi โŠข ( ( ๐บ โˆˆ Abel โˆง ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) )
64 58 59 60 61 63 syl13anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) )
65 dvdsmul2 โŠข ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„ค ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) )
66 55 29 65 syl2anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) )
67 58 17 syl โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ๐บ โˆˆ Grp )
68 eqid โŠข ( 0g โ€˜ ๐บ ) = ( 0g โ€˜ ๐บ )
69 2 1 62 68 oddvds โŠข ( ( ๐บ โˆˆ Grp โˆง ๐ต โˆˆ ๐‘‹ โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค ) โ†’ ( ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ต ) = ( 0g โ€˜ ๐บ ) ) )
70 67 61 59 69 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ต ) = ( 0g โ€˜ ๐บ ) ) )
71 66 70 mpbid โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ต ) = ( 0g โ€˜ ๐บ ) )
72 71 oveq2d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) = ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( 0g โ€˜ ๐บ ) ) )
73 64 72 eqtrd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( 0g โ€˜ ๐บ ) ) )
74 dvdsmul1 โŠข ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„ค ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) )
75 55 29 74 syl2anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) )
76 19 adantr โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐ด + ๐ต ) โˆˆ ๐‘‹ )
77 2 1 62 68 oddvds โŠข ( ( ๐บ โˆˆ Grp โˆง ( ๐ด + ๐ต ) โˆˆ ๐‘‹ โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค ) โ†’ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( 0g โ€˜ ๐บ ) ) )
78 67 76 59 77 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( 0g โ€˜ ๐บ ) ) )
79 75 78 mpbid โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( 0g โ€˜ ๐บ ) )
80 2 62 mulgcl โŠข ( ( ๐บ โˆˆ Grp โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค โˆง ๐ด โˆˆ ๐‘‹ ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) โˆˆ ๐‘‹ )
81 67 59 60 80 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) โˆˆ ๐‘‹ )
82 2 3 68 grprid โŠข ( ( ๐บ โˆˆ Grp โˆง ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) โˆˆ ๐‘‹ ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( 0g โ€˜ ๐บ ) ) = ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) )
83 67 81 82 syl2anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( 0g โ€˜ ๐บ ) ) = ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) )
84 73 79 83 3eqtr3rd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) = ( 0g โ€˜ ๐บ ) )
85 2 1 62 68 oddvds โŠข ( ( ๐บ โˆˆ Grp โˆง ๐ด โˆˆ ๐‘‹ โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) = ( 0g โ€˜ ๐บ ) ) )
86 67 60 59 85 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ( .g โ€˜ ๐บ ) ๐ด ) = ( 0g โ€˜ ๐บ ) ) )
87 84 86 mpbird โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) )
88 55 28 zmulcld โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆˆ โ„ค )
89 dvdsgcd โŠข ( ( ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆง ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) gcd ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) ) )
90 28 88 59 89 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆง ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) gcd ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) ) )
91 57 87 90 mp2and โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) gcd ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) )
92 21 adantr โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„•0 )
93 mulgcd โŠข ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„•0 โˆง ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„ค ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) gcd ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) = ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
94 92 28 29 93 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) gcd ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) = ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
95 91 94 breqtrd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
96 50 95 eqbrtrd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
97 dvdsmulcr โŠข ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค โˆง ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โ†” ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ) )
98 41 55 37 38 97 syl112anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โ†” ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ) )
99 96 98 mpbid โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) )
100 2 62 3 mulgdi โŠข ( ( ๐บ โˆˆ Abel โˆง ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆˆ โ„ค โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) )
101 58 88 60 61 100 syl13anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) )
102 2 1 62 68 oddvds โŠข ( ( ๐บ โˆˆ Grp โˆง ๐ด โˆˆ ๐‘‹ โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆˆ โ„ค ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ด ) = ( 0g โ€˜ ๐บ ) ) )
103 67 60 88 102 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ด ) = ( 0g โ€˜ ๐บ ) ) )
104 57 103 mpbid โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ด ) = ( 0g โ€˜ ๐บ ) )
105 104 oveq1d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ด ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) = ( ( 0g โ€˜ ๐บ ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) )
106 101 105 eqtrd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( ( 0g โ€˜ ๐บ ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) )
107 dvdsmul1 โŠข ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ๐ด ) โˆˆ โ„ค ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) )
108 55 28 107 syl2anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) )
109 2 1 62 68 oddvds โŠข ( ( ๐บ โˆˆ Grp โˆง ( ๐ด + ๐ต ) โˆˆ ๐‘‹ โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆˆ โ„ค ) โ†’ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( 0g โ€˜ ๐บ ) ) )
110 67 76 88 109 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( 0g โ€˜ ๐บ ) ) )
111 108 110 mpbid โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ( ๐ด + ๐ต ) ) = ( 0g โ€˜ ๐บ ) )
112 2 62 mulgcl โŠข ( ( ๐บ โˆˆ Grp โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆˆ โ„ค โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) โˆˆ ๐‘‹ )
113 67 88 61 112 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) โˆˆ ๐‘‹ )
114 2 3 68 grplid โŠข ( ( ๐บ โˆˆ Grp โˆง ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) โˆˆ ๐‘‹ ) โ†’ ( ( 0g โ€˜ ๐บ ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) = ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) )
115 67 113 114 syl2anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( 0g โ€˜ ๐บ ) + ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) ) = ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) )
116 106 111 115 3eqtr3rd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) = ( 0g โ€˜ ๐บ ) )
117 2 1 62 68 oddvds โŠข ( ( ๐บ โˆˆ Grp โˆง ๐ต โˆˆ ๐‘‹ โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆˆ โ„ค ) โ†’ ( ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) = ( 0g โ€˜ ๐บ ) ) )
118 67 61 88 117 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โ†” ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) ( .g โ€˜ ๐บ ) ๐ต ) = ( 0g โ€˜ ๐บ ) ) )
119 116 118 mpbird โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) )
120 dvdsgcd โŠข ( ( ( ๐‘‚ โ€˜ ๐ต ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆง ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) gcd ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) ) )
121 29 88 59 120 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) โˆง ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) gcd ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) ) )
122 119 66 121 mp2and โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ด ) ) gcd ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) ) )
123 122 94 breqtrd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ๐‘‚ โ€˜ ๐ต ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
124 52 123 eqbrtrd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
125 dvdsmulcr โŠข ( ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค โˆง ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โ†” ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ) )
126 46 55 37 38 125 syl112anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โ†” ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ) )
127 124 126 mpbid โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) )
128 41 46 gcdcld โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) โˆˆ โ„•0 )
129 128 nn0cnd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) โˆˆ โ„‚ )
130 1cnd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ 1 โˆˆ โ„‚ )
131 31 mullidd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( 1 ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) = ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) )
132 50 52 oveq12d โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) = ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) )
133 mulgcdr โŠข ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„•0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) = ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
134 41 46 30 133 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) = ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
135 131 132 134 3eqtr2rd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) = ( 1 ยท ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) )
136 129 130 31 38 135 mulcan2ad โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) = 1 )
137 coprmdvds2 โŠข ( ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค โˆง ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค ) โˆง ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) gcd ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) = 1 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆง ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ) )
138 41 46 55 136 137 syl31anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆง ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ) )
139 99 127 138 mp2and โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) )
140 41 46 zmulcld โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) โˆˆ โ„ค )
141 zsqcl โŠข ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โˆˆ โ„ค โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) โˆˆ โ„ค )
142 37 141 syl โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) โˆˆ โ„ค )
143 dvdsmulc โŠข ( ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) โˆˆ โ„ค โˆง ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โˆˆ โ„ค โˆง ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) โˆˆ โ„ค ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) ) )
144 140 55 142 143 syl3anc โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) โˆฅ ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) ) )
145 139 144 mpd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ( ( ๐‘‚ โ€˜ ๐ด ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ยท ( ( ๐‘‚ โ€˜ ๐ต ) / ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) )
146 54 145 eqbrtrrd โŠข ( ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โˆง ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ‰  0 ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) )
147 27 146 pm2.61dane โŠข ( ( ๐บ โˆˆ Abel โˆง ๐ด โˆˆ ๐‘‹ โˆง ๐ต โˆˆ ๐‘‹ ) โ†’ ( ( ๐‘‚ โ€˜ ๐ด ) ยท ( ๐‘‚ โ€˜ ๐ต ) ) โˆฅ ( ( ๐‘‚ โ€˜ ( ๐ด + ๐ต ) ) ยท ( ( ( ๐‘‚ โ€˜ ๐ด ) gcd ( ๐‘‚ โ€˜ ๐ต ) ) โ†‘ 2 ) ) )