Step |
Hyp |
Ref |
Expression |
1 |
|
mulgcd |
โข ( ( ๐ถ โ โ0 โง ๐ด โ โค โง ๐ต โ โค ) โ ( ( ๐ถ ยท ๐ด ) gcd ( ๐ถ ยท ๐ต ) ) = ( ๐ถ ยท ( ๐ด gcd ๐ต ) ) ) |
2 |
1
|
3coml |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ( ( ๐ถ ยท ๐ด ) gcd ( ๐ถ ยท ๐ต ) ) = ( ๐ถ ยท ( ๐ด gcd ๐ต ) ) ) |
3 |
|
zcn |
โข ( ๐ด โ โค โ ๐ด โ โ ) |
4 |
3
|
3ad2ant1 |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ๐ด โ โ ) |
5 |
|
nn0cn |
โข ( ๐ถ โ โ0 โ ๐ถ โ โ ) |
6 |
5
|
3ad2ant3 |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ๐ถ โ โ ) |
7 |
4 6
|
mulcomd |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ( ๐ด ยท ๐ถ ) = ( ๐ถ ยท ๐ด ) ) |
8 |
|
zcn |
โข ( ๐ต โ โค โ ๐ต โ โ ) |
9 |
8
|
3ad2ant2 |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ๐ต โ โ ) |
10 |
9 6
|
mulcomd |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ( ๐ต ยท ๐ถ ) = ( ๐ถ ยท ๐ต ) ) |
11 |
7 10
|
oveq12d |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ( ( ๐ด ยท ๐ถ ) gcd ( ๐ต ยท ๐ถ ) ) = ( ( ๐ถ ยท ๐ด ) gcd ( ๐ถ ยท ๐ต ) ) ) |
12 |
|
gcdcl |
โข ( ( ๐ด โ โค โง ๐ต โ โค ) โ ( ๐ด gcd ๐ต ) โ โ0 ) |
13 |
12
|
3adant3 |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ( ๐ด gcd ๐ต ) โ โ0 ) |
14 |
13
|
nn0cnd |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ( ๐ด gcd ๐ต ) โ โ ) |
15 |
14 6
|
mulcomd |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ( ( ๐ด gcd ๐ต ) ยท ๐ถ ) = ( ๐ถ ยท ( ๐ด gcd ๐ต ) ) ) |
16 |
2 11 15
|
3eqtr4d |
โข ( ( ๐ด โ โค โง ๐ต โ โค โง ๐ถ โ โ0 ) โ ( ( ๐ด ยท ๐ถ ) gcd ( ๐ต ยท ๐ถ ) ) = ( ( ๐ด gcd ๐ต ) ยท ๐ถ ) ) |