Step | Hyp | Ref
| Expression |
1 | | simpl 483 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β π΄ β
β€) |
2 | | nnz 12575 |
. . . . 5
β’ (π΅ β β β π΅ β
β€) |
3 | 2 | adantl 482 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β π΅ β
β€) |
4 | | nnne0 12242 |
. . . . . . . 8
β’ (π΅ β β β π΅ β 0) |
5 | 4 | neneqd 2945 |
. . . . . . 7
β’ (π΅ β β β Β¬
π΅ = 0) |
6 | 5 | adantl 482 |
. . . . . 6
β’ ((π΄ β β€ β§ π΅ β β) β Β¬
π΅ = 0) |
7 | 6 | intnand 489 |
. . . . 5
β’ ((π΄ β β€ β§ π΅ β β) β Β¬
(π΄ = 0 β§ π΅ = 0)) |
8 | | gcdn0cl 16439 |
. . . . 5
β’ (((π΄ β β€ β§ π΅ β β€) β§ Β¬
(π΄ = 0 β§ π΅ = 0)) β (π΄ gcd π΅) β β) |
9 | 1, 3, 7, 8 | syl21anc 836 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β (π΄ gcd π΅) β β) |
10 | | gcddvds 16440 |
. . . . 5
β’ ((π΄ β β€ β§ π΅ β β€) β ((π΄ gcd π΅) β₯ π΄ β§ (π΄ gcd π΅) β₯ π΅)) |
11 | 2, 10 | sylan2 593 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β ((π΄ gcd π΅) β₯ π΄ β§ (π΄ gcd π΅) β₯ π΅)) |
12 | | gcddiv 16489 |
. . . 4
β’ (((π΄ β β€ β§ π΅ β β€ β§ (π΄ gcd π΅) β β) β§ ((π΄ gcd π΅) β₯ π΄ β§ (π΄ gcd π΅) β₯ π΅)) β ((π΄ gcd π΅) / (π΄ gcd π΅)) = ((π΄ / (π΄ gcd π΅)) gcd (π΅ / (π΄ gcd π΅)))) |
13 | 1, 3, 9, 11, 12 | syl31anc 1373 |
. . 3
β’ ((π΄ β β€ β§ π΅ β β) β ((π΄ gcd π΅) / (π΄ gcd π΅)) = ((π΄ / (π΄ gcd π΅)) gcd (π΅ / (π΄ gcd π΅)))) |
14 | 9 | nncnd 12224 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β (π΄ gcd π΅) β β) |
15 | 9 | nnne0d 12258 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β (π΄ gcd π΅) β 0) |
16 | 14, 15 | dividd 11984 |
. . 3
β’ ((π΄ β β€ β§ π΅ β β) β ((π΄ gcd π΅) / (π΄ gcd π΅)) = 1) |
17 | 13, 16 | eqtr3d 2774 |
. 2
β’ ((π΄ β β€ β§ π΅ β β) β ((π΄ / (π΄ gcd π΅)) gcd (π΅ / (π΄ gcd π΅))) = 1) |
18 | | zcn 12559 |
. . . 4
β’ (π΄ β β€ β π΄ β
β) |
19 | 18 | adantr 481 |
. . 3
β’ ((π΄ β β€ β§ π΅ β β) β π΄ β
β) |
20 | | nncn 12216 |
. . . 4
β’ (π΅ β β β π΅ β
β) |
21 | 20 | adantl 482 |
. . 3
β’ ((π΄ β β€ β§ π΅ β β) β π΅ β
β) |
22 | 4 | adantl 482 |
. . 3
β’ ((π΄ β β€ β§ π΅ β β) β π΅ β 0) |
23 | | divcan7 11919 |
. . . 4
β’ ((π΄ β β β§ (π΅ β β β§ π΅ β 0) β§ ((π΄ gcd π΅) β β β§ (π΄ gcd π΅) β 0)) β ((π΄ / (π΄ gcd π΅)) / (π΅ / (π΄ gcd π΅))) = (π΄ / π΅)) |
24 | 23 | eqcomd 2738 |
. . 3
β’ ((π΄ β β β§ (π΅ β β β§ π΅ β 0) β§ ((π΄ gcd π΅) β β β§ (π΄ gcd π΅) β 0)) β (π΄ / π΅) = ((π΄ / (π΄ gcd π΅)) / (π΅ / (π΄ gcd π΅)))) |
25 | 19, 21, 22, 14, 15, 24 | syl122anc 1379 |
. 2
β’ ((π΄ β β€ β§ π΅ β β) β (π΄ / π΅) = ((π΄ / (π΄ gcd π΅)) / (π΅ / (π΄ gcd π΅)))) |
26 | | znq 12932 |
. . 3
β’ ((π΄ β β€ β§ π΅ β β) β (π΄ / π΅) β β) |
27 | 11 | simpld 495 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β (π΄ gcd π΅) β₯ π΄) |
28 | | gcdcl 16443 |
. . . . . . 7
β’ ((π΄ β β€ β§ π΅ β β€) β (π΄ gcd π΅) β
β0) |
29 | 28 | nn0zd 12580 |
. . . . . 6
β’ ((π΄ β β€ β§ π΅ β β€) β (π΄ gcd π΅) β β€) |
30 | 2, 29 | sylan2 593 |
. . . . 5
β’ ((π΄ β β€ β§ π΅ β β) β (π΄ gcd π΅) β β€) |
31 | | dvdsval2 16196 |
. . . . 5
β’ (((π΄ gcd π΅) β β€ β§ (π΄ gcd π΅) β 0 β§ π΄ β β€) β ((π΄ gcd π΅) β₯ π΄ β (π΄ / (π΄ gcd π΅)) β β€)) |
32 | 30, 15, 1, 31 | syl3anc 1371 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β ((π΄ gcd π΅) β₯ π΄ β (π΄ / (π΄ gcd π΅)) β β€)) |
33 | 27, 32 | mpbid 231 |
. . 3
β’ ((π΄ β β€ β§ π΅ β β) β (π΄ / (π΄ gcd π΅)) β β€) |
34 | 11 | simprd 496 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β (π΄ gcd π΅) β₯ π΅) |
35 | | simpr 485 |
. . . . 5
β’ ((π΄ β β€ β§ π΅ β β) β π΅ β
β) |
36 | | nndivdvds 16202 |
. . . . 5
β’ ((π΅ β β β§ (π΄ gcd π΅) β β) β ((π΄ gcd π΅) β₯ π΅ β (π΅ / (π΄ gcd π΅)) β β)) |
37 | 35, 9, 36 | syl2anc 584 |
. . . 4
β’ ((π΄ β β€ β§ π΅ β β) β ((π΄ gcd π΅) β₯ π΅ β (π΅ / (π΄ gcd π΅)) β β)) |
38 | 34, 37 | mpbid 231 |
. . 3
β’ ((π΄ β β€ β§ π΅ β β) β (π΅ / (π΄ gcd π΅)) β β) |
39 | | qnumdenbi 16676 |
. . 3
β’ (((π΄ / π΅) β β β§ (π΄ / (π΄ gcd π΅)) β β€ β§ (π΅ / (π΄ gcd π΅)) β β) β ((((π΄ / (π΄ gcd π΅)) gcd (π΅ / (π΄ gcd π΅))) = 1 β§ (π΄ / π΅) = ((π΄ / (π΄ gcd π΅)) / (π΅ / (π΄ gcd π΅)))) β ((numerβ(π΄ / π΅)) = (π΄ / (π΄ gcd π΅)) β§ (denomβ(π΄ / π΅)) = (π΅ / (π΄ gcd π΅))))) |
40 | 26, 33, 38, 39 | syl3anc 1371 |
. 2
β’ ((π΄ β β€ β§ π΅ β β) β
((((π΄ / (π΄ gcd π΅)) gcd (π΅ / (π΄ gcd π΅))) = 1 β§ (π΄ / π΅) = ((π΄ / (π΄ gcd π΅)) / (π΅ / (π΄ gcd π΅)))) β ((numerβ(π΄ / π΅)) = (π΄ / (π΄ gcd π΅)) β§ (denomβ(π΄ / π΅)) = (π΅ / (π΄ gcd π΅))))) |
41 | 17, 25, 40 | mpbi2and 710 |
1
β’ ((π΄ β β€ β§ π΅ β β) β
((numerβ(π΄ / π΅)) = (π΄ / (π΄ gcd π΅)) β§ (denomβ(π΄ / π΅)) = (π΅ / (π΄ gcd π΅)))) |