Step |
Hyp |
Ref |
Expression |
1 |
|
df-1o |
|- 1o = suc (/) |
2 |
1
|
fveq2i |
|- ( Fmla ` 1o ) = ( Fmla ` suc (/) ) |
3 |
|
peano1 |
|- (/) e. _om |
4 |
|
fmlasuc |
|- ( (/) e. _om -> ( Fmla ` suc (/) ) = ( ( Fmla ` (/) ) u. { x | E. p e. ( Fmla ` (/) ) ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) } ) ) |
5 |
3 4
|
ax-mp |
|- ( Fmla ` suc (/) ) = ( ( Fmla ` (/) ) u. { x | E. p e. ( Fmla ` (/) ) ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) } ) |
6 |
|
fmla0xp |
|- ( Fmla ` (/) ) = ( { (/) } X. ( _om X. _om ) ) |
7 |
|
fmla0 |
|- ( Fmla ` (/) ) = { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } |
8 |
7
|
rexeqi |
|- ( E. p e. ( Fmla ` (/) ) ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) <-> E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) ) |
9 |
|
eqeq1 |
|- ( y = p -> ( y = ( i e.g j ) <-> p = ( i e.g j ) ) ) |
10 |
9
|
2rexbidv |
|- ( y = p -> ( E. i e. _om E. j e. _om y = ( i e.g j ) <-> E. i e. _om E. j e. _om p = ( i e.g j ) ) ) |
11 |
10
|
elrab |
|- ( p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } <-> ( p e. _V /\ E. i e. _om E. j e. _om p = ( i e.g j ) ) ) |
12 |
|
oveq1 |
|- ( p = ( i e.g j ) -> ( p |g q ) = ( ( i e.g j ) |g q ) ) |
13 |
12
|
eqeq2d |
|- ( p = ( i e.g j ) -> ( x = ( p |g q ) <-> x = ( ( i e.g j ) |g q ) ) ) |
14 |
13
|
rexbidv |
|- ( p = ( i e.g j ) -> ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) <-> E. q e. ( Fmla ` (/) ) x = ( ( i e.g j ) |g q ) ) ) |
15 |
|
eqidd |
|- ( p = ( i e.g j ) -> k = k ) |
16 |
|
id |
|- ( p = ( i e.g j ) -> p = ( i e.g j ) ) |
17 |
15 16
|
goaleq12d |
|- ( p = ( i e.g j ) -> A.g k p = A.g k ( i e.g j ) ) |
18 |
17
|
eqeq2d |
|- ( p = ( i e.g j ) -> ( x = A.g k p <-> x = A.g k ( i e.g j ) ) ) |
19 |
18
|
rexbidv |
|- ( p = ( i e.g j ) -> ( E. k e. _om x = A.g k p <-> E. k e. _om x = A.g k ( i e.g j ) ) ) |
20 |
14 19
|
orbi12d |
|- ( p = ( i e.g j ) -> ( ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) <-> ( E. q e. ( Fmla ` (/) ) x = ( ( i e.g j ) |g q ) \/ E. k e. _om x = A.g k ( i e.g j ) ) ) ) |
21 |
|
eqeq1 |
|- ( z = q -> ( z = ( k e.g l ) <-> q = ( k e.g l ) ) ) |
22 |
21
|
2rexbidv |
|- ( z = q -> ( E. k e. _om E. l e. _om z = ( k e.g l ) <-> E. k e. _om E. l e. _om q = ( k e.g l ) ) ) |
23 |
|
fmla0 |
|- ( Fmla ` (/) ) = { z e. _V | E. k e. _om E. l e. _om z = ( k e.g l ) } |
24 |
22 23
|
elrab2 |
|- ( q e. ( Fmla ` (/) ) <-> ( q e. _V /\ E. k e. _om E. l e. _om q = ( k e.g l ) ) ) |
25 |
|
oveq2 |
|- ( q = ( k e.g l ) -> ( ( i e.g j ) |g q ) = ( ( i e.g j ) |g ( k e.g l ) ) ) |
26 |
25
|
eqeq2d |
|- ( q = ( k e.g l ) -> ( x = ( ( i e.g j ) |g q ) <-> x = ( ( i e.g j ) |g ( k e.g l ) ) ) ) |
27 |
26
|
biimpcd |
|- ( x = ( ( i e.g j ) |g q ) -> ( q = ( k e.g l ) -> x = ( ( i e.g j ) |g ( k e.g l ) ) ) ) |
28 |
27
|
reximdv |
|- ( x = ( ( i e.g j ) |g q ) -> ( E. l e. _om q = ( k e.g l ) -> E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) ) ) |
29 |
28
|
reximdv |
|- ( x = ( ( i e.g j ) |g q ) -> ( E. k e. _om E. l e. _om q = ( k e.g l ) -> E. k e. _om E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) ) ) |
30 |
29
|
com12 |
|- ( E. k e. _om E. l e. _om q = ( k e.g l ) -> ( x = ( ( i e.g j ) |g q ) -> E. k e. _om E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) ) ) |
31 |
24 30
|
simplbiim |
|- ( q e. ( Fmla ` (/) ) -> ( x = ( ( i e.g j ) |g q ) -> E. k e. _om E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) ) ) |
32 |
31
|
rexlimiv |
|- ( E. q e. ( Fmla ` (/) ) x = ( ( i e.g j ) |g q ) -> E. k e. _om E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) ) |
33 |
32
|
orim1i |
|- ( ( E. q e. ( Fmla ` (/) ) x = ( ( i e.g j ) |g q ) \/ E. k e. _om x = A.g k ( i e.g j ) ) -> ( E. k e. _om E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ E. k e. _om x = A.g k ( i e.g j ) ) ) |
34 |
|
r19.43 |
|- ( E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) <-> ( E. k e. _om E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ E. k e. _om x = A.g k ( i e.g j ) ) ) |
35 |
33 34
|
sylibr |
|- ( ( E. q e. ( Fmla ` (/) ) x = ( ( i e.g j ) |g q ) \/ E. k e. _om x = A.g k ( i e.g j ) ) -> E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) |
36 |
20 35
|
syl6bi |
|- ( p = ( i e.g j ) -> ( ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) -> E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) ) |
37 |
36
|
com12 |
|- ( ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) -> ( p = ( i e.g j ) -> E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) ) |
38 |
37
|
reximdv |
|- ( ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) -> ( E. j e. _om p = ( i e.g j ) -> E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) ) |
39 |
38
|
reximdv |
|- ( ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) -> ( E. i e. _om E. j e. _om p = ( i e.g j ) -> E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) ) |
40 |
39
|
com12 |
|- ( E. i e. _om E. j e. _om p = ( i e.g j ) -> ( ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) -> E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) ) |
41 |
11 40
|
simplbiim |
|- ( p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } -> ( ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) -> E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) ) |
42 |
41
|
rexlimiv |
|- ( E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) -> E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) |
43 |
|
oveq1 |
|- ( i = m -> ( i e.g j ) = ( m e.g j ) ) |
44 |
43
|
oveq1d |
|- ( i = m -> ( ( i e.g j ) |g ( k e.g l ) ) = ( ( m e.g j ) |g ( k e.g l ) ) ) |
45 |
44
|
eqeq2d |
|- ( i = m -> ( x = ( ( i e.g j ) |g ( k e.g l ) ) <-> x = ( ( m e.g j ) |g ( k e.g l ) ) ) ) |
46 |
45
|
rexbidv |
|- ( i = m -> ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) <-> E. l e. _om x = ( ( m e.g j ) |g ( k e.g l ) ) ) ) |
47 |
|
eqidd |
|- ( i = m -> k = k ) |
48 |
47 43
|
goaleq12d |
|- ( i = m -> A.g k ( i e.g j ) = A.g k ( m e.g j ) ) |
49 |
48
|
eqeq2d |
|- ( i = m -> ( x = A.g k ( i e.g j ) <-> x = A.g k ( m e.g j ) ) ) |
50 |
46 49
|
orbi12d |
|- ( i = m -> ( ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) <-> ( E. l e. _om x = ( ( m e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g j ) ) ) ) |
51 |
50
|
rexbidv |
|- ( i = m -> ( E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) <-> E. k e. _om ( E. l e. _om x = ( ( m e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g j ) ) ) ) |
52 |
|
oveq2 |
|- ( j = n -> ( m e.g j ) = ( m e.g n ) ) |
53 |
52
|
oveq1d |
|- ( j = n -> ( ( m e.g j ) |g ( k e.g l ) ) = ( ( m e.g n ) |g ( k e.g l ) ) ) |
54 |
53
|
eqeq2d |
|- ( j = n -> ( x = ( ( m e.g j ) |g ( k e.g l ) ) <-> x = ( ( m e.g n ) |g ( k e.g l ) ) ) ) |
55 |
54
|
rexbidv |
|- ( j = n -> ( E. l e. _om x = ( ( m e.g j ) |g ( k e.g l ) ) <-> E. l e. _om x = ( ( m e.g n ) |g ( k e.g l ) ) ) ) |
56 |
|
eqidd |
|- ( j = n -> k = k ) |
57 |
56 52
|
goaleq12d |
|- ( j = n -> A.g k ( m e.g j ) = A.g k ( m e.g n ) ) |
58 |
57
|
eqeq2d |
|- ( j = n -> ( x = A.g k ( m e.g j ) <-> x = A.g k ( m e.g n ) ) ) |
59 |
55 58
|
orbi12d |
|- ( j = n -> ( ( E. l e. _om x = ( ( m e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g j ) ) <-> ( E. l e. _om x = ( ( m e.g n ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g n ) ) ) ) |
60 |
59
|
rexbidv |
|- ( j = n -> ( E. k e. _om ( E. l e. _om x = ( ( m e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g j ) ) <-> E. k e. _om ( E. l e. _om x = ( ( m e.g n ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g n ) ) ) ) |
61 |
51 60
|
cbvrex2vw |
|- ( E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) <-> E. m e. _om E. n e. _om E. k e. _om ( E. l e. _om x = ( ( m e.g n ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g n ) ) ) |
62 |
|
oveq1 |
|- ( k = o -> ( k e.g l ) = ( o e.g l ) ) |
63 |
62
|
oveq2d |
|- ( k = o -> ( ( m e.g n ) |g ( k e.g l ) ) = ( ( m e.g n ) |g ( o e.g l ) ) ) |
64 |
63
|
eqeq2d |
|- ( k = o -> ( x = ( ( m e.g n ) |g ( k e.g l ) ) <-> x = ( ( m e.g n ) |g ( o e.g l ) ) ) ) |
65 |
64
|
rexbidv |
|- ( k = o -> ( E. l e. _om x = ( ( m e.g n ) |g ( k e.g l ) ) <-> E. l e. _om x = ( ( m e.g n ) |g ( o e.g l ) ) ) ) |
66 |
|
id |
|- ( k = o -> k = o ) |
67 |
|
eqidd |
|- ( k = o -> ( m e.g n ) = ( m e.g n ) ) |
68 |
66 67
|
goaleq12d |
|- ( k = o -> A.g k ( m e.g n ) = A.g o ( m e.g n ) ) |
69 |
68
|
eqeq2d |
|- ( k = o -> ( x = A.g k ( m e.g n ) <-> x = A.g o ( m e.g n ) ) ) |
70 |
65 69
|
orbi12d |
|- ( k = o -> ( ( E. l e. _om x = ( ( m e.g n ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g n ) ) <-> ( E. l e. _om x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) ) |
71 |
70
|
cbvrexvw |
|- ( E. k e. _om ( E. l e. _om x = ( ( m e.g n ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g n ) ) <-> E. o e. _om ( E. l e. _om x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) |
72 |
3
|
ne0ii |
|- _om =/= (/) |
73 |
|
r19.44zv |
|- ( _om =/= (/) -> ( E. l e. _om ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) <-> ( E. l e. _om x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) ) |
74 |
72 73
|
ax-mp |
|- ( E. l e. _om ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) <-> ( E. l e. _om x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) |
75 |
|
eqeq1 |
|- ( y = ( m e.g n ) -> ( y = ( i e.g j ) <-> ( m e.g n ) = ( i e.g j ) ) ) |
76 |
75
|
2rexbidv |
|- ( y = ( m e.g n ) -> ( E. i e. _om E. j e. _om y = ( i e.g j ) <-> E. i e. _om E. j e. _om ( m e.g n ) = ( i e.g j ) ) ) |
77 |
|
ovexd |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) -> ( m e.g n ) e. _V ) |
78 |
|
simpl |
|- ( ( m e. _om /\ n e. _om ) -> m e. _om ) |
79 |
43
|
eqeq2d |
|- ( i = m -> ( ( m e.g n ) = ( i e.g j ) <-> ( m e.g n ) = ( m e.g j ) ) ) |
80 |
79
|
rexbidv |
|- ( i = m -> ( E. j e. _om ( m e.g n ) = ( i e.g j ) <-> E. j e. _om ( m e.g n ) = ( m e.g j ) ) ) |
81 |
80
|
adantl |
|- ( ( ( m e. _om /\ n e. _om ) /\ i = m ) -> ( E. j e. _om ( m e.g n ) = ( i e.g j ) <-> E. j e. _om ( m e.g n ) = ( m e.g j ) ) ) |
82 |
|
simpr |
|- ( ( m e. _om /\ n e. _om ) -> n e. _om ) |
83 |
52
|
eqeq2d |
|- ( j = n -> ( ( m e.g n ) = ( m e.g j ) <-> ( m e.g n ) = ( m e.g n ) ) ) |
84 |
83
|
adantl |
|- ( ( ( m e. _om /\ n e. _om ) /\ j = n ) -> ( ( m e.g n ) = ( m e.g j ) <-> ( m e.g n ) = ( m e.g n ) ) ) |
85 |
|
eqidd |
|- ( ( m e. _om /\ n e. _om ) -> ( m e.g n ) = ( m e.g n ) ) |
86 |
82 84 85
|
rspcedvd |
|- ( ( m e. _om /\ n e. _om ) -> E. j e. _om ( m e.g n ) = ( m e.g j ) ) |
87 |
78 81 86
|
rspcedvd |
|- ( ( m e. _om /\ n e. _om ) -> E. i e. _om E. j e. _om ( m e.g n ) = ( i e.g j ) ) |
88 |
87
|
ad5ant12 |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) -> E. i e. _om E. j e. _om ( m e.g n ) = ( i e.g j ) ) |
89 |
76 77 88
|
elrabd |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) -> ( m e.g n ) e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ) |
90 |
|
oveq1 |
|- ( p = ( m e.g n ) -> ( p |g q ) = ( ( m e.g n ) |g q ) ) |
91 |
90
|
eqeq2d |
|- ( p = ( m e.g n ) -> ( x = ( p |g q ) <-> x = ( ( m e.g n ) |g q ) ) ) |
92 |
91
|
rexbidv |
|- ( p = ( m e.g n ) -> ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) <-> E. q e. ( Fmla ` (/) ) x = ( ( m e.g n ) |g q ) ) ) |
93 |
|
eqidd |
|- ( p = ( m e.g n ) -> k = k ) |
94 |
|
id |
|- ( p = ( m e.g n ) -> p = ( m e.g n ) ) |
95 |
93 94
|
goaleq12d |
|- ( p = ( m e.g n ) -> A.g k p = A.g k ( m e.g n ) ) |
96 |
95
|
eqeq2d |
|- ( p = ( m e.g n ) -> ( x = A.g k p <-> x = A.g k ( m e.g n ) ) ) |
97 |
96
|
rexbidv |
|- ( p = ( m e.g n ) -> ( E. k e. _om x = A.g k p <-> E. k e. _om x = A.g k ( m e.g n ) ) ) |
98 |
92 97
|
orbi12d |
|- ( p = ( m e.g n ) -> ( ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) <-> ( E. q e. ( Fmla ` (/) ) x = ( ( m e.g n ) |g q ) \/ E. k e. _om x = A.g k ( m e.g n ) ) ) ) |
99 |
98
|
adantl |
|- ( ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) /\ p = ( m e.g n ) ) -> ( ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) <-> ( E. q e. ( Fmla ` (/) ) x = ( ( m e.g n ) |g q ) \/ E. k e. _om x = A.g k ( m e.g n ) ) ) ) |
100 |
|
ovexd |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> ( o e.g l ) e. _V ) |
101 |
|
simpr |
|- ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) -> o e. _om ) |
102 |
101
|
adantr |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> o e. _om ) |
103 |
|
oveq1 |
|- ( i = o -> ( i e.g j ) = ( o e.g j ) ) |
104 |
103
|
eqeq2d |
|- ( i = o -> ( ( o e.g l ) = ( i e.g j ) <-> ( o e.g l ) = ( o e.g j ) ) ) |
105 |
104
|
rexbidv |
|- ( i = o -> ( E. j e. _om ( o e.g l ) = ( i e.g j ) <-> E. j e. _om ( o e.g l ) = ( o e.g j ) ) ) |
106 |
105
|
adantl |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ i = o ) -> ( E. j e. _om ( o e.g l ) = ( i e.g j ) <-> E. j e. _om ( o e.g l ) = ( o e.g j ) ) ) |
107 |
|
simpr |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> l e. _om ) |
108 |
|
oveq2 |
|- ( j = l -> ( o e.g j ) = ( o e.g l ) ) |
109 |
108
|
eqeq2d |
|- ( j = l -> ( ( o e.g l ) = ( o e.g j ) <-> ( o e.g l ) = ( o e.g l ) ) ) |
110 |
109
|
adantl |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ j = l ) -> ( ( o e.g l ) = ( o e.g j ) <-> ( o e.g l ) = ( o e.g l ) ) ) |
111 |
|
eqidd |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> ( o e.g l ) = ( o e.g l ) ) |
112 |
107 110 111
|
rspcedvd |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> E. j e. _om ( o e.g l ) = ( o e.g j ) ) |
113 |
102 106 112
|
rspcedvd |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> E. i e. _om E. j e. _om ( o e.g l ) = ( i e.g j ) ) |
114 |
|
eqeq1 |
|- ( p = ( o e.g l ) -> ( p = ( i e.g j ) <-> ( o e.g l ) = ( i e.g j ) ) ) |
115 |
114
|
2rexbidv |
|- ( p = ( o e.g l ) -> ( E. i e. _om E. j e. _om p = ( i e.g j ) <-> E. i e. _om E. j e. _om ( o e.g l ) = ( i e.g j ) ) ) |
116 |
|
fmla0 |
|- ( Fmla ` (/) ) = { p e. _V | E. i e. _om E. j e. _om p = ( i e.g j ) } |
117 |
115 116
|
elrab2 |
|- ( ( o e.g l ) e. ( Fmla ` (/) ) <-> ( ( o e.g l ) e. _V /\ E. i e. _om E. j e. _om ( o e.g l ) = ( i e.g j ) ) ) |
118 |
100 113 117
|
sylanbrc |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> ( o e.g l ) e. ( Fmla ` (/) ) ) |
119 |
118
|
adantr |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ x = ( ( m e.g n ) |g ( o e.g l ) ) ) -> ( o e.g l ) e. ( Fmla ` (/) ) ) |
120 |
|
oveq2 |
|- ( q = ( o e.g l ) -> ( ( m e.g n ) |g q ) = ( ( m e.g n ) |g ( o e.g l ) ) ) |
121 |
120
|
eqeq2d |
|- ( q = ( o e.g l ) -> ( x = ( ( m e.g n ) |g q ) <-> x = ( ( m e.g n ) |g ( o e.g l ) ) ) ) |
122 |
121
|
adantl |
|- ( ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ x = ( ( m e.g n ) |g ( o e.g l ) ) ) /\ q = ( o e.g l ) ) -> ( x = ( ( m e.g n ) |g q ) <-> x = ( ( m e.g n ) |g ( o e.g l ) ) ) ) |
123 |
|
simpr |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ x = ( ( m e.g n ) |g ( o e.g l ) ) ) -> x = ( ( m e.g n ) |g ( o e.g l ) ) ) |
124 |
119 122 123
|
rspcedvd |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ x = ( ( m e.g n ) |g ( o e.g l ) ) ) -> E. q e. ( Fmla ` (/) ) x = ( ( m e.g n ) |g q ) ) |
125 |
124
|
ex |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> ( x = ( ( m e.g n ) |g ( o e.g l ) ) -> E. q e. ( Fmla ` (/) ) x = ( ( m e.g n ) |g q ) ) ) |
126 |
102
|
adantr |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ x = A.g o ( m e.g n ) ) -> o e. _om ) |
127 |
69
|
adantl |
|- ( ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ x = A.g o ( m e.g n ) ) /\ k = o ) -> ( x = A.g k ( m e.g n ) <-> x = A.g o ( m e.g n ) ) ) |
128 |
|
simpr |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ x = A.g o ( m e.g n ) ) -> x = A.g o ( m e.g n ) ) |
129 |
126 127 128
|
rspcedvd |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ x = A.g o ( m e.g n ) ) -> E. k e. _om x = A.g k ( m e.g n ) ) |
130 |
129
|
ex |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> ( x = A.g o ( m e.g n ) -> E. k e. _om x = A.g k ( m e.g n ) ) ) |
131 |
125 130
|
orim12d |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> ( ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) -> ( E. q e. ( Fmla ` (/) ) x = ( ( m e.g n ) |g q ) \/ E. k e. _om x = A.g k ( m e.g n ) ) ) ) |
132 |
131
|
imp |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) -> ( E. q e. ( Fmla ` (/) ) x = ( ( m e.g n ) |g q ) \/ E. k e. _om x = A.g k ( m e.g n ) ) ) |
133 |
89 99 132
|
rspcedvd |
|- ( ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) /\ ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) ) -> E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) ) |
134 |
133
|
ex |
|- ( ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) /\ l e. _om ) -> ( ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) -> E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) ) ) |
135 |
134
|
rexlimdva |
|- ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) -> ( E. l e. _om ( x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) -> E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) ) ) |
136 |
74 135
|
syl5bir |
|- ( ( ( m e. _om /\ n e. _om ) /\ o e. _om ) -> ( ( E. l e. _om x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) -> E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) ) ) |
137 |
136
|
rexlimdva |
|- ( ( m e. _om /\ n e. _om ) -> ( E. o e. _om ( E. l e. _om x = ( ( m e.g n ) |g ( o e.g l ) ) \/ x = A.g o ( m e.g n ) ) -> E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) ) ) |
138 |
71 137
|
syl5bi |
|- ( ( m e. _om /\ n e. _om ) -> ( E. k e. _om ( E. l e. _om x = ( ( m e.g n ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g n ) ) -> E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) ) ) |
139 |
138
|
rexlimivv |
|- ( E. m e. _om E. n e. _om E. k e. _om ( E. l e. _om x = ( ( m e.g n ) |g ( k e.g l ) ) \/ x = A.g k ( m e.g n ) ) -> E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) ) |
140 |
61 139
|
sylbi |
|- ( E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) -> E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) ) |
141 |
42 140
|
impbii |
|- ( E. p e. { y e. _V | E. i e. _om E. j e. _om y = ( i e.g j ) } ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) <-> E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) |
142 |
8 141
|
bitri |
|- ( E. p e. ( Fmla ` (/) ) ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) <-> E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) ) |
143 |
142
|
abbii |
|- { x | E. p e. ( Fmla ` (/) ) ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) } = { x | E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) } |
144 |
6 143
|
uneq12i |
|- ( ( Fmla ` (/) ) u. { x | E. p e. ( Fmla ` (/) ) ( E. q e. ( Fmla ` (/) ) x = ( p |g q ) \/ E. k e. _om x = A.g k p ) } ) = ( ( { (/) } X. ( _om X. _om ) ) u. { x | E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) } ) |
145 |
2 5 144
|
3eqtri |
|- ( Fmla ` 1o ) = ( ( { (/) } X. ( _om X. _om ) ) u. { x | E. i e. _om E. j e. _om E. k e. _om ( E. l e. _om x = ( ( i e.g j ) |g ( k e.g l ) ) \/ x = A.g k ( i e.g j ) ) } ) |