Step |
Hyp |
Ref |
Expression |
1 |
|
gsumpr.b |
|- B = ( Base ` G ) |
2 |
|
gsumpr.p |
|- .+ = ( +g ` G ) |
3 |
|
gsumpr.s |
|- ( k = M -> A = C ) |
4 |
|
gsumpr.t |
|- ( k = N -> A = D ) |
5 |
|
simp1 |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> G e. CMnd ) |
6 |
|
prfi |
|- { M , N } e. Fin |
7 |
6
|
a1i |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> { M , N } e. Fin ) |
8 |
|
vex |
|- k e. _V |
9 |
8
|
elpr |
|- ( k e. { M , N } <-> ( k = M \/ k = N ) ) |
10 |
|
eleq1a |
|- ( C e. B -> ( A = C -> A e. B ) ) |
11 |
10
|
adantr |
|- ( ( C e. B /\ D e. B ) -> ( A = C -> A e. B ) ) |
12 |
11
|
3ad2ant3 |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( A = C -> A e. B ) ) |
13 |
3 12
|
syl5com |
|- ( k = M -> ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> A e. B ) ) |
14 |
|
eleq1a |
|- ( D e. B -> ( A = D -> A e. B ) ) |
15 |
14
|
adantl |
|- ( ( C e. B /\ D e. B ) -> ( A = D -> A e. B ) ) |
16 |
15
|
3ad2ant3 |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( A = D -> A e. B ) ) |
17 |
4 16
|
syl5com |
|- ( k = N -> ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> A e. B ) ) |
18 |
13 17
|
jaoi |
|- ( ( k = M \/ k = N ) -> ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> A e. B ) ) |
19 |
9 18
|
sylbi |
|- ( k e. { M , N } -> ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> A e. B ) ) |
20 |
19
|
impcom |
|- ( ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) /\ k e. { M , N } ) -> A e. B ) |
21 |
|
disjsn2 |
|- ( M =/= N -> ( { M } i^i { N } ) = (/) ) |
22 |
21
|
3ad2ant3 |
|- ( ( M e. V /\ N e. W /\ M =/= N ) -> ( { M } i^i { N } ) = (/) ) |
23 |
22
|
3ad2ant2 |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( { M } i^i { N } ) = (/) ) |
24 |
|
df-pr |
|- { M , N } = ( { M } u. { N } ) |
25 |
24
|
a1i |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> { M , N } = ( { M } u. { N } ) ) |
26 |
|
eqid |
|- ( k e. { M , N } |-> A ) = ( k e. { M , N } |-> A ) |
27 |
1 2 5 7 20 23 25 26
|
gsummptfidmsplitres |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( G gsum ( k e. { M , N } |-> A ) ) = ( ( G gsum ( ( k e. { M , N } |-> A ) |` { M } ) ) .+ ( G gsum ( ( k e. { M , N } |-> A ) |` { N } ) ) ) ) |
28 |
|
snsspr1 |
|- { M } C_ { M , N } |
29 |
|
resmpt |
|- ( { M } C_ { M , N } -> ( ( k e. { M , N } |-> A ) |` { M } ) = ( k e. { M } |-> A ) ) |
30 |
28 29
|
mp1i |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( ( k e. { M , N } |-> A ) |` { M } ) = ( k e. { M } |-> A ) ) |
31 |
30
|
oveq2d |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( G gsum ( ( k e. { M , N } |-> A ) |` { M } ) ) = ( G gsum ( k e. { M } |-> A ) ) ) |
32 |
|
cmnmnd |
|- ( G e. CMnd -> G e. Mnd ) |
33 |
|
simp1 |
|- ( ( M e. V /\ N e. W /\ M =/= N ) -> M e. V ) |
34 |
|
simpl |
|- ( ( C e. B /\ D e. B ) -> C e. B ) |
35 |
1 3
|
gsumsn |
|- ( ( G e. Mnd /\ M e. V /\ C e. B ) -> ( G gsum ( k e. { M } |-> A ) ) = C ) |
36 |
32 33 34 35
|
syl3an |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( G gsum ( k e. { M } |-> A ) ) = C ) |
37 |
31 36
|
eqtrd |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( G gsum ( ( k e. { M , N } |-> A ) |` { M } ) ) = C ) |
38 |
|
snsspr2 |
|- { N } C_ { M , N } |
39 |
|
resmpt |
|- ( { N } C_ { M , N } -> ( ( k e. { M , N } |-> A ) |` { N } ) = ( k e. { N } |-> A ) ) |
40 |
38 39
|
mp1i |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( ( k e. { M , N } |-> A ) |` { N } ) = ( k e. { N } |-> A ) ) |
41 |
40
|
oveq2d |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( G gsum ( ( k e. { M , N } |-> A ) |` { N } ) ) = ( G gsum ( k e. { N } |-> A ) ) ) |
42 |
|
simp2 |
|- ( ( M e. V /\ N e. W /\ M =/= N ) -> N e. W ) |
43 |
|
simpr |
|- ( ( C e. B /\ D e. B ) -> D e. B ) |
44 |
1 4
|
gsumsn |
|- ( ( G e. Mnd /\ N e. W /\ D e. B ) -> ( G gsum ( k e. { N } |-> A ) ) = D ) |
45 |
32 42 43 44
|
syl3an |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( G gsum ( k e. { N } |-> A ) ) = D ) |
46 |
41 45
|
eqtrd |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( G gsum ( ( k e. { M , N } |-> A ) |` { N } ) ) = D ) |
47 |
37 46
|
oveq12d |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( ( G gsum ( ( k e. { M , N } |-> A ) |` { M } ) ) .+ ( G gsum ( ( k e. { M , N } |-> A ) |` { N } ) ) ) = ( C .+ D ) ) |
48 |
27 47
|
eqtrd |
|- ( ( G e. CMnd /\ ( M e. V /\ N e. W /\ M =/= N ) /\ ( C e. B /\ D e. B ) ) -> ( G gsum ( k e. { M , N } |-> A ) ) = ( C .+ D ) ) |