Step |
Hyp |
Ref |
Expression |
1 |
|
mpodvdsmulf1o.1 |
|- ( ph -> M e. NN ) |
2 |
|
mpodvdsmulf1o.2 |
|- ( ph -> N e. NN ) |
3 |
|
mpodvdsmulf1o.3 |
|- ( ph -> ( M gcd N ) = 1 ) |
4 |
|
mpodvdsmulf1o.x |
|- X = { x e. NN | x || M } |
5 |
|
mpodvdsmulf1o.y |
|- Y = { x e. NN | x || N } |
6 |
|
mpodvdsmulf1o.z |
|- Z = { x e. NN | x || ( M x. N ) } |
7 |
|
mpomulf |
|- ( x e. CC , y e. CC |-> ( x x. y ) ) : ( CC X. CC ) --> CC |
8 |
|
ffn |
|- ( ( x e. CC , y e. CC |-> ( x x. y ) ) : ( CC X. CC ) --> CC -> ( x e. CC , y e. CC |-> ( x x. y ) ) Fn ( CC X. CC ) ) |
9 |
7 8
|
ax-mp |
|- ( x e. CC , y e. CC |-> ( x x. y ) ) Fn ( CC X. CC ) |
10 |
4
|
ssrab3 |
|- X C_ NN |
11 |
|
nnsscn |
|- NN C_ CC |
12 |
10 11
|
sstri |
|- X C_ CC |
13 |
5
|
ssrab3 |
|- Y C_ NN |
14 |
13 11
|
sstri |
|- Y C_ CC |
15 |
|
xpss12 |
|- ( ( X C_ CC /\ Y C_ CC ) -> ( X X. Y ) C_ ( CC X. CC ) ) |
16 |
12 14 15
|
mp2an |
|- ( X X. Y ) C_ ( CC X. CC ) |
17 |
|
fnssres |
|- ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) Fn ( CC X. CC ) /\ ( X X. Y ) C_ ( CC X. CC ) ) -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) Fn ( X X. Y ) ) |
18 |
9 16 17
|
mp2an |
|- ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) Fn ( X X. Y ) |
19 |
18
|
a1i |
|- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) Fn ( X X. Y ) ) |
20 |
|
ovres |
|- ( ( i e. X /\ j e. Y ) -> ( i ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) j ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) ) |
21 |
20
|
adantl |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) j ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) ) |
22 |
12
|
sseli |
|- ( i e. X -> i e. CC ) |
23 |
22
|
adantr |
|- ( ( i e. X /\ j e. Y ) -> i e. CC ) |
24 |
14
|
sseli |
|- ( j e. Y -> j e. CC ) |
25 |
24
|
adantl |
|- ( ( i e. X /\ j e. Y ) -> j e. CC ) |
26 |
|
ovmpot |
|- ( ( i e. CC /\ j e. CC ) -> ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( i x. j ) ) |
27 |
26
|
eqcomd |
|- ( ( i e. CC /\ j e. CC ) -> ( i x. j ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) ) |
28 |
23 25 27
|
syl2anc |
|- ( ( i e. X /\ j e. Y ) -> ( i x. j ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) ) |
29 |
28
|
adantl |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) ) |
30 |
10
|
sseli |
|- ( i e. X -> i e. NN ) |
31 |
30
|
ad2antrl |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> i e. NN ) |
32 |
13
|
sseli |
|- ( j e. Y -> j e. NN ) |
33 |
32
|
ad2antll |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> j e. NN ) |
34 |
31 33
|
nnmulcld |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) e. NN ) |
35 |
|
breq1 |
|- ( x = j -> ( x || N <-> j || N ) ) |
36 |
35 5
|
elrab2 |
|- ( j e. Y <-> ( j e. NN /\ j || N ) ) |
37 |
36
|
simprbi |
|- ( j e. Y -> j || N ) |
38 |
37
|
ad2antll |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> j || N ) |
39 |
|
breq1 |
|- ( x = i -> ( x || M <-> i || M ) ) |
40 |
39 4
|
elrab2 |
|- ( i e. X <-> ( i e. NN /\ i || M ) ) |
41 |
40
|
simprbi |
|- ( i e. X -> i || M ) |
42 |
41
|
ad2antrl |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> i || M ) |
43 |
33
|
nnzd |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> j e. ZZ ) |
44 |
2
|
adantr |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> N e. NN ) |
45 |
44
|
nnzd |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> N e. ZZ ) |
46 |
31
|
nnzd |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> i e. ZZ ) |
47 |
|
dvdscmul |
|- ( ( j e. ZZ /\ N e. ZZ /\ i e. ZZ ) -> ( j || N -> ( i x. j ) || ( i x. N ) ) ) |
48 |
43 45 46 47
|
syl3anc |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( j || N -> ( i x. j ) || ( i x. N ) ) ) |
49 |
1
|
adantr |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> M e. NN ) |
50 |
49
|
nnzd |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> M e. ZZ ) |
51 |
|
dvdsmulc |
|- ( ( i e. ZZ /\ M e. ZZ /\ N e. ZZ ) -> ( i || M -> ( i x. N ) || ( M x. N ) ) ) |
52 |
46 50 45 51
|
syl3anc |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i || M -> ( i x. N ) || ( M x. N ) ) ) |
53 |
34
|
nnzd |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) e. ZZ ) |
54 |
46 45
|
zmulcld |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. N ) e. ZZ ) |
55 |
50 45
|
zmulcld |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( M x. N ) e. ZZ ) |
56 |
|
dvdstr |
|- ( ( ( i x. j ) e. ZZ /\ ( i x. N ) e. ZZ /\ ( M x. N ) e. ZZ ) -> ( ( ( i x. j ) || ( i x. N ) /\ ( i x. N ) || ( M x. N ) ) -> ( i x. j ) || ( M x. N ) ) ) |
57 |
53 54 55 56
|
syl3anc |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( ( ( i x. j ) || ( i x. N ) /\ ( i x. N ) || ( M x. N ) ) -> ( i x. j ) || ( M x. N ) ) ) |
58 |
48 52 57
|
syl2and |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( ( j || N /\ i || M ) -> ( i x. j ) || ( M x. N ) ) ) |
59 |
38 42 58
|
mp2and |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) || ( M x. N ) ) |
60 |
|
breq1 |
|- ( x = ( i x. j ) -> ( x || ( M x. N ) <-> ( i x. j ) || ( M x. N ) ) ) |
61 |
60 6
|
elrab2 |
|- ( ( i x. j ) e. Z <-> ( ( i x. j ) e. NN /\ ( i x. j ) || ( M x. N ) ) ) |
62 |
34 59 61
|
sylanbrc |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) e. Z ) |
63 |
29 62
|
eqeltrrd |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) e. Z ) |
64 |
21 63
|
eqeltrd |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) j ) e. Z ) |
65 |
64
|
ralrimivva |
|- ( ph -> A. i e. X A. j e. Y ( i ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) j ) e. Z ) |
66 |
|
ffnov |
|- ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) --> Z <-> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) Fn ( X X. Y ) /\ A. i e. X A. j e. Y ( i ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) j ) e. Z ) ) |
67 |
19 65 66
|
sylanbrc |
|- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) --> Z ) |
68 |
23
|
ad2antlr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> i e. CC ) |
69 |
25
|
ad2antlr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> j e. CC ) |
70 |
68 69 26
|
syl2anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( i x. j ) ) |
71 |
12
|
sseli |
|- ( m e. X -> m e. CC ) |
72 |
71
|
ad2antrl |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> m e. CC ) |
73 |
14
|
sseli |
|- ( n e. Y -> n e. CC ) |
74 |
73
|
ad2antll |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> n e. CC ) |
75 |
|
ovmpot |
|- ( ( m e. CC /\ n e. CC ) -> ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) = ( m x. n ) ) |
76 |
72 74 75
|
syl2anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) = ( m x. n ) ) |
77 |
70 76
|
eqeq12d |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> ( ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) <-> ( i x. j ) = ( m x. n ) ) ) |
78 |
31
|
adantr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i e. NN ) |
79 |
78
|
nnnn0d |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i e. NN0 ) |
80 |
|
simprll |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. X ) |
81 |
10 80
|
sselid |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. NN ) |
82 |
81
|
nnnn0d |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. NN0 ) |
83 |
78
|
nnzd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i e. ZZ ) |
84 |
33
|
adantr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j e. NN ) |
85 |
84
|
nnzd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j e. ZZ ) |
86 |
|
dvdsmul1 |
|- ( ( i e. ZZ /\ j e. ZZ ) -> i || ( i x. j ) ) |
87 |
83 85 86
|
syl2anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i || ( i x. j ) ) |
88 |
|
simprr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i x. j ) = ( m x. n ) ) |
89 |
12 80
|
sselid |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. CC ) |
90 |
|
simprlr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n e. Y ) |
91 |
14 90
|
sselid |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n e. CC ) |
92 |
89 91
|
mulcomd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( m x. n ) = ( n x. m ) ) |
93 |
88 92
|
eqtrd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i x. j ) = ( n x. m ) ) |
94 |
87 93
|
breqtrd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i || ( n x. m ) ) |
95 |
13 90
|
sselid |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n e. NN ) |
96 |
95
|
nnzd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n e. ZZ ) |
97 |
45
|
adantr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> N e. ZZ ) |
98 |
83 97
|
gcdcomd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i gcd N ) = ( N gcd i ) ) |
99 |
50
|
adantr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> M e. ZZ ) |
100 |
2
|
nnzd |
|- ( ph -> N e. ZZ ) |
101 |
1
|
nnzd |
|- ( ph -> M e. ZZ ) |
102 |
100 101
|
gcdcomd |
|- ( ph -> ( N gcd M ) = ( M gcd N ) ) |
103 |
102 3
|
eqtrd |
|- ( ph -> ( N gcd M ) = 1 ) |
104 |
103
|
ad2antrr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( N gcd M ) = 1 ) |
105 |
42
|
adantr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i || M ) |
106 |
|
rpdvds |
|- ( ( ( N e. ZZ /\ i e. ZZ /\ M e. ZZ ) /\ ( ( N gcd M ) = 1 /\ i || M ) ) -> ( N gcd i ) = 1 ) |
107 |
97 83 99 104 105 106
|
syl32anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( N gcd i ) = 1 ) |
108 |
98 107
|
eqtrd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i gcd N ) = 1 ) |
109 |
|
breq1 |
|- ( x = n -> ( x || N <-> n || N ) ) |
110 |
109 5
|
elrab2 |
|- ( n e. Y <-> ( n e. NN /\ n || N ) ) |
111 |
110
|
simprbi |
|- ( n e. Y -> n || N ) |
112 |
90 111
|
syl |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n || N ) |
113 |
|
rpdvds |
|- ( ( ( i e. ZZ /\ n e. ZZ /\ N e. ZZ ) /\ ( ( i gcd N ) = 1 /\ n || N ) ) -> ( i gcd n ) = 1 ) |
114 |
83 96 97 108 112 113
|
syl32anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i gcd n ) = 1 ) |
115 |
81
|
nnzd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. ZZ ) |
116 |
|
coprmdvds |
|- ( ( i e. ZZ /\ n e. ZZ /\ m e. ZZ ) -> ( ( i || ( n x. m ) /\ ( i gcd n ) = 1 ) -> i || m ) ) |
117 |
83 96 115 116
|
syl3anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( ( i || ( n x. m ) /\ ( i gcd n ) = 1 ) -> i || m ) ) |
118 |
94 114 117
|
mp2and |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i || m ) |
119 |
|
dvdsmul1 |
|- ( ( m e. ZZ /\ n e. ZZ ) -> m || ( m x. n ) ) |
120 |
115 96 119
|
syl2anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m || ( m x. n ) ) |
121 |
78
|
nncnd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i e. CC ) |
122 |
84
|
nncnd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j e. CC ) |
123 |
121 122
|
mulcomd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i x. j ) = ( j x. i ) ) |
124 |
88 123
|
eqtr3d |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( m x. n ) = ( j x. i ) ) |
125 |
120 124
|
breqtrd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m || ( j x. i ) ) |
126 |
115 97
|
gcdcomd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( m gcd N ) = ( N gcd m ) ) |
127 |
|
breq1 |
|- ( x = m -> ( x || M <-> m || M ) ) |
128 |
127 4
|
elrab2 |
|- ( m e. X <-> ( m e. NN /\ m || M ) ) |
129 |
128
|
simprbi |
|- ( m e. X -> m || M ) |
130 |
80 129
|
syl |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m || M ) |
131 |
|
rpdvds |
|- ( ( ( N e. ZZ /\ m e. ZZ /\ M e. ZZ ) /\ ( ( N gcd M ) = 1 /\ m || M ) ) -> ( N gcd m ) = 1 ) |
132 |
97 115 99 104 130 131
|
syl32anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( N gcd m ) = 1 ) |
133 |
126 132
|
eqtrd |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( m gcd N ) = 1 ) |
134 |
38
|
adantr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j || N ) |
135 |
|
rpdvds |
|- ( ( ( m e. ZZ /\ j e. ZZ /\ N e. ZZ ) /\ ( ( m gcd N ) = 1 /\ j || N ) ) -> ( m gcd j ) = 1 ) |
136 |
115 85 97 133 134 135
|
syl32anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( m gcd j ) = 1 ) |
137 |
|
coprmdvds |
|- ( ( m e. ZZ /\ j e. ZZ /\ i e. ZZ ) -> ( ( m || ( j x. i ) /\ ( m gcd j ) = 1 ) -> m || i ) ) |
138 |
115 85 83 137
|
syl3anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( ( m || ( j x. i ) /\ ( m gcd j ) = 1 ) -> m || i ) ) |
139 |
125 136 138
|
mp2and |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m || i ) |
140 |
|
dvdseq |
|- ( ( ( i e. NN0 /\ m e. NN0 ) /\ ( i || m /\ m || i ) ) -> i = m ) |
141 |
79 82 118 139 140
|
syl22anc |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i = m ) |
142 |
78
|
nnne0d |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i =/= 0 ) |
143 |
141
|
oveq1d |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i x. n ) = ( m x. n ) ) |
144 |
88 143
|
eqtr4d |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i x. j ) = ( i x. n ) ) |
145 |
122 91 121 142 144
|
mulcanad |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j = n ) |
146 |
141 145
|
opeq12d |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> <. i , j >. = <. m , n >. ) |
147 |
146
|
expr |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> ( ( i x. j ) = ( m x. n ) -> <. i , j >. = <. m , n >. ) ) |
148 |
77 147
|
sylbid |
|- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> ( ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> <. i , j >. = <. m , n >. ) ) |
149 |
148
|
ralrimivva |
|- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> A. m e. X A. n e. Y ( ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> <. i , j >. = <. m , n >. ) ) |
150 |
149
|
ralrimivva |
|- ( ph -> A. i e. X A. j e. Y A. m e. X A. n e. Y ( ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> <. i , j >. = <. m , n >. ) ) |
151 |
|
fvres |
|- ( u e. ( X X. Y ) -> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) ) |
152 |
|
fvres |
|- ( v e. ( X X. Y ) -> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` v ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) ) |
153 |
151 152
|
eqeqan12d |
|- ( ( u e. ( X X. Y ) /\ v e. ( X X. Y ) ) -> ( ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` v ) <-> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) ) ) |
154 |
153
|
imbi1d |
|- ( ( u e. ( X X. Y ) /\ v e. ( X X. Y ) ) -> ( ( ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` v ) -> u = v ) <-> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) -> u = v ) ) ) |
155 |
154
|
ralbidva |
|- ( u e. ( X X. Y ) -> ( A. v e. ( X X. Y ) ( ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` v ) -> u = v ) <-> A. v e. ( X X. Y ) ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) -> u = v ) ) ) |
156 |
155
|
ralbiia |
|- ( A. u e. ( X X. Y ) A. v e. ( X X. Y ) ( ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` v ) -> u = v ) <-> A. u e. ( X X. Y ) A. v e. ( X X. Y ) ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) -> u = v ) ) |
157 |
|
fveq2 |
|- ( v = <. m , n >. -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. m , n >. ) ) |
158 |
|
df-ov |
|- ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. m , n >. ) |
159 |
157 158
|
eqtr4di |
|- ( v = <. m , n >. -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) ) |
160 |
159
|
eqeq2d |
|- ( v = <. m , n >. -> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) <-> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) ) ) |
161 |
|
eqeq2 |
|- ( v = <. m , n >. -> ( u = v <-> u = <. m , n >. ) ) |
162 |
160 161
|
imbi12d |
|- ( v = <. m , n >. -> ( ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) -> u = v ) <-> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> u = <. m , n >. ) ) ) |
163 |
162
|
ralxp |
|- ( A. v e. ( X X. Y ) ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) -> u = v ) <-> A. m e. X A. n e. Y ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> u = <. m , n >. ) ) |
164 |
|
fveq2 |
|- ( u = <. i , j >. -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. i , j >. ) ) |
165 |
|
df-ov |
|- ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. i , j >. ) |
166 |
164 165
|
eqtr4di |
|- ( u = <. i , j >. -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) ) |
167 |
166
|
eqeq1d |
|- ( u = <. i , j >. -> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) <-> ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) ) ) |
168 |
|
eqeq1 |
|- ( u = <. i , j >. -> ( u = <. m , n >. <-> <. i , j >. = <. m , n >. ) ) |
169 |
167 168
|
imbi12d |
|- ( u = <. i , j >. -> ( ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> u = <. m , n >. ) <-> ( ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> <. i , j >. = <. m , n >. ) ) ) |
170 |
169
|
2ralbidv |
|- ( u = <. i , j >. -> ( A. m e. X A. n e. Y ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> u = <. m , n >. ) <-> A. m e. X A. n e. Y ( ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> <. i , j >. = <. m , n >. ) ) ) |
171 |
163 170
|
bitrid |
|- ( u = <. i , j >. -> ( A. v e. ( X X. Y ) ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) -> u = v ) <-> A. m e. X A. n e. Y ( ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> <. i , j >. = <. m , n >. ) ) ) |
172 |
171
|
ralxp |
|- ( A. u e. ( X X. Y ) A. v e. ( X X. Y ) ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) -> u = v ) <-> A. i e. X A. j e. Y A. m e. X A. n e. Y ( ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> <. i , j >. = <. m , n >. ) ) |
173 |
156 172
|
bitri |
|- ( A. u e. ( X X. Y ) A. v e. ( X X. Y ) ( ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` v ) -> u = v ) <-> A. i e. X A. j e. Y A. m e. X A. n e. Y ( ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) -> <. i , j >. = <. m , n >. ) ) |
174 |
150 173
|
sylibr |
|- ( ph -> A. u e. ( X X. Y ) A. v e. ( X X. Y ) ( ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` v ) -> u = v ) ) |
175 |
|
dff13 |
|- ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -1-1-> Z <-> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) --> Z /\ A. u e. ( X X. Y ) A. v e. ( X X. Y ) ( ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` v ) -> u = v ) ) ) |
176 |
67 174 175
|
sylanbrc |
|- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -1-1-> Z ) |
177 |
|
breq1 |
|- ( x = w -> ( x || ( M x. N ) <-> w || ( M x. N ) ) ) |
178 |
177 6
|
elrab2 |
|- ( w e. Z <-> ( w e. NN /\ w || ( M x. N ) ) ) |
179 |
178
|
simplbi |
|- ( w e. Z -> w e. NN ) |
180 |
179
|
adantl |
|- ( ( ph /\ w e. Z ) -> w e. NN ) |
181 |
180
|
nnzd |
|- ( ( ph /\ w e. Z ) -> w e. ZZ ) |
182 |
1
|
adantr |
|- ( ( ph /\ w e. Z ) -> M e. NN ) |
183 |
182
|
nnzd |
|- ( ( ph /\ w e. Z ) -> M e. ZZ ) |
184 |
182
|
nnne0d |
|- ( ( ph /\ w e. Z ) -> M =/= 0 ) |
185 |
|
simpr |
|- ( ( w = 0 /\ M = 0 ) -> M = 0 ) |
186 |
185
|
necon3ai |
|- ( M =/= 0 -> -. ( w = 0 /\ M = 0 ) ) |
187 |
184 186
|
syl |
|- ( ( ph /\ w e. Z ) -> -. ( w = 0 /\ M = 0 ) ) |
188 |
|
gcdn0cl |
|- ( ( ( w e. ZZ /\ M e. ZZ ) /\ -. ( w = 0 /\ M = 0 ) ) -> ( w gcd M ) e. NN ) |
189 |
181 183 187 188
|
syl21anc |
|- ( ( ph /\ w e. Z ) -> ( w gcd M ) e. NN ) |
190 |
|
gcddvds |
|- ( ( w e. ZZ /\ M e. ZZ ) -> ( ( w gcd M ) || w /\ ( w gcd M ) || M ) ) |
191 |
181 183 190
|
syl2anc |
|- ( ( ph /\ w e. Z ) -> ( ( w gcd M ) || w /\ ( w gcd M ) || M ) ) |
192 |
191
|
simprd |
|- ( ( ph /\ w e. Z ) -> ( w gcd M ) || M ) |
193 |
|
breq1 |
|- ( x = ( w gcd M ) -> ( x || M <-> ( w gcd M ) || M ) ) |
194 |
193 4
|
elrab2 |
|- ( ( w gcd M ) e. X <-> ( ( w gcd M ) e. NN /\ ( w gcd M ) || M ) ) |
195 |
189 192 194
|
sylanbrc |
|- ( ( ph /\ w e. Z ) -> ( w gcd M ) e. X ) |
196 |
2
|
adantr |
|- ( ( ph /\ w e. Z ) -> N e. NN ) |
197 |
196
|
nnzd |
|- ( ( ph /\ w e. Z ) -> N e. ZZ ) |
198 |
196
|
nnne0d |
|- ( ( ph /\ w e. Z ) -> N =/= 0 ) |
199 |
|
simpr |
|- ( ( w = 0 /\ N = 0 ) -> N = 0 ) |
200 |
199
|
necon3ai |
|- ( N =/= 0 -> -. ( w = 0 /\ N = 0 ) ) |
201 |
198 200
|
syl |
|- ( ( ph /\ w e. Z ) -> -. ( w = 0 /\ N = 0 ) ) |
202 |
|
gcdn0cl |
|- ( ( ( w e. ZZ /\ N e. ZZ ) /\ -. ( w = 0 /\ N = 0 ) ) -> ( w gcd N ) e. NN ) |
203 |
181 197 201 202
|
syl21anc |
|- ( ( ph /\ w e. Z ) -> ( w gcd N ) e. NN ) |
204 |
|
gcddvds |
|- ( ( w e. ZZ /\ N e. ZZ ) -> ( ( w gcd N ) || w /\ ( w gcd N ) || N ) ) |
205 |
181 197 204
|
syl2anc |
|- ( ( ph /\ w e. Z ) -> ( ( w gcd N ) || w /\ ( w gcd N ) || N ) ) |
206 |
205
|
simprd |
|- ( ( ph /\ w e. Z ) -> ( w gcd N ) || N ) |
207 |
|
breq1 |
|- ( x = ( w gcd N ) -> ( x || N <-> ( w gcd N ) || N ) ) |
208 |
207 5
|
elrab2 |
|- ( ( w gcd N ) e. Y <-> ( ( w gcd N ) e. NN /\ ( w gcd N ) || N ) ) |
209 |
203 206 208
|
sylanbrc |
|- ( ( ph /\ w e. Z ) -> ( w gcd N ) e. Y ) |
210 |
195 209
|
opelxpd |
|- ( ( ph /\ w e. Z ) -> <. ( w gcd M ) , ( w gcd N ) >. e. ( X X. Y ) ) |
211 |
210
|
fvresd |
|- ( ( ph /\ w e. Z ) -> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` <. ( w gcd M ) , ( w gcd N ) >. ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. ( w gcd M ) , ( w gcd N ) >. ) ) |
212 |
|
df-ov |
|- ( ( w gcd M ) ( x e. CC , y e. CC |-> ( x x. y ) ) ( w gcd N ) ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. ( w gcd M ) , ( w gcd N ) >. ) |
213 |
189
|
nncnd |
|- ( ( ph /\ w e. Z ) -> ( w gcd M ) e. CC ) |
214 |
203
|
nncnd |
|- ( ( ph /\ w e. Z ) -> ( w gcd N ) e. CC ) |
215 |
|
ovmpot |
|- ( ( ( w gcd M ) e. CC /\ ( w gcd N ) e. CC ) -> ( ( w gcd M ) ( x e. CC , y e. CC |-> ( x x. y ) ) ( w gcd N ) ) = ( ( w gcd M ) x. ( w gcd N ) ) ) |
216 |
213 214 215
|
syl2anc |
|- ( ( ph /\ w e. Z ) -> ( ( w gcd M ) ( x e. CC , y e. CC |-> ( x x. y ) ) ( w gcd N ) ) = ( ( w gcd M ) x. ( w gcd N ) ) ) |
217 |
212 216
|
eqtr3id |
|- ( ( ph /\ w e. Z ) -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. ( w gcd M ) , ( w gcd N ) >. ) = ( ( w gcd M ) x. ( w gcd N ) ) ) |
218 |
|
df-ov |
|- ( ( w gcd M ) x. ( w gcd N ) ) = ( x. ` <. ( w gcd M ) , ( w gcd N ) >. ) |
219 |
218
|
a1i |
|- ( ( ph /\ w e. Z ) -> ( ( w gcd M ) x. ( w gcd N ) ) = ( x. ` <. ( w gcd M ) , ( w gcd N ) >. ) ) |
220 |
211 217 219
|
3eqtrd |
|- ( ( ph /\ w e. Z ) -> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` <. ( w gcd M ) , ( w gcd N ) >. ) = ( x. ` <. ( w gcd M ) , ( w gcd N ) >. ) ) |
221 |
3
|
adantr |
|- ( ( ph /\ w e. Z ) -> ( M gcd N ) = 1 ) |
222 |
|
rpmulgcd2 |
|- ( ( ( w e. ZZ /\ M e. ZZ /\ N e. ZZ ) /\ ( M gcd N ) = 1 ) -> ( w gcd ( M x. N ) ) = ( ( w gcd M ) x. ( w gcd N ) ) ) |
223 |
181 183 197 221 222
|
syl31anc |
|- ( ( ph /\ w e. Z ) -> ( w gcd ( M x. N ) ) = ( ( w gcd M ) x. ( w gcd N ) ) ) |
224 |
223 218
|
eqtrdi |
|- ( ( ph /\ w e. Z ) -> ( w gcd ( M x. N ) ) = ( x. ` <. ( w gcd M ) , ( w gcd N ) >. ) ) |
225 |
178
|
simprbi |
|- ( w e. Z -> w || ( M x. N ) ) |
226 |
225
|
adantl |
|- ( ( ph /\ w e. Z ) -> w || ( M x. N ) ) |
227 |
1 2
|
nnmulcld |
|- ( ph -> ( M x. N ) e. NN ) |
228 |
|
gcdeq |
|- ( ( w e. NN /\ ( M x. N ) e. NN ) -> ( ( w gcd ( M x. N ) ) = w <-> w || ( M x. N ) ) ) |
229 |
179 227 228
|
syl2anr |
|- ( ( ph /\ w e. Z ) -> ( ( w gcd ( M x. N ) ) = w <-> w || ( M x. N ) ) ) |
230 |
226 229
|
mpbird |
|- ( ( ph /\ w e. Z ) -> ( w gcd ( M x. N ) ) = w ) |
231 |
220 224 230
|
3eqtr2rd |
|- ( ( ph /\ w e. Z ) -> w = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` <. ( w gcd M ) , ( w gcd N ) >. ) ) |
232 |
|
fveq2 |
|- ( u = <. ( w gcd M ) , ( w gcd N ) >. -> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` <. ( w gcd M ) , ( w gcd N ) >. ) ) |
233 |
232
|
rspceeqv |
|- ( ( <. ( w gcd M ) , ( w gcd N ) >. e. ( X X. Y ) /\ w = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` <. ( w gcd M ) , ( w gcd N ) >. ) ) -> E. u e. ( X X. Y ) w = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) ) |
234 |
210 231 233
|
syl2anc |
|- ( ( ph /\ w e. Z ) -> E. u e. ( X X. Y ) w = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) ) |
235 |
234
|
ralrimiva |
|- ( ph -> A. w e. Z E. u e. ( X X. Y ) w = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) ) |
236 |
|
dffo3 |
|- ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -onto-> Z <-> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) --> Z /\ A. w e. Z E. u e. ( X X. Y ) w = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) ) ) |
237 |
67 235 236
|
sylanbrc |
|- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -onto-> Z ) |
238 |
|
df-f1o |
|- ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -1-1-onto-> Z <-> ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -1-1-> Z /\ ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -onto-> Z ) ) |
239 |
176 237 238
|
sylanbrc |
|- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -1-1-onto-> Z ) |