Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  gsumle Structured version   Visualization version   GIF version

Theorem gsumle 30927
Description: A finite sum in an ordered monoid is monotonic. This proof would be much easier in an ordered group, where an inverse element would be available. (Contributed by Thierry Arnoux, 13-Mar-2018.)
Hypotheses
Ref Expression
gsumle.b 𝐵 = (Base‘𝑀)
gsumle.l = (le‘𝑀)
gsumle.m (𝜑𝑀 ∈ oMnd)
gsumle.n (𝜑𝑀 ∈ CMnd)
gsumle.a (𝜑𝐴 ∈ Fin)
gsumle.f (𝜑𝐹:𝐴𝐵)
gsumle.g (𝜑𝐺:𝐴𝐵)
gsumle.c (𝜑𝐹r 𝐺)
Assertion
Ref Expression
gsumle (𝜑 → (𝑀 Σg 𝐹) (𝑀 Σg 𝐺))

Proof of Theorem gsumle
Dummy variables 𝑒 𝑎 𝑦 𝑧 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 gsumle.a . . 3 (𝜑𝐴 ∈ Fin)
2 ssid 3899 . . . 4 𝐴𝐴
3 sseq1 3902 . . . . . . . 8 (𝑎 = ∅ → (𝑎𝐴 ↔ ∅ ⊆ 𝐴))
43anbi2d 632 . . . . . . 7 (𝑎 = ∅ → ((𝜑𝑎𝐴) ↔ (𝜑 ∧ ∅ ⊆ 𝐴)))
5 reseq2 5820 . . . . . . . . 9 (𝑎 = ∅ → (𝐹𝑎) = (𝐹 ↾ ∅))
65oveq2d 7186 . . . . . . . 8 (𝑎 = ∅ → (𝑀 Σg (𝐹𝑎)) = (𝑀 Σg (𝐹 ↾ ∅)))
7 reseq2 5820 . . . . . . . . 9 (𝑎 = ∅ → (𝐺𝑎) = (𝐺 ↾ ∅))
87oveq2d 7186 . . . . . . . 8 (𝑎 = ∅ → (𝑀 Σg (𝐺𝑎)) = (𝑀 Σg (𝐺 ↾ ∅)))
96, 8breq12d 5043 . . . . . . 7 (𝑎 = ∅ → ((𝑀 Σg (𝐹𝑎)) (𝑀 Σg (𝐺𝑎)) ↔ (𝑀 Σg (𝐹 ↾ ∅)) (𝑀 Σg (𝐺 ↾ ∅))))
104, 9imbi12d 348 . . . . . 6 (𝑎 = ∅ → (((𝜑𝑎𝐴) → (𝑀 Σg (𝐹𝑎)) (𝑀 Σg (𝐺𝑎))) ↔ ((𝜑 ∧ ∅ ⊆ 𝐴) → (𝑀 Σg (𝐹 ↾ ∅)) (𝑀 Σg (𝐺 ↾ ∅)))))
11 sseq1 3902 . . . . . . . 8 (𝑎 = 𝑒 → (𝑎𝐴𝑒𝐴))
1211anbi2d 632 . . . . . . 7 (𝑎 = 𝑒 → ((𝜑𝑎𝐴) ↔ (𝜑𝑒𝐴)))
13 reseq2 5820 . . . . . . . . 9 (𝑎 = 𝑒 → (𝐹𝑎) = (𝐹𝑒))
1413oveq2d 7186 . . . . . . . 8 (𝑎 = 𝑒 → (𝑀 Σg (𝐹𝑎)) = (𝑀 Σg (𝐹𝑒)))
15 reseq2 5820 . . . . . . . . 9 (𝑎 = 𝑒 → (𝐺𝑎) = (𝐺𝑒))
1615oveq2d 7186 . . . . . . . 8 (𝑎 = 𝑒 → (𝑀 Σg (𝐺𝑎)) = (𝑀 Σg (𝐺𝑒)))
1714, 16breq12d 5043 . . . . . . 7 (𝑎 = 𝑒 → ((𝑀 Σg (𝐹𝑎)) (𝑀 Σg (𝐺𝑎)) ↔ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))))
1812, 17imbi12d 348 . . . . . 6 (𝑎 = 𝑒 → (((𝜑𝑎𝐴) → (𝑀 Σg (𝐹𝑎)) (𝑀 Σg (𝐺𝑎))) ↔ ((𝜑𝑒𝐴) → (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒)))))
19 sseq1 3902 . . . . . . . 8 (𝑎 = (𝑒 ∪ {𝑦}) → (𝑎𝐴 ↔ (𝑒 ∪ {𝑦}) ⊆ 𝐴))
2019anbi2d 632 . . . . . . 7 (𝑎 = (𝑒 ∪ {𝑦}) → ((𝜑𝑎𝐴) ↔ (𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴)))
21 reseq2 5820 . . . . . . . . 9 (𝑎 = (𝑒 ∪ {𝑦}) → (𝐹𝑎) = (𝐹 ↾ (𝑒 ∪ {𝑦})))
2221oveq2d 7186 . . . . . . . 8 (𝑎 = (𝑒 ∪ {𝑦}) → (𝑀 Σg (𝐹𝑎)) = (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))))
23 reseq2 5820 . . . . . . . . 9 (𝑎 = (𝑒 ∪ {𝑦}) → (𝐺𝑎) = (𝐺 ↾ (𝑒 ∪ {𝑦})))
2423oveq2d 7186 . . . . . . . 8 (𝑎 = (𝑒 ∪ {𝑦}) → (𝑀 Σg (𝐺𝑎)) = (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))))
2522, 24breq12d 5043 . . . . . . 7 (𝑎 = (𝑒 ∪ {𝑦}) → ((𝑀 Σg (𝐹𝑎)) (𝑀 Σg (𝐺𝑎)) ↔ (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦})))))
2620, 25imbi12d 348 . . . . . 6 (𝑎 = (𝑒 ∪ {𝑦}) → (((𝜑𝑎𝐴) → (𝑀 Σg (𝐹𝑎)) (𝑀 Σg (𝐺𝑎))) ↔ ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))))))
27 sseq1 3902 . . . . . . . 8 (𝑎 = 𝐴 → (𝑎𝐴𝐴𝐴))
2827anbi2d 632 . . . . . . 7 (𝑎 = 𝐴 → ((𝜑𝑎𝐴) ↔ (𝜑𝐴𝐴)))
29 reseq2 5820 . . . . . . . . 9 (𝑎 = 𝐴 → (𝐹𝑎) = (𝐹𝐴))
3029oveq2d 7186 . . . . . . . 8 (𝑎 = 𝐴 → (𝑀 Σg (𝐹𝑎)) = (𝑀 Σg (𝐹𝐴)))
31 reseq2 5820 . . . . . . . . 9 (𝑎 = 𝐴 → (𝐺𝑎) = (𝐺𝐴))
3231oveq2d 7186 . . . . . . . 8 (𝑎 = 𝐴 → (𝑀 Σg (𝐺𝑎)) = (𝑀 Σg (𝐺𝐴)))
3330, 32breq12d 5043 . . . . . . 7 (𝑎 = 𝐴 → ((𝑀 Σg (𝐹𝑎)) (𝑀 Σg (𝐺𝑎)) ↔ (𝑀 Σg (𝐹𝐴)) (𝑀 Σg (𝐺𝐴))))
3428, 33imbi12d 348 . . . . . 6 (𝑎 = 𝐴 → (((𝜑𝑎𝐴) → (𝑀 Σg (𝐹𝑎)) (𝑀 Σg (𝐺𝑎))) ↔ ((𝜑𝐴𝐴) → (𝑀 Σg (𝐹𝐴)) (𝑀 Σg (𝐺𝐴)))))
35 gsumle.m . . . . . . . . . 10 (𝜑𝑀 ∈ oMnd)
36 omndtos 30908 . . . . . . . . . 10 (𝑀 ∈ oMnd → 𝑀 ∈ Toset)
37 tospos 30818 . . . . . . . . . 10 (𝑀 ∈ Toset → 𝑀 ∈ Poset)
3835, 36, 373syl 18 . . . . . . . . 9 (𝜑𝑀 ∈ Poset)
39 res0 5829 . . . . . . . . . . . 12 (𝐹 ↾ ∅) = ∅
4039oveq2i 7181 . . . . . . . . . . 11 (𝑀 Σg (𝐹 ↾ ∅)) = (𝑀 Σg ∅)
41 eqid 2738 . . . . . . . . . . . 12 (0g𝑀) = (0g𝑀)
4241gsum0 18010 . . . . . . . . . . 11 (𝑀 Σg ∅) = (0g𝑀)
4340, 42eqtri 2761 . . . . . . . . . 10 (𝑀 Σg (𝐹 ↾ ∅)) = (0g𝑀)
44 omndmnd 30907 . . . . . . . . . . 11 (𝑀 ∈ oMnd → 𝑀 ∈ Mnd)
45 gsumle.b . . . . . . . . . . . 12 𝐵 = (Base‘𝑀)
4645, 41mndidcl 18042 . . . . . . . . . . 11 (𝑀 ∈ Mnd → (0g𝑀) ∈ 𝐵)
4735, 44, 463syl 18 . . . . . . . . . 10 (𝜑 → (0g𝑀) ∈ 𝐵)
4843, 47eqeltrid 2837 . . . . . . . . 9 (𝜑 → (𝑀 Σg (𝐹 ↾ ∅)) ∈ 𝐵)
49 gsumle.l . . . . . . . . . 10 = (le‘𝑀)
5045, 49posref 17677 . . . . . . . . 9 ((𝑀 ∈ Poset ∧ (𝑀 Σg (𝐹 ↾ ∅)) ∈ 𝐵) → (𝑀 Σg (𝐹 ↾ ∅)) (𝑀 Σg (𝐹 ↾ ∅)))
5138, 48, 50syl2anc 587 . . . . . . . 8 (𝜑 → (𝑀 Σg (𝐹 ↾ ∅)) (𝑀 Σg (𝐹 ↾ ∅)))
52 res0 5829 . . . . . . . . . 10 (𝐺 ↾ ∅) = ∅
5339, 52eqtr4i 2764 . . . . . . . . 9 (𝐹 ↾ ∅) = (𝐺 ↾ ∅)
5453oveq2i 7181 . . . . . . . 8 (𝑀 Σg (𝐹 ↾ ∅)) = (𝑀 Σg (𝐺 ↾ ∅))
5551, 54breqtrdi 5071 . . . . . . 7 (𝜑 → (𝑀 Σg (𝐹 ↾ ∅)) (𝑀 Σg (𝐺 ↾ ∅)))
5655adantr 484 . . . . . 6 ((𝜑 ∧ ∅ ⊆ 𝐴) → (𝑀 Σg (𝐹 ↾ ∅)) (𝑀 Σg (𝐺 ↾ ∅)))
57 ssun1 4062 . . . . . . . . . 10 𝑒 ⊆ (𝑒 ∪ {𝑦})
58 sstr2 3884 . . . . . . . . . 10 (𝑒 ⊆ (𝑒 ∪ {𝑦}) → ((𝑒 ∪ {𝑦}) ⊆ 𝐴𝑒𝐴))
5957, 58ax-mp 5 . . . . . . . . 9 ((𝑒 ∪ {𝑦}) ⊆ 𝐴𝑒𝐴)
6059anim2i 620 . . . . . . . 8 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝜑𝑒𝐴))
6160imim1i 63 . . . . . . 7 (((𝜑𝑒𝐴) → (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))))
62 simplr 769 . . . . . . . . . 10 ((((𝑒 ∈ Fin ∧ ¬ 𝑦𝑒) ∧ (𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴)) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴))
63 simpllr 776 . . . . . . . . . 10 ((((𝑒 ∈ Fin ∧ ¬ 𝑦𝑒) ∧ (𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴)) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → ¬ 𝑦𝑒)
64 simpr 488 . . . . . . . . . 10 ((((𝑒 ∈ Fin ∧ ¬ 𝑦𝑒) ∧ (𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴)) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒)))
65 eqid 2738 . . . . . . . . . . . 12 (+g𝑀) = (+g𝑀)
6635ad3antrrr 730 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → 𝑀 ∈ oMnd)
67 gsumle.g . . . . . . . . . . . . . . 15 (𝜑𝐺:𝐴𝐵)
6867ad2antrr 726 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝐺:𝐴𝐵)
69 simplr 769 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑒 ∪ {𝑦}) ⊆ 𝐴)
70 ssun2 4063 . . . . . . . . . . . . . . . . 17 {𝑦} ⊆ (𝑒 ∪ {𝑦})
71 vex 3402 . . . . . . . . . . . . . . . . . 18 𝑦 ∈ V
7271snss 4674 . . . . . . . . . . . . . . . . 17 (𝑦 ∈ (𝑒 ∪ {𝑦}) ↔ {𝑦} ⊆ (𝑒 ∪ {𝑦}))
7370, 72mpbir 234 . . . . . . . . . . . . . . . 16 𝑦 ∈ (𝑒 ∪ {𝑦})
7473a1i 11 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝑦 ∈ (𝑒 ∪ {𝑦}))
7569, 74sseldd 3878 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝑦𝐴)
7668, 75ffvelrnd 6862 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐺𝑦) ∈ 𝐵)
7776adantr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝐺𝑦) ∈ 𝐵)
78 gsumle.n . . . . . . . . . . . . . . 15 (𝜑𝑀 ∈ CMnd)
7978ad2antrr 726 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝑀 ∈ CMnd)
80 vex 3402 . . . . . . . . . . . . . . 15 𝑒 ∈ V
8180a1i 11 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝑒 ∈ V)
82 gsumle.f . . . . . . . . . . . . . . . 16 (𝜑𝐹:𝐴𝐵)
8382ad2antrr 726 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝐹:𝐴𝐵)
8457, 69sstrid 3888 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝑒𝐴)
8583, 84fssresd 6545 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐹𝑒):𝑒𝐵)
861ad2antrr 726 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝐴 ∈ Fin)
87 fvexd 6689 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (0g𝑀) ∈ V)
8883, 86, 87fdmfifsupp 8916 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝐹 finSupp (0g𝑀))
8988, 87fsuppres 8931 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐹𝑒) finSupp (0g𝑀))
9045, 41, 79, 81, 85, 89gsumcl 19154 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝐹𝑒)) ∈ 𝐵)
9190adantr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑀 Σg (𝐹𝑒)) ∈ 𝐵)
9283, 75ffvelrnd 6862 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐹𝑦) ∈ 𝐵)
9392adantr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝐹𝑦) ∈ 𝐵)
9468, 84fssresd 6545 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐺𝑒):𝑒𝐵)
95 ssfi 8772 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ Fin ∧ 𝑒𝐴) → 𝑒 ∈ Fin)
9686, 84, 95syl2anc 587 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝑒 ∈ Fin)
9794, 96, 87fdmfifsupp 8916 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐺𝑒) finSupp (0g𝑀))
9845, 41, 79, 81, 94, 97gsumcl 19154 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝐺𝑒)) ∈ 𝐵)
9998adantr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑀 Σg (𝐺𝑒)) ∈ 𝐵)
100 simpr 488 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒)))
101 simpll 767 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝜑)
102 gsumle.c . . . . . . . . . . . . . . 15 (𝜑𝐹r 𝐺)
103102ad2antrr 726 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝐹r 𝐺)
10482ffnd 6505 . . . . . . . . . . . . . . 15 (𝜑𝐹 Fn 𝐴)
10567ffnd 6505 . . . . . . . . . . . . . . 15 (𝜑𝐺 Fn 𝐴)
106 inidm 4109 . . . . . . . . . . . . . . 15 (𝐴𝐴) = 𝐴
107 eqidd 2739 . . . . . . . . . . . . . . 15 ((𝜑𝑦𝐴) → (𝐹𝑦) = (𝐹𝑦))
108 eqidd 2739 . . . . . . . . . . . . . . 15 ((𝜑𝑦𝐴) → (𝐺𝑦) = (𝐺𝑦))
109104, 105, 1, 1, 106, 107, 108ofrval 7436 . . . . . . . . . . . . . 14 ((𝜑𝐹r 𝐺𝑦𝐴) → (𝐹𝑦) (𝐺𝑦))
110101, 103, 75, 109syl3anc 1372 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐹𝑦) (𝐺𝑦))
111110adantr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝐹𝑦) (𝐺𝑦))
11279adantr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → 𝑀 ∈ CMnd)
11345, 49, 65, 66, 77, 91, 93, 99, 100, 111, 112omndadd2d 30911 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → ((𝑀 Σg (𝐹𝑒))(+g𝑀)(𝐹𝑦)) ((𝑀 Σg (𝐺𝑒))(+g𝑀)(𝐺𝑦)))
11496adantr 484 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → 𝑒 ∈ Fin)
11582ad2antrr 726 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑧𝑒) → 𝐹:𝐴𝐵)
116 simplr 769 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑧𝑒) → (𝑒 ∪ {𝑦}) ⊆ 𝐴)
117 elun1 4066 . . . . . . . . . . . . . . . . . . 19 (𝑧𝑒𝑧 ∈ (𝑒 ∪ {𝑦}))
118117adantl 485 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑧𝑒) → 𝑧 ∈ (𝑒 ∪ {𝑦}))
119116, 118sseldd 3878 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑧𝑒) → 𝑧𝐴)
120115, 119ffvelrnd 6862 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑧𝑒) → (𝐹𝑧) ∈ 𝐵)
121120ex 416 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑧𝑒 → (𝐹𝑧) ∈ 𝐵))
122121ad2antrr 726 . . . . . . . . . . . . . 14 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑧𝑒 → (𝐹𝑧) ∈ 𝐵))
123122imp 410 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) ∧ 𝑧𝑒) → (𝐹𝑧) ∈ 𝐵)
12471a1i 11 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → 𝑦 ∈ V)
125 simplr 769 . . . . . . . . . . . . 13 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → ¬ 𝑦𝑒)
126 fveq2 6674 . . . . . . . . . . . . 13 (𝑧 = 𝑦 → (𝐹𝑧) = (𝐹𝑦))
12745, 65, 112, 114, 123, 124, 125, 93, 126gsumunsn 19199 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑀 Σg (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐹𝑧))) = ((𝑀 Σg (𝑧𝑒 ↦ (𝐹𝑧)))(+g𝑀)(𝐹𝑦)))
12883, 69feqresmpt 6738 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐹 ↾ (𝑒 ∪ {𝑦})) = (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐹𝑧)))
129128oveq2d 7186 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) = (𝑀 Σg (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐹𝑧))))
13083, 84feqresmpt 6738 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐹𝑒) = (𝑧𝑒 ↦ (𝐹𝑧)))
131130oveq2d 7186 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝐹𝑒)) = (𝑀 Σg (𝑧𝑒 ↦ (𝐹𝑧))))
132131oveq1d 7185 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → ((𝑀 Σg (𝐹𝑒))(+g𝑀)(𝐹𝑦)) = ((𝑀 Σg (𝑧𝑒 ↦ (𝐹𝑧)))(+g𝑀)(𝐹𝑦)))
133129, 132eqeq12d 2754 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → ((𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) = ((𝑀 Σg (𝐹𝑒))(+g𝑀)(𝐹𝑦)) ↔ (𝑀 Σg (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐹𝑧))) = ((𝑀 Σg (𝑧𝑒 ↦ (𝐹𝑧)))(+g𝑀)(𝐹𝑦))))
134133adantr 484 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → ((𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) = ((𝑀 Σg (𝐹𝑒))(+g𝑀)(𝐹𝑦)) ↔ (𝑀 Σg (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐹𝑧))) = ((𝑀 Σg (𝑧𝑒 ↦ (𝐹𝑧)))(+g𝑀)(𝐹𝑦))))
135127, 134mpbird 260 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) = ((𝑀 Σg (𝐹𝑒))(+g𝑀)(𝐹𝑦)))
13667adantr 484 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → 𝐺:𝐴𝐵)
137136ad2antrr 726 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ 𝑧𝑒) → 𝐺:𝐴𝐵)
138119adantlr 715 . . . . . . . . . . . . . . . . 17 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ 𝑧𝑒) → 𝑧𝐴)
139137, 138ffvelrnd 6862 . . . . . . . . . . . . . . . 16 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ 𝑧𝑒) → (𝐺𝑧) ∈ 𝐵)
14071a1i 11 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝑦 ∈ V)
141 simpr 488 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → ¬ 𝑦𝑒)
142 fveq2 6674 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑦 → (𝐺𝑧) = (𝐺𝑦))
14345, 65, 79, 96, 139, 140, 141, 76, 142gsumunsn 19199 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐺𝑧))) = ((𝑀 Σg (𝑧𝑒 ↦ (𝐺𝑧)))(+g𝑀)(𝐺𝑦)))
144 simpr 488 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑒 ∪ {𝑦}) ⊆ 𝐴)
145136, 144feqresmpt 6738 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝐺 ↾ (𝑒 ∪ {𝑦})) = (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐺𝑧)))
146145oveq2d 7186 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))) = (𝑀 Σg (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐺𝑧))))
147 resabs1 5855 . . . . . . . . . . . . . . . . . . . . 21 (𝑒 ⊆ (𝑒 ∪ {𝑦}) → ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒) = (𝐺𝑒))
14857, 147mp1i 13 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒) = (𝐺𝑒))
14959adantl 485 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → 𝑒𝐴)
150136, 149feqresmpt 6738 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝐺𝑒) = (𝑧𝑒 ↦ (𝐺𝑧)))
151148, 150eqtrd 2773 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒) = (𝑧𝑒 ↦ (𝐺𝑧)))
152151oveq2d 7186 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒)) = (𝑀 Σg (𝑧𝑒 ↦ (𝐺𝑧))))
153 resabs1 5855 . . . . . . . . . . . . . . . . . . . . . 22 ({𝑦} ⊆ (𝑒 ∪ {𝑦}) → ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦}) = (𝐺 ↾ {𝑦}))
15470, 153mp1i 13 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦}) = (𝐺 ↾ {𝑦}))
15570, 144sstrid 3888 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → {𝑦} ⊆ 𝐴)
156136, 155feqresmpt 6738 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝐺 ↾ {𝑦}) = (𝑧 ∈ {𝑦} ↦ (𝐺𝑧)))
157154, 156eqtrd 2773 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦}) = (𝑧 ∈ {𝑦} ↦ (𝐺𝑧)))
158157oveq2d 7186 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦})) = (𝑀 Σg (𝑧 ∈ {𝑦} ↦ (𝐺𝑧))))
15935, 44syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝑀 ∈ Mnd)
160159adantr 484 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → 𝑀 ∈ Mnd)
16171a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → 𝑦 ∈ V)
16273a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → 𝑦 ∈ (𝑒 ∪ {𝑦}))
163144, 162sseldd 3878 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → 𝑦𝐴)
164136, 163ffvelrnd 6862 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝐺𝑦) ∈ 𝐵)
165142adantl 485 . . . . . . . . . . . . . . . . . . . 20 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ 𝑧 = 𝑦) → (𝐺𝑧) = (𝐺𝑦))
16645, 160, 161, 164, 165gsumsnd 19191 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg (𝑧 ∈ {𝑦} ↦ (𝐺𝑧))) = (𝐺𝑦))
167158, 166eqtrd 2773 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦})) = (𝐺𝑦))
168152, 167oveq12d 7188 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → ((𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒))(+g𝑀)(𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦}))) = ((𝑀 Σg (𝑧𝑒 ↦ (𝐺𝑧)))(+g𝑀)(𝐺𝑦)))
169146, 168eqeq12d 2754 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → ((𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))) = ((𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒))(+g𝑀)(𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦}))) ↔ (𝑀 Σg (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐺𝑧))) = ((𝑀 Σg (𝑧𝑒 ↦ (𝐺𝑧)))(+g𝑀)(𝐺𝑦))))
170169adantr 484 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → ((𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))) = ((𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒))(+g𝑀)(𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦}))) ↔ (𝑀 Σg (𝑧 ∈ (𝑒 ∪ {𝑦}) ↦ (𝐺𝑧))) = ((𝑀 Σg (𝑧𝑒 ↦ (𝐺𝑧)))(+g𝑀)(𝐺𝑦))))
171143, 170mpbird 260 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))) = ((𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒))(+g𝑀)(𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦}))))
17257, 147ax-mp 5 . . . . . . . . . . . . . . . 16 ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒) = (𝐺𝑒)
173172oveq2i 7181 . . . . . . . . . . . . . . 15 (𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒)) = (𝑀 Σg (𝐺𝑒))
17470, 153ax-mp 5 . . . . . . . . . . . . . . . 16 ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦}) = (𝐺 ↾ {𝑦})
175174oveq2i 7181 . . . . . . . . . . . . . . 15 (𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦})) = (𝑀 Σg (𝐺 ↾ {𝑦}))
176173, 175oveq12i 7182 . . . . . . . . . . . . . 14 ((𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ 𝑒))(+g𝑀)(𝑀 Σg ((𝐺 ↾ (𝑒 ∪ {𝑦})) ↾ {𝑦}))) = ((𝑀 Σg (𝐺𝑒))(+g𝑀)(𝑀 Σg (𝐺 ↾ {𝑦})))
177171, 176eqtrdi 2789 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))) = ((𝑀 Σg (𝐺𝑒))(+g𝑀)(𝑀 Σg (𝐺 ↾ {𝑦}))))
17870, 69sstrid 3888 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → {𝑦} ⊆ 𝐴)
17968, 178feqresmpt 6738 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝐺 ↾ {𝑦}) = (𝑥 ∈ {𝑦} ↦ (𝐺𝑥)))
180179oveq2d 7186 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝐺 ↾ {𝑦})) = (𝑀 Σg (𝑥 ∈ {𝑦} ↦ (𝐺𝑥))))
181 cmnmnd 19040 . . . . . . . . . . . . . . . . 17 (𝑀 ∈ CMnd → 𝑀 ∈ Mnd)
18279, 181syl 17 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → 𝑀 ∈ Mnd)
183 fveq2 6674 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑦 → (𝐺𝑥) = (𝐺𝑦))
18445, 183gsumsn 19193 . . . . . . . . . . . . . . . 16 ((𝑀 ∈ Mnd ∧ 𝑦 ∈ V ∧ (𝐺𝑦) ∈ 𝐵) → (𝑀 Σg (𝑥 ∈ {𝑦} ↦ (𝐺𝑥))) = (𝐺𝑦))
185182, 140, 76, 184syl3anc 1372 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝑥 ∈ {𝑦} ↦ (𝐺𝑥))) = (𝐺𝑦))
186180, 185eqtrd 2773 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝐺 ↾ {𝑦})) = (𝐺𝑦))
187186oveq2d 7186 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → ((𝑀 Σg (𝐺𝑒))(+g𝑀)(𝑀 Σg (𝐺 ↾ {𝑦}))) = ((𝑀 Σg (𝐺𝑒))(+g𝑀)(𝐺𝑦)))
188177, 187eqtrd 2773 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) → (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))) = ((𝑀 Σg (𝐺𝑒))(+g𝑀)(𝐺𝑦)))
189188adantr 484 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))) = ((𝑀 Σg (𝐺𝑒))(+g𝑀)(𝐺𝑦)))
190113, 135, 1893brtr4d 5062 . . . . . . . . . 10 ((((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) ∧ ¬ 𝑦𝑒) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))))
19162, 63, 64, 190syl21anc 837 . . . . . . . . 9 ((((𝑒 ∈ Fin ∧ ¬ 𝑦𝑒) ∧ (𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴)) ∧ (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))))
192191exp31 423 . . . . . . . 8 ((𝑒 ∈ Fin ∧ ¬ 𝑦𝑒) → ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → ((𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒)) → (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))))))
193192a2d 29 . . . . . . 7 ((𝑒 ∈ Fin ∧ ¬ 𝑦𝑒) → (((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))))))
19461, 193syl5 34 . . . . . 6 ((𝑒 ∈ Fin ∧ ¬ 𝑦𝑒) → (((𝜑𝑒𝐴) → (𝑀 Σg (𝐹𝑒)) (𝑀 Σg (𝐺𝑒))) → ((𝜑 ∧ (𝑒 ∪ {𝑦}) ⊆ 𝐴) → (𝑀 Σg (𝐹 ↾ (𝑒 ∪ {𝑦}))) (𝑀 Σg (𝐺 ↾ (𝑒 ∪ {𝑦}))))))
19510, 18, 26, 34, 56, 194findcard2s 8764 . . . . 5 (𝐴 ∈ Fin → ((𝜑𝐴𝐴) → (𝑀 Σg (𝐹𝐴)) (𝑀 Σg (𝐺𝐴))))
196195imp 410 . . . 4 ((𝐴 ∈ Fin ∧ (𝜑𝐴𝐴)) → (𝑀 Σg (𝐹𝐴)) (𝑀 Σg (𝐺𝐴)))
1972, 196mpanr2 704 . . 3 ((𝐴 ∈ Fin ∧ 𝜑) → (𝑀 Σg (𝐹𝐴)) (𝑀 Σg (𝐺𝐴)))
1981, 197mpancom 688 . 2 (𝜑 → (𝑀 Σg (𝐹𝐴)) (𝑀 Σg (𝐺𝐴)))
199 fnresdm 6455 . . . 4 (𝐹 Fn 𝐴 → (𝐹𝐴) = 𝐹)
200104, 199syl 17 . . 3 (𝜑 → (𝐹𝐴) = 𝐹)
201200oveq2d 7186 . 2 (𝜑 → (𝑀 Σg (𝐹𝐴)) = (𝑀 Σg 𝐹))
202 fnresdm 6455 . . . 4 (𝐺 Fn 𝐴 → (𝐺𝐴) = 𝐺)
203105, 202syl 17 . . 3 (𝜑 → (𝐺𝐴) = 𝐺)
204203oveq2d 7186 . 2 (𝜑 → (𝑀 Σg (𝐺𝐴)) = (𝑀 Σg 𝐺))
205198, 201, 2043brtr3d 5061 1 (𝜑 → (𝑀 Σg 𝐹) (𝑀 Σg 𝐺))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399   = wceq 1542  wcel 2114  Vcvv 3398  cun 3841  wss 3843  c0 4211  {csn 4516   class class class wbr 5030  cmpt 5110  cres 5527   Fn wfn 6334  wf 6335  cfv 6339  (class class class)co 7170  r cofr 7424  Fincfn 8555  Basecbs 16586  +gcplusg 16668  lecple 16675  0gc0g 16816   Σg cgsu 16817  Posetcpo 17666  Tosetctos 17759  Mndcmnd 18027  CMndccmn 19024  oMndcomnd 30900
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1975  ax-7 2020  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2162  ax-12 2179  ax-ext 2710  ax-rep 5154  ax-sep 5167  ax-nul 5174  ax-pow 5232  ax-pr 5296  ax-un 7479  ax-cnex 10671  ax-resscn 10672  ax-1cn 10673  ax-icn 10674  ax-addcl 10675  ax-addrcl 10676  ax-mulcl 10677  ax-mulrcl 10678  ax-mulcom 10679  ax-addass 10680  ax-mulass 10681  ax-distr 10682  ax-i2m1 10683  ax-1ne0 10684  ax-1rid 10685  ax-rnegex 10686  ax-rrecex 10687  ax-cnre 10688  ax-pre-lttri 10689  ax-pre-lttrn 10690  ax-pre-ltadd 10691  ax-pre-mulgt0 10692
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2075  df-mo 2540  df-eu 2570  df-clab 2717  df-cleq 2730  df-clel 2811  df-nfc 2881  df-ne 2935  df-nel 3039  df-ral 3058  df-rex 3059  df-reu 3060  df-rmo 3061  df-rab 3062  df-v 3400  df-sbc 3681  df-csb 3791  df-dif 3846  df-un 3848  df-in 3850  df-ss 3860  df-pss 3862  df-nul 4212  df-if 4415  df-pw 4490  df-sn 4517  df-pr 4519  df-tp 4521  df-op 4523  df-uni 4797  df-int 4837  df-iun 4883  df-iin 4884  df-br 5031  df-opab 5093  df-mpt 5111  df-tr 5137  df-id 5429  df-eprel 5434  df-po 5442  df-so 5443  df-fr 5483  df-se 5484  df-we 5485  df-xp 5531  df-rel 5532  df-cnv 5533  df-co 5534  df-dm 5535  df-rn 5536  df-res 5537  df-ima 5538  df-pred 6129  df-ord 6175  df-on 6176  df-lim 6177  df-suc 6178  df-iota 6297  df-fun 6341  df-fn 6342  df-f 6343  df-f1 6344  df-fo 6345  df-f1o 6346  df-fv 6347  df-isom 6348  df-riota 7127  df-ov 7173  df-oprab 7174  df-mpo 7175  df-of 7425  df-ofr 7426  df-om 7600  df-1st 7714  df-2nd 7715  df-supp 7857  df-wrecs 7976  df-recs 8037  df-rdg 8075  df-1o 8131  df-er 8320  df-en 8556  df-dom 8557  df-sdom 8558  df-fin 8559  df-fsupp 8907  df-oi 9047  df-card 9441  df-pnf 10755  df-mnf 10756  df-xr 10757  df-ltxr 10758  df-le 10759  df-sub 10950  df-neg 10951  df-nn 11717  df-2 11779  df-n0 11977  df-z 12063  df-uz 12325  df-fz 12982  df-fzo 13125  df-seq 13461  df-hash 13783  df-ndx 16589  df-slot 16590  df-base 16592  df-sets 16593  df-ress 16594  df-plusg 16681  df-0g 16818  df-gsum 16819  df-mre 16960  df-mrc 16961  df-acs 16963  df-proset 17654  df-poset 17672  df-toset 17760  df-mgm 17968  df-sgrp 18017  df-mnd 18028  df-submnd 18073  df-mulg 18343  df-cntz 18565  df-cmn 19026  df-omnd 30902
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator