Theorem mpodvdsmulf1o 15658

Description: If M and N are two coprime integers, multiplication forms a bijection from the set of pairs <. j , k >. where j || M and k || N, to the set of divisors of M x. N. (Contributed by GG, 18-Apr-2025.)

Hypotheses

Ref	Expression
mpodvdsmulf1o.1	|- ( ph -> M e. NN )
mpodvdsmulf1o.2	|- ( ph -> N e. NN )
mpodvdsmulf1o.3	|- ( ph -> ( M gcd N ) = 1 )
mpodvdsmulf1o.x	|- X = { x e. NN | x || M }
mpodvdsmulf1o.y	|- Y = { x e. NN | x || N }
mpodvdsmulf1o.z	|- Z = { x e. NN | x || ( M x. N ) }

Assertion

Ref	Expression
mpodvdsmulf1o	|- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -1-1-onto-> Z )

Distinct variable groups:   x, y, M   x, N, y

Allowed substitution hints:   ph( x, y)   X( x, y)   Y( x, y)   Z( x, y)

Proof of Theorem mpodvdsmulf1o

Dummy variables w u v i j n m are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		mpomulf 8132	. . . . . . 7 |- ( x e. CC , y e. CC |-> ( x x. y ) ) : ( CC X. CC ) --> CC
2		ffn 5472	. . . . . . 7 |- ( ( 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 ) )
3	1, 2	ax-mp 5	. . . . . 6 |- ( x e. CC , y e. CC |-> ( x x. y ) ) Fn ( CC X. CC )
4		mpodvdsmulf1o.x	. . . . . . . . 9 |- X = { x e. NN | x || M }
5	4	ssrab3 3310	. . . . . . . 8 |- X C_ NN
6		nnsscn 9111	. . . . . . . 8 |- NN C_ CC
7	5, 6	sstri 3233	. . . . . . 7 |- X C_ CC
8		mpodvdsmulf1o.y	. . . . . . . . 9 |- Y = { x e. NN | x || N }
9	8	ssrab3 3310	. . . . . . . 8 |- Y C_ NN
10	9, 6	sstri 3233	. . . . . . 7 |- Y C_ CC
11		xpss12 4825	. . . . . . 7 |- ( ( X C_ CC /\ Y C_ CC ) -> ( X X. Y ) C_ ( CC X. CC ) )
12	7, 10, 11	mp2an 426	. . . . . 6 |- ( X X. Y ) C_ ( CC X. CC )
13		fnssres 5435	. . . . . 6 |- ( ( ( 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 ) )
14	3, 12, 13	mp2an 426	. . . . 5 |- ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) Fn ( X X. Y )
15	14	a1i 9	. . . 4 |- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) Fn ( X X. Y ) )
16		ovres 6144	. . . . . . 7 |- ( ( 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 ) )
17	16	adantl 277	. . . . . 6 |- ( ( 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 ) )
18	7	sseli 3220	. . . . . . . . . 10 |- ( i e. X -> i e. CC )
19	18	adantr 276	. . . . . . . . 9 |- ( ( i e. X /\ j e. Y ) -> i e. CC )
20	10	sseli 3220	. . . . . . . . . 10 |- ( j e. Y -> j e. CC )
21	20	adantl 277	. . . . . . . . 9 |- ( ( i e. X /\ j e. Y ) -> j e. CC )
22	19, 21	mulcld 8163	. . . . . . . . 9 |- ( ( i e. X /\ j e. Y ) -> ( i x. j ) e. CC )
23		oveq1 6007	. . . . . . . . . . 11 |- ( x = i -> ( x x. y ) = ( i x. y ) )
24		oveq2 6008	. . . . . . . . . . 11 |- ( y = j -> ( i x. y ) = ( i x. j ) )
25		eqid 2229	. . . . . . . . . . 11 |- ( x e. CC , y e. CC |-> ( x x. y ) ) = ( x e. CC , y e. CC |-> ( x x. y ) )
26	23, 24, 25	ovmpog 6138	. . . . . . . . . 10 |- ( ( i e. CC /\ j e. CC /\ ( i x. j ) e. CC ) -> ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( i x. j ) )
27	26	eqcomd 2235	. . . . . . . . 9 |- ( ( i e. CC /\ j e. CC /\ ( i x. j ) e. CC ) -> ( i x. j ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) )
28	19, 21, 22, 27	syl3anc 1271	. . . . . . . 8 |- ( ( i e. X /\ j e. Y ) -> ( i x. j ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) )
29	28	adantl 277	. . . . . . 7 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) )
30	5	sseli 3220	. . . . . . . . . 10 |- ( i e. X -> i e. NN )
31	30	ad2antrl 490	. . . . . . . . 9 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> i e. NN )
32	9	sseli 3220	. . . . . . . . . 10 |- ( j e. Y -> j e. NN )
33	32	ad2antll 491	. . . . . . . . 9 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> j e. NN )
34	31, 33	nnmulcld 9155	. . . . . . . 8 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) e. NN )
35		breq1 4085	. . . . . . . . . . . 12 |- ( x = j -> ( x || N <-> j || N ) )
36	35, 8	elrab2 2962	. . . . . . . . . . 11 |- ( j e. Y <-> ( j e. NN /\ j || N ) )
37	36	simprbi 275	. . . . . . . . . 10 |- ( j e. Y -> j || N )
38	37	ad2antll 491	. . . . . . . . 9 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> j || N )
39		breq1 4085	. . . . . . . . . . . 12 |- ( x = i -> ( x || M <-> i || M ) )
40	39, 4	elrab2 2962	. . . . . . . . . . 11 |- ( i e. X <-> ( i e. NN /\ i || M ) )
41	40	simprbi 275	. . . . . . . . . 10 |- ( i e. X -> i || M )
42	41	ad2antrl 490	. . . . . . . . 9 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> i || M )
43	33	nnzd 9564	. . . . . . . . . . 11 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> j e. ZZ )
44		mpodvdsmulf1o.2	. . . . . . . . . . . . 13 |- ( ph -> N e. NN )
45	44	adantr 276	. . . . . . . . . . . 12 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> N e. NN )
46	45	nnzd 9564	. . . . . . . . . . 11 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> N e. ZZ )
47	31	nnzd 9564	. . . . . . . . . . 11 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> i e. ZZ )
48		dvdscmul 12324	. . . . . . . . . . 11 |- ( ( j e. ZZ /\ N e. ZZ /\ i e. ZZ ) -> ( j || N -> ( i x. j ) || ( i x. N ) ) )
49	43, 46, 47, 48	syl3anc 1271	. . . . . . . . . 10 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( j || N -> ( i x. j ) || ( i x. N ) ) )
50		mpodvdsmulf1o.1	. . . . . . . . . . . . 13 |- ( ph -> M e. NN )
51	50	adantr 276	. . . . . . . . . . . 12 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> M e. NN )
52	51	nnzd 9564	. . . . . . . . . . 11 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> M e. ZZ )
53		dvdsmulc 12325	. . . . . . . . . . 11 |- ( ( i e. ZZ /\ M e. ZZ /\ N e. ZZ ) -> ( i || M -> ( i x. N ) || ( M x. N ) ) )
54	47, 52, 46, 53	syl3anc 1271	. . . . . . . . . 10 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i || M -> ( i x. N ) || ( M x. N ) ) )
55	34	nnzd 9564	. . . . . . . . . . 11 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) e. ZZ )
56	47, 46	zmulcld 9571	. . . . . . . . . . 11 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. N ) e. ZZ )
57	52, 46	zmulcld 9571	. . . . . . . . . . 11 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( M x. N ) e. ZZ )
58		dvdstr 12334	. . . . . . . . . . 11 |- ( ( ( 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 ) ) )
59	55, 56, 57, 58	syl3anc 1271	. . . . . . . . . 10 |- ( ( 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 ) ) )
60	49, 54, 59	syl2and 295	. . . . . . . . 9 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( ( j || N /\ i || M ) -> ( i x. j ) || ( M x. N ) ) )
61	38, 42, 60	mp2and 433	. . . . . . . 8 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) || ( M x. N ) )
62		breq1 4085	. . . . . . . . 9 |- ( x = ( i x. j ) -> ( x || ( M x. N ) <-> ( i x. j ) || ( M x. N ) ) )
63		mpodvdsmulf1o.z	. . . . . . . . 9 |- Z = { x e. NN | x || ( M x. N ) }
64	62, 63	elrab2 2962	. . . . . . . 8 |- ( ( i x. j ) e. Z <-> ( ( i x. j ) e. NN /\ ( i x. j ) || ( M x. N ) ) )
65	34, 61, 64	sylanbrc 417	. . . . . . 7 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i x. j ) e. Z )
66	29, 65	eqeltrrd 2307	. . . . . 6 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) e. Z )
67	17, 66	eqeltrd 2306	. . . . 5 |- ( ( ph /\ ( i e. X /\ j e. Y ) ) -> ( i ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) j ) e. Z )
68	67	ralrimivva 2612	. . . 4 |- ( 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 )
69		ffnov 6107	. . . 4 |- ( ( ( 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 ) )
70	15, 68, 69	sylanbrc 417	. . 3 |- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) --> Z )
71	19	ad2antlr 489	. . . . . . . . 9 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> i e. CC )
72	21	ad2antlr 489	. . . . . . . . 9 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> j e. CC )
73	22	ad2antlr 489	. . . . . . . . 9 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> ( i x. j ) e. CC )
74	71, 72, 73, 26	syl3anc 1271	. . . . . . . 8 |- ( ( ( 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 ) )
75	7	sseli 3220	. . . . . . . . . 10 |- ( m e. X -> m e. CC )
76	75	ad2antrl 490	. . . . . . . . 9 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> m e. CC )
77	10	sseli 3220	. . . . . . . . . 10 |- ( n e. Y -> n e. CC )
78	77	ad2antll 491	. . . . . . . . 9 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> n e. CC )
79	76, 78	mulcld 8163	. . . . . . . . 9 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> ( m x. n ) e. CC )
80		oveq1 6007	. . . . . . . . . 10 |- ( x = m -> ( x x. y ) = ( m x. y ) )
81		oveq2 6008	. . . . . . . . . 10 |- ( y = n -> ( m x. y ) = ( m x. n ) )
82	80, 81, 25	ovmpog 6138	. . . . . . . . 9 |- ( ( m e. CC /\ n e. CC /\ ( m x. n ) e. CC ) -> ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) = ( m x. n ) )
83	76, 78, 79, 82	syl3anc 1271	. . . . . . . 8 |- ( ( ( 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 ) )
84	74, 83	eqeq12d 2244	. . . . . . 7 |- ( ( ( 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 ) ) )
85	31	adantr 276	. . . . . . . . . . 11 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i e. NN )
86	85	nnnn0d 9418	. . . . . . . . . 10 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i e. NN0 )
87		simprll 537	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. X )
88	5, 87	sselid 3222	. . . . . . . . . . 11 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. NN )
89	88	nnnn0d 9418	. . . . . . . . . 10 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. NN0 )
90	85	nnzd 9564	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i e. ZZ )
91	33	adantr 276	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j e. NN )
92	91	nnzd 9564	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j e. ZZ )
93		dvdsmul1 12319	. . . . . . . . . . . . 13 |- ( ( i e. ZZ /\ j e. ZZ ) -> i || ( i x. j ) )
94	90, 92, 93	syl2anc 411	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i || ( i x. j ) )
95		simprr 531	. . . . . . . . . . . . 13 |- ( ( ( 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 ) )
96	7, 87	sselid 3222	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. CC )
97		simprlr 538	. . . . . . . . . . . . . . 15 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n e. Y )
98	10, 97	sselid 3222	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n e. CC )
99	96, 98	mulcomd 8164	. . . . . . . . . . . . 13 |- ( ( ( 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 ) )
100	95, 99	eqtrd 2262	. . . . . . . . . . . 12 |- ( ( ( 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 ) )
101	94, 100	breqtrd 4108	. . . . . . . . . . 11 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i || ( n x. m ) )
102	9, 97	sselid 3222	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n e. NN )
103	102	nnzd 9564	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n e. ZZ )
104	46	adantr 276	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> N e. ZZ )
105	90, 104	gcdcomd 12490	. . . . . . . . . . . . 13 |- ( ( ( 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 ) )
106	52	adantr 276	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> M e. ZZ )
107	44	nnzd 9564	. . . . . . . . . . . . . . . . 17 |- ( ph -> N e. ZZ )
108	50	nnzd 9564	. . . . . . . . . . . . . . . . 17 |- ( ph -> M e. ZZ )
109	107, 108	gcdcomd 12490	. . . . . . . . . . . . . . . 16 |- ( ph -> ( N gcd M ) = ( M gcd N ) )
110		mpodvdsmulf1o.3	. . . . . . . . . . . . . . . 16 |- ( ph -> ( M gcd N ) = 1 )
111	109, 110	eqtrd 2262	. . . . . . . . . . . . . . 15 |- ( ph -> ( N gcd M ) = 1 )
112	111	ad2antrr 488	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( N gcd M ) = 1 )
113	42	adantr 276	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i || M )
114		rpdvds 12616	. . . . . . . . . . . . . 14 |- ( ( ( N e. ZZ /\ i e. ZZ /\ M e. ZZ ) /\ ( ( N gcd M ) = 1 /\ i || M ) ) -> ( N gcd i ) = 1 )
115	104, 90, 106, 112, 113, 114	syl32anc 1279	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( N gcd i ) = 1 )
116	105, 115	eqtrd 2262	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i gcd N ) = 1 )
117		breq1 4085	. . . . . . . . . . . . . . 15 |- ( x = n -> ( x || N <-> n || N ) )
118	117, 8	elrab2 2962	. . . . . . . . . . . . . 14 |- ( n e. Y <-> ( n e. NN /\ n || N ) )
119	118	simprbi 275	. . . . . . . . . . . . 13 |- ( n e. Y -> n || N )
120	97, 119	syl 14	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> n || N )
121		rpdvds 12616	. . . . . . . . . . . 12 |- ( ( ( i e. ZZ /\ n e. ZZ /\ N e. ZZ ) /\ ( ( i gcd N ) = 1 /\ n || N ) ) -> ( i gcd n ) = 1 )
122	90, 103, 104, 116, 120, 121	syl32anc 1279	. . . . . . . . . . 11 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( i gcd n ) = 1 )
123	88	nnzd 9564	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m e. ZZ )
124		coprmdvds 12609	. . . . . . . . . . . 12 |- ( ( i e. ZZ /\ n e. ZZ /\ m e. ZZ ) -> ( ( i || ( n x. m ) /\ ( i gcd n ) = 1 ) -> i || m ) )
125	90, 103, 123, 124	syl3anc 1271	. . . . . . . . . . 11 |- ( ( ( 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 ) )
126	101, 122, 125	mp2and 433	. . . . . . . . . 10 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i || m )
127		dvdsmul1 12319	. . . . . . . . . . . . 13 |- ( ( m e. ZZ /\ n e. ZZ ) -> m || ( m x. n ) )
128	123, 103, 127	syl2anc 411	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m || ( m x. n ) )
129	85	nncnd 9120	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i e. CC )
130	91	nncnd 9120	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j e. CC )
131	129, 130	mulcomd 8164	. . . . . . . . . . . . 13 |- ( ( ( 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 ) )
132	95, 131	eqtr3d 2264	. . . . . . . . . . . 12 |- ( ( ( 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 ) )
133	128, 132	breqtrd 4108	. . . . . . . . . . 11 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m || ( j x. i ) )
134	123, 104	gcdcomd 12490	. . . . . . . . . . . . 13 |- ( ( ( 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 ) )
135		breq1 4085	. . . . . . . . . . . . . . . . 17 |- ( x = m -> ( x || M <-> m || M ) )
136	135, 4	elrab2 2962	. . . . . . . . . . . . . . . 16 |- ( m e. X <-> ( m e. NN /\ m || M ) )
137	136	simprbi 275	. . . . . . . . . . . . . . 15 |- ( m e. X -> m || M )
138	87, 137	syl 14	. . . . . . . . . . . . . 14 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m || M )
139		rpdvds 12616	. . . . . . . . . . . . . 14 |- ( ( ( N e. ZZ /\ m e. ZZ /\ M e. ZZ ) /\ ( ( N gcd M ) = 1 /\ m || M ) ) -> ( N gcd m ) = 1 )
140	104, 123, 106, 112, 138, 139	syl32anc 1279	. . . . . . . . . . . . 13 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( N gcd m ) = 1 )
141	134, 140	eqtrd 2262	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( m gcd N ) = 1 )
142	38	adantr 276	. . . . . . . . . . . 12 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j || N )
143		rpdvds 12616	. . . . . . . . . . . 12 |- ( ( ( m e. ZZ /\ j e. ZZ /\ N e. ZZ ) /\ ( ( m gcd N ) = 1 /\ j || N ) ) -> ( m gcd j ) = 1 )
144	123, 92, 104, 141, 142, 143	syl32anc 1279	. . . . . . . . . . 11 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> ( m gcd j ) = 1 )
145		coprmdvds 12609	. . . . . . . . . . . 12 |- ( ( m e. ZZ /\ j e. ZZ /\ i e. ZZ ) -> ( ( m || ( j x. i ) /\ ( m gcd j ) = 1 ) -> m || i ) )
146	123, 92, 90, 145	syl3anc 1271	. . . . . . . . . . 11 |- ( ( ( 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 ) )
147	133, 144, 146	mp2and 433	. . . . . . . . . 10 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> m || i )
148		dvdseq 12354	. . . . . . . . . 10 |- ( ( ( i e. NN0 /\ m e. NN0 ) /\ ( i || m /\ m || i ) ) -> i = m )
149	86, 89, 126, 147, 148	syl22anc 1272	. . . . . . . . 9 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i = m )
150	85	nnap0d 9152	. . . . . . . . . 10 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> i # 0 )
151	149	oveq1d 6015	. . . . . . . . . . 11 |- ( ( ( 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 ) )
152	95, 151	eqtr4d 2265	. . . . . . . . . 10 |- ( ( ( 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 ) )
153	130, 98, 129, 150, 152	mulcanapad 8806	. . . . . . . . 9 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> j = n )
154	149, 153	opeq12d 3864	. . . . . . . 8 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( ( m e. X /\ n e. Y ) /\ ( i x. j ) = ( m x. n ) ) ) -> <. i , j >. = <. m , n >. )
155	154	expr 375	. . . . . . 7 |- ( ( ( ph /\ ( i e. X /\ j e. Y ) ) /\ ( m e. X /\ n e. Y ) ) -> ( ( i x. j ) = ( m x. n ) -> <. i , j >. = <. m , n >. ) )
156	84, 155	sylbid 150	. . . . . 6 |- ( ( ( 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 >. ) )
157	156	ralrimivva 2612	. . . . 5 |- ( ( 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 >. ) )
158	157	ralrimivva 2612	. . . 4 |- ( 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 >. ) )
159		fvres 5650	. . . . . . . . 9 |- ( 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 ) )
160		fvres 5650	. . . . . . . . 9 |- ( 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 ) )
161	159, 160	eqeqan12d 2245	. . . . . . . 8 |- ( ( 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 ) ) )
162	161	imbi1d 231	. . . . . . 7 |- ( ( 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 ) ) )
163	162	ralbidva 2526	. . . . . 6 |- ( 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 ) ) )
164	163	ralbiia 2544	. . . . 5 |- ( 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 ) )
165		fveq2 5626	. . . . . . . . . . 11 |- ( v = <. m , n >. -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. m , n >. ) )
166		df-ov 6003	. . . . . . . . . . 11 |- ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. m , n >. )
167	165, 166	eqtr4di 2280	. . . . . . . . . 10 |- ( v = <. m , n >. -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` v ) = ( m ( x e. CC , y e. CC |-> ( x x. y ) ) n ) )
168	167	eqeq2d 2241	. . . . . . . . 9 |- ( 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 ) ) )
169		eqeq2 2239	. . . . . . . . 9 |- ( v = <. m , n >. -> ( u = v <-> u = <. m , n >. ) )
170	168, 169	imbi12d 234	. . . . . . . 8 |- ( 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 >. ) ) )
171	170	ralxp 4864	. . . . . . 7 |- ( 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 >. ) )
172		fveq2 5626	. . . . . . . . . . 11 |- ( u = <. i , j >. -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. i , j >. ) )
173		df-ov 6003	. . . . . . . . . . 11 |- ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) = ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` <. i , j >. )
174	172, 173	eqtr4di 2280	. . . . . . . . . 10 |- ( u = <. i , j >. -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) ` u ) = ( i ( x e. CC , y e. CC |-> ( x x. y ) ) j ) )
175	174	eqeq1d 2238	. . . . . . . . 9 |- ( 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 ) ) )
176		eqeq1 2236	. . . . . . . . 9 |- ( u = <. i , j >. -> ( u = <. m , n >. <-> <. i , j >. = <. m , n >. ) )
177	175, 176	imbi12d 234	. . . . . . . 8 |- ( 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 >. ) ) )
178	177	2ralbidv 2554	. . . . . . 7 |- ( 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 >. ) ) )
179	171, 178	bitrid 192	. . . . . 6 |- ( 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 >. ) ) )
180	179	ralxp 4864	. . . . 5 |- ( 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 >. ) )
181	164, 180	bitri 184	. . . 4 |- ( 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 >. ) )
182	158, 181	sylibr 134	. . 3 |- ( 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 ) )
183		dff13 5891	. . 3 |- ( ( ( 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 ) ) )
184	70, 182, 183	sylanbrc 417	. 2 |- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -1-1-> Z )
185		breq1 4085	. . . . . . . . . . . 12 |- ( x = w -> ( x || ( M x. N ) <-> w || ( M x. N ) ) )
186	185, 63	elrab2 2962	. . . . . . . . . . 11 |- ( w e. Z <-> ( w e. NN /\ w || ( M x. N ) ) )
187	186	simplbi 274	. . . . . . . . . 10 |- ( w e. Z -> w e. NN )
188	187	adantl 277	. . . . . . . . 9 |- ( ( ph /\ w e. Z ) -> w e. NN )
189	188	nnzd 9564	. . . . . . . 8 |- ( ( ph /\ w e. Z ) -> w e. ZZ )
190	50	adantr 276	. . . . . . . . 9 |- ( ( ph /\ w e. Z ) -> M e. NN )
191	190	nnzd 9564	. . . . . . . 8 |- ( ( ph /\ w e. Z ) -> M e. ZZ )
192	190	nnne0d 9151	. . . . . . . . 9 |- ( ( ph /\ w e. Z ) -> M =/= 0 )
193		simpr 110	. . . . . . . . . 10 |- ( ( w = 0 /\ M = 0 ) -> M = 0 )
194	193	necon3ai 2449	. . . . . . . . 9 |- ( M =/= 0 -> -. ( w = 0 /\ M = 0 ) )
195	192, 194	syl 14	. . . . . . . 8 |- ( ( ph /\ w e. Z ) -> -. ( w = 0 /\ M = 0 ) )
196		gcdn0cl 12478	. . . . . . . 8 |- ( ( ( w e. ZZ /\ M e. ZZ ) /\ -. ( w = 0 /\ M = 0 ) ) -> ( w gcd M ) e. NN )
197	189, 191, 195, 196	syl21anc 1270	. . . . . . 7 |- ( ( ph /\ w e. Z ) -> ( w gcd M ) e. NN )
198		gcddvds 12479	. . . . . . . . 9 |- ( ( w e. ZZ /\ M e. ZZ ) -> ( ( w gcd M ) || w /\ ( w gcd M ) || M ) )
199	189, 191, 198	syl2anc 411	. . . . . . . 8 |- ( ( ph /\ w e. Z ) -> ( ( w gcd M ) || w /\ ( w gcd M ) || M ) )
200	199	simprd 114	. . . . . . 7 |- ( ( ph /\ w e. Z ) -> ( w gcd M ) || M )
201		breq1 4085	. . . . . . . 8 |- ( x = ( w gcd M ) -> ( x || M <-> ( w gcd M ) || M ) )
202	201, 4	elrab2 2962	. . . . . . 7 |- ( ( w gcd M ) e. X <-> ( ( w gcd M ) e. NN /\ ( w gcd M ) || M ) )
203	197, 200, 202	sylanbrc 417	. . . . . 6 |- ( ( ph /\ w e. Z ) -> ( w gcd M ) e. X )
204	44	adantr 276	. . . . . . . . 9 |- ( ( ph /\ w e. Z ) -> N e. NN )
205	204	nnzd 9564	. . . . . . . 8 |- ( ( ph /\ w e. Z ) -> N e. ZZ )
206	204	nnne0d 9151	. . . . . . . . 9 |- ( ( ph /\ w e. Z ) -> N =/= 0 )
207		simpr 110	. . . . . . . . . 10 |- ( ( w = 0 /\ N = 0 ) -> N = 0 )
208	207	necon3ai 2449	. . . . . . . . 9 |- ( N =/= 0 -> -. ( w = 0 /\ N = 0 ) )
209	206, 208	syl 14	. . . . . . . 8 |- ( ( ph /\ w e. Z ) -> -. ( w = 0 /\ N = 0 ) )
210		gcdn0cl 12478	. . . . . . . 8 |- ( ( ( w e. ZZ /\ N e. ZZ ) /\ -. ( w = 0 /\ N = 0 ) ) -> ( w gcd N ) e. NN )
211	189, 205, 209, 210	syl21anc 1270	. . . . . . 7 |- ( ( ph /\ w e. Z ) -> ( w gcd N ) e. NN )
212		gcddvds 12479	. . . . . . . . 9 |- ( ( w e. ZZ /\ N e. ZZ ) -> ( ( w gcd N ) || w /\ ( w gcd N ) || N ) )
213	189, 205, 212	syl2anc 411	. . . . . . . 8 |- ( ( ph /\ w e. Z ) -> ( ( w gcd N ) || w /\ ( w gcd N ) || N ) )
214	213	simprd 114	. . . . . . 7 |- ( ( ph /\ w e. Z ) -> ( w gcd N ) || N )
215		breq1 4085	. . . . . . . 8 |- ( x = ( w gcd N ) -> ( x || N <-> ( w gcd N ) || N ) )
216	215, 8	elrab2 2962	. . . . . . 7 |- ( ( w gcd N ) e. Y <-> ( ( w gcd N ) e. NN /\ ( w gcd N ) || N ) )
217	211, 214, 216	sylanbrc 417	. . . . . 6 |- ( ( ph /\ w e. Z ) -> ( w gcd N ) e. Y )
218	203, 217	opelxpd 4751	. . . . 5 |- ( ( ph /\ w e. Z ) -> <. ( w gcd M ) , ( w gcd N ) >. e. ( X X. Y ) )
219	218	fvresd 5651	. . . . . . 7 |- ( ( 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 ) >. ) )
220		df-ov 6003	. . . . . . . 8 |- ( ( 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 ) >. )
221	197	nncnd 9120	. . . . . . . . 9 |- ( ( ph /\ w e. Z ) -> ( w gcd M ) e. CC )
222	211	nncnd 9120	. . . . . . . . 9 |- ( ( ph /\ w e. Z ) -> ( w gcd N ) e. CC )
223	197, 211	nnmulcld 9155	. . . . . . . . 9 |- ( ( ph /\ w e. Z ) -> ( ( w gcd M ) x. ( w gcd N ) ) e. NN )
224		oveq1 6007	. . . . . . . . . 10 |- ( x = ( w gcd M ) -> ( x x. y ) = ( ( w gcd M ) x. y ) )
225		oveq2 6008	. . . . . . . . . 10 |- ( y = ( w gcd N ) -> ( ( w gcd M ) x. y ) = ( ( w gcd M ) x. ( w gcd N ) ) )
226	224, 225, 25	ovmpog 6138	. . . . . . . . 9 |- ( ( ( w gcd M ) e. CC /\ ( w gcd N ) e. CC /\ ( ( w gcd M ) x. ( w gcd N ) ) e. NN ) -> ( ( w gcd M ) ( x e. CC , y e. CC |-> ( x x. y ) ) ( w gcd N ) ) = ( ( w gcd M ) x. ( w gcd N ) ) )
227	221, 222, 223, 226	syl3anc 1271	. . . . . . . 8 |- ( ( 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 ) ) )
228	220, 227	eqtr3id 2276	. . . . . . 7 |- ( ( 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 ) ) )
229		df-ov 6003	. . . . . . . 8 |- ( ( w gcd M ) x. ( w gcd N ) ) = ( x. ` <. ( w gcd M ) , ( w gcd N ) >. )
230	229	a1i 9	. . . . . . 7 |- ( ( ph /\ w e. Z ) -> ( ( w gcd M ) x. ( w gcd N ) ) = ( x. ` <. ( w gcd M ) , ( w gcd N ) >. ) )
231	219, 228, 230	3eqtrd 2266	. . . . . 6 |- ( ( 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 ) >. ) )
232	110	adantr 276	. . . . . . . 8 |- ( ( ph /\ w e. Z ) -> ( M gcd N ) = 1 )
233		rpmulgcd2 12612	. . . . . . . 8 |- ( ( ( 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 ) ) )
234	189, 191, 205, 232, 233	syl31anc 1274	. . . . . . 7 |- ( ( ph /\ w e. Z ) -> ( w gcd ( M x. N ) ) = ( ( w gcd M ) x. ( w gcd N ) ) )
235	234, 229	eqtrdi 2278	. . . . . 6 |- ( ( ph /\ w e. Z ) -> ( w gcd ( M x. N ) ) = ( x. ` <. ( w gcd M ) , ( w gcd N ) >. ) )
236	186	simprbi 275	. . . . . . . 8 |- ( w e. Z -> w || ( M x. N ) )
237	236	adantl 277	. . . . . . 7 |- ( ( ph /\ w e. Z ) -> w || ( M x. N ) )
238	50, 44	nnmulcld 9155	. . . . . . . 8 |- ( ph -> ( M x. N ) e. NN )
239		gcdeq 12539	. . . . . . . 8 |- ( ( w e. NN /\ ( M x. N ) e. NN ) -> ( ( w gcd ( M x. N ) ) = w <-> w || ( M x. N ) ) )
240	187, 238, 239	syl2anr 290	. . . . . . 7 |- ( ( ph /\ w e. Z ) -> ( ( w gcd ( M x. N ) ) = w <-> w || ( M x. N ) ) )
241	237, 240	mpbird 167	. . . . . 6 |- ( ( ph /\ w e. Z ) -> ( w gcd ( M x. N ) ) = w )
242	231, 235, 241	3eqtr2rd 2269	. . . . 5 |- ( ( ph /\ w e. Z ) -> w = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` <. ( w gcd M ) , ( w gcd N ) >. ) )
243		fveq2 5626	. . . . . 6 |- ( 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 ) >. ) )
244	243	rspceeqv 2925	. . . . 5 |- ( ( <. ( 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 ) )
245	218, 242, 244	syl2anc 411	. . . 4 |- ( ( ph /\ w e. Z ) -> E. u e. ( X X. Y ) w = ( ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) ` u ) )
246	245	ralrimiva 2603	. . 3 |- ( 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 ) )
247		dffo3 5781	. . 3 |- ( ( ( 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 ) ) )
248	70, 246, 247	sylanbrc 417	. 2 |- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -onto-> Z )
249		df-f1o 5324	. 2 |- ( ( ( 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 ) )
250	184, 248, 249	sylanbrc 417	1 |- ( ph -> ( ( x e. CC , y e. CC |-> ( x x. y ) ) |` ( X X. Y ) ) : ( X X. Y ) -1-1-onto-> Z )

Syntax hints:   -. wn 3   -> wi 4   /\ wa 104   <-> wb 105   /\ w3a 1002   = wceq 1395   e. wcel 2200   =/= wne 2400   A.wral 2508   E.wrex 2509   {crab 2512   C_ wss 3197   <.cop 3669   class class class wbr 4082   X. cxp 4716   |` cres 4720   Fn wfn 5312   -->wf 5313   -1-1->wf1 5314   -onto->wfo 5315   -1-1-onto->wf1o 5316   ` cfv 5317  (class class class)co 6000   e. cmpo 6002   CCcc 7993   0cc0 7995   1c1 7996   x. cmul 8000   NNcn 9106   NN0cn0 9365   ZZcz 9442   || cdvds 12293   gcd cgcd 12469

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 617  ax-in2 618  ax-io 714  ax-5 1493  ax-7 1494  ax-gen 1495  ax-ie1 1539  ax-ie2 1540  ax-8 1550  ax-10 1551  ax-11 1552  ax-i12 1553  ax-bndl 1555  ax-4 1556  ax-17 1572  ax-i9 1576  ax-ial 1580  ax-i5r 1581  ax-13 2202  ax-14 2203  ax-ext 2211  ax-coll 4198  ax-sep 4201  ax-nul 4209  ax-pow 4257  ax-pr 4292  ax-un 4523  ax-setind 4628  ax-iinf 4679  ax-cnex 8086  ax-resscn 8087  ax-1cn 8088  ax-1re 8089  ax-icn 8090  ax-addcl 8091  ax-addrcl 8092  ax-mulcl 8093  ax-mulrcl 8094  ax-addcom 8095  ax-mulcom 8096  ax-addass 8097  ax-mulass 8098  ax-distr 8099  ax-i2m1 8100  ax-0lt1 8101  ax-1rid 8102  ax-0id 8103  ax-rnegex 8104  ax-precex 8105  ax-cnre 8106  ax-pre-ltirr 8107  ax-pre-ltwlin 8108  ax-pre-lttrn 8109  ax-pre-apti 8110  ax-pre-ltadd 8111  ax-pre-mulgt0 8112  ax-pre-mulext 8113  ax-arch 8114  ax-caucvg 8115

This theorem depends on definitions:  df-bi 117  df-stab 836  df-dc 840  df-3or 1003  df-3an 1004  df-tru 1398  df-fal 1401  df-nf 1507  df-sb 1809  df-eu 2080  df-mo 2081  df-clab 2216  df-cleq 2222  df-clel 2225  df-nfc 2361  df-ne 2401  df-nel 2496  df-ral 2513  df-rex 2514  df-reu 2515  df-rmo 2516  df-rab 2517  df-v 2801  df-sbc 3029  df-csb 3125  df-dif 3199  df-un 3201  df-in 3203  df-ss 3210  df-nul 3492  df-if 3603  df-pw 3651  df-sn 3672  df-pr 3673  df-op 3675  df-uni 3888  df-int 3923  df-iun 3966  df-br 4083  df-opab 4145  df-mpt 4146  df-tr 4182  df-id 4383  df-po 4386  df-iso 4387  df-iord 4456  df-on 4458  df-ilim 4459  df-suc 4461  df-iom 4682  df-xp 4724  df-rel 4725  df-cnv 4726  df-co 4727  df-dm 4728  df-rn 4729  df-res 4730  df-ima 4731  df-iota 5277  df-fun 5319  df-fn 5320  df-f 5321  df-f1 5322  df-fo 5323  df-f1o 5324  df-fv 5325  df-riota 5953  df-ov 6003  df-oprab 6004  df-mpo 6005  df-1st 6284  df-2nd 6285  df-recs 6449  df-frec 6535  df-sup 7147  df-pnf 8179  df-mnf 8180  df-xr 8181  df-ltxr 8182  df-le 8183  df-sub 8315  df-neg 8316  df-reap 8718  df-ap 8725  df-div 8816  df-inn 9107  df-2 9165  df-3 9166  df-4 9167  df-n0 9366  df-z 9443  df-uz 9719  df-q 9811  df-rp 9846  df-fz 10201  df-fzo 10335  df-fl 10485  df-mod 10540  df-seqfrec 10665  df-exp 10756  df-cj 11348  df-re 11349  df-im 11350  df-rsqrt 11504  df-abs 11505  df-dvds 12294  df-gcd 12470

This theorem is referenced by:  fsumdvdsmul  15659