MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  gsumval2a Structured version   Visualization version   GIF version

Theorem gsumval2a 18600
Description: Value of the group sum operation over a finite set of sequential integers. (Contributed by Mario Carneiro, 7-Dec-2014.)
Hypotheses
Ref Expression
gsumval2.b 𝐵 = (Base‘𝐺)
gsumval2.p + = (+g𝐺)
gsumval2.g (𝜑𝐺𝑉)
gsumval2.n (𝜑𝑁 ∈ (ℤ𝑀))
gsumval2.f (𝜑𝐹:(𝑀...𝑁)⟶𝐵)
gsumval2a.o 𝑂 = {𝑥𝐵 ∣ ∀𝑦𝐵 ((𝑥 + 𝑦) = 𝑦 ∧ (𝑦 + 𝑥) = 𝑦)}
gsumval2a.f (𝜑 → ¬ ran 𝐹𝑂)
Assertion
Ref Expression
gsumval2a (𝜑 → (𝐺 Σg 𝐹) = (seq𝑀( + , 𝐹)‘𝑁))
Distinct variable groups:   𝑥,𝑦,𝐵   𝑥,𝐺,𝑦   𝑥,𝑉   𝑥, + ,𝑦
Allowed substitution hints:   𝜑(𝑥,𝑦)   𝐹(𝑥,𝑦)   𝑀(𝑥,𝑦)   𝑁(𝑥,𝑦)   𝑂(𝑥,𝑦)   𝑉(𝑦)

Proof of Theorem gsumval2a
Dummy variables 𝑧 𝑓 𝑚 𝑛 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 gsumval2.b . . . 4 𝐵 = (Base‘𝐺)
2 eqid 2733 . . . 4 (0g𝐺) = (0g𝐺)
3 gsumval2.p . . . 4 + = (+g𝐺)
4 gsumval2a.o . . . 4 𝑂 = {𝑥𝐵 ∣ ∀𝑦𝐵 ((𝑥 + 𝑦) = 𝑦 ∧ (𝑦 + 𝑥) = 𝑦)}
5 eqidd 2734 . . . 4 (𝜑 → (𝐹 “ (V ∖ 𝑂)) = (𝐹 “ (V ∖ 𝑂)))
6 gsumval2.g . . . 4 (𝜑𝐺𝑉)
7 ovexd 7439 . . . 4 (𝜑 → (𝑀...𝑁) ∈ V)
8 gsumval2.f . . . 4 (𝜑𝐹:(𝑀...𝑁)⟶𝐵)
91, 2, 3, 4, 5, 6, 7, 8gsumval 18592 . . 3 (𝜑 → (𝐺 Σg 𝐹) = if(ran 𝐹𝑂, (0g𝐺), if((𝑀...𝑁) ∈ ran ..., (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))), (℩𝑧𝑓(𝑓:(1...(♯‘(𝐹 “ (V ∖ 𝑂))))–1-1-onto→(𝐹 “ (V ∖ 𝑂)) ∧ 𝑧 = (seq1( + , (𝐹𝑓))‘(♯‘(𝐹 “ (V ∖ 𝑂)))))))))
10 gsumval2a.f . . . . 5 (𝜑 → ¬ ran 𝐹𝑂)
1110iffalsed 4538 . . . 4 (𝜑 → if(ran 𝐹𝑂, (0g𝐺), if((𝑀...𝑁) ∈ ran ..., (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))), (℩𝑧𝑓(𝑓:(1...(♯‘(𝐹 “ (V ∖ 𝑂))))–1-1-onto→(𝐹 “ (V ∖ 𝑂)) ∧ 𝑧 = (seq1( + , (𝐹𝑓))‘(♯‘(𝐹 “ (V ∖ 𝑂)))))))) = if((𝑀...𝑁) ∈ ran ..., (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))), (℩𝑧𝑓(𝑓:(1...(♯‘(𝐹 “ (V ∖ 𝑂))))–1-1-onto→(𝐹 “ (V ∖ 𝑂)) ∧ 𝑧 = (seq1( + , (𝐹𝑓))‘(♯‘(𝐹 “ (V ∖ 𝑂))))))))
12 fzf 13484 . . . . . . 7 ...:(ℤ × ℤ)⟶𝒫 ℤ
13 ffn 6714 . . . . . . 7 (...:(ℤ × ℤ)⟶𝒫 ℤ → ... Fn (ℤ × ℤ))
1412, 13ax-mp 5 . . . . . 6 ... Fn (ℤ × ℤ)
15 gsumval2.n . . . . . . 7 (𝜑𝑁 ∈ (ℤ𝑀))
16 eluzel2 12823 . . . . . . 7 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ ℤ)
1715, 16syl 17 . . . . . 6 (𝜑𝑀 ∈ ℤ)
18 eluzelz 12828 . . . . . . 7 (𝑁 ∈ (ℤ𝑀) → 𝑁 ∈ ℤ)
1915, 18syl 17 . . . . . 6 (𝜑𝑁 ∈ ℤ)
20 fnovrn 7577 . . . . . 6 ((... Fn (ℤ × ℤ) ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀...𝑁) ∈ ran ...)
2114, 17, 19, 20mp3an2i 1467 . . . . 5 (𝜑 → (𝑀...𝑁) ∈ ran ...)
2221iftrued 4535 . . . 4 (𝜑 → if((𝑀...𝑁) ∈ ran ..., (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))), (℩𝑧𝑓(𝑓:(1...(♯‘(𝐹 “ (V ∖ 𝑂))))–1-1-onto→(𝐹 “ (V ∖ 𝑂)) ∧ 𝑧 = (seq1( + , (𝐹𝑓))‘(♯‘(𝐹 “ (V ∖ 𝑂))))))) = (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
2311, 22eqtrd 2773 . . 3 (𝜑 → if(ran 𝐹𝑂, (0g𝐺), if((𝑀...𝑁) ∈ ran ..., (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))), (℩𝑧𝑓(𝑓:(1...(♯‘(𝐹 “ (V ∖ 𝑂))))–1-1-onto→(𝐹 “ (V ∖ 𝑂)) ∧ 𝑧 = (seq1( + , (𝐹𝑓))‘(♯‘(𝐹 “ (V ∖ 𝑂)))))))) = (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
249, 23eqtrd 2773 . 2 (𝜑 → (𝐺 Σg 𝐹) = (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
25 fvex 6901 . . 3 (seq𝑀( + , 𝐹)‘𝑁) ∈ V
26 fzopth 13534 . . . . . . . . . . 11 (𝑁 ∈ (ℤ𝑀) → ((𝑀...𝑁) = (𝑚...𝑛) ↔ (𝑀 = 𝑚𝑁 = 𝑛)))
2715, 26syl 17 . . . . . . . . . 10 (𝜑 → ((𝑀...𝑁) = (𝑚...𝑛) ↔ (𝑀 = 𝑚𝑁 = 𝑛)))
28 simpl 484 . . . . . . . . . . . . . 14 ((𝑀 = 𝑚𝑁 = 𝑛) → 𝑀 = 𝑚)
2928seqeq1d 13968 . . . . . . . . . . . . 13 ((𝑀 = 𝑚𝑁 = 𝑛) → seq𝑀( + , 𝐹) = seq𝑚( + , 𝐹))
30 simpr 486 . . . . . . . . . . . . 13 ((𝑀 = 𝑚𝑁 = 𝑛) → 𝑁 = 𝑛)
3129, 30fveq12d 6895 . . . . . . . . . . . 12 ((𝑀 = 𝑚𝑁 = 𝑛) → (seq𝑀( + , 𝐹)‘𝑁) = (seq𝑚( + , 𝐹)‘𝑛))
3231eqcomd 2739 . . . . . . . . . . 11 ((𝑀 = 𝑚𝑁 = 𝑛) → (seq𝑚( + , 𝐹)‘𝑛) = (seq𝑀( + , 𝐹)‘𝑁))
33 eqeq1 2737 . . . . . . . . . . 11 (𝑧 = (seq𝑚( + , 𝐹)‘𝑛) → (𝑧 = (seq𝑀( + , 𝐹)‘𝑁) ↔ (seq𝑚( + , 𝐹)‘𝑛) = (seq𝑀( + , 𝐹)‘𝑁)))
3432, 33syl5ibrcom 246 . . . . . . . . . 10 ((𝑀 = 𝑚𝑁 = 𝑛) → (𝑧 = (seq𝑚( + , 𝐹)‘𝑛) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
3527, 34syl6bi 253 . . . . . . . . 9 (𝜑 → ((𝑀...𝑁) = (𝑚...𝑛) → (𝑧 = (seq𝑚( + , 𝐹)‘𝑛) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁))))
3635impd 412 . . . . . . . 8 (𝜑 → (((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
3736rexlimdvw 3161 . . . . . . 7 (𝜑 → (∃𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
3837exlimdv 1937 . . . . . 6 (𝜑 → (∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
3917adantr 482 . . . . . . . 8 ((𝜑𝑧 = (seq𝑀( + , 𝐹)‘𝑁)) → 𝑀 ∈ ℤ)
40 oveq2 7412 . . . . . . . . . . . . 13 (𝑛 = 𝑁 → (𝑀...𝑛) = (𝑀...𝑁))
4140eqcomd 2739 . . . . . . . . . . . 12 (𝑛 = 𝑁 → (𝑀...𝑁) = (𝑀...𝑛))
4241biantrurd 534 . . . . . . . . . . 11 (𝑛 = 𝑁 → (𝑧 = (seq𝑀( + , 𝐹)‘𝑛) ↔ ((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛))))
43 fveq2 6888 . . . . . . . . . . . 12 (𝑛 = 𝑁 → (seq𝑀( + , 𝐹)‘𝑛) = (seq𝑀( + , 𝐹)‘𝑁))
4443eqeq2d 2744 . . . . . . . . . . 11 (𝑛 = 𝑁 → (𝑧 = (seq𝑀( + , 𝐹)‘𝑛) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
4542, 44bitr3d 281 . . . . . . . . . 10 (𝑛 = 𝑁 → (((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
4645rspcev 3612 . . . . . . . . 9 ((𝑁 ∈ (ℤ𝑀) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)) → ∃𝑛 ∈ (ℤ𝑀)((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)))
4715, 46sylan 581 . . . . . . . 8 ((𝜑𝑧 = (seq𝑀( + , 𝐹)‘𝑁)) → ∃𝑛 ∈ (ℤ𝑀)((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)))
48 fveq2 6888 . . . . . . . . . 10 (𝑚 = 𝑀 → (ℤ𝑚) = (ℤ𝑀))
49 oveq1 7411 . . . . . . . . . . . 12 (𝑚 = 𝑀 → (𝑚...𝑛) = (𝑀...𝑛))
5049eqeq2d 2744 . . . . . . . . . . 11 (𝑚 = 𝑀 → ((𝑀...𝑁) = (𝑚...𝑛) ↔ (𝑀...𝑁) = (𝑀...𝑛)))
51 seqeq1 13965 . . . . . . . . . . . . 13 (𝑚 = 𝑀 → seq𝑚( + , 𝐹) = seq𝑀( + , 𝐹))
5251fveq1d 6890 . . . . . . . . . . . 12 (𝑚 = 𝑀 → (seq𝑚( + , 𝐹)‘𝑛) = (seq𝑀( + , 𝐹)‘𝑛))
5352eqeq2d 2744 . . . . . . . . . . 11 (𝑚 = 𝑀 → (𝑧 = (seq𝑚( + , 𝐹)‘𝑛) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)))
5450, 53anbi12d 632 . . . . . . . . . 10 (𝑚 = 𝑀 → (((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) ↔ ((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛))))
5548, 54rexeqbidv 3344 . . . . . . . . 9 (𝑚 = 𝑀 → (∃𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) ↔ ∃𝑛 ∈ (ℤ𝑀)((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛))))
5655spcegv 3587 . . . . . . . 8 (𝑀 ∈ ℤ → (∃𝑛 ∈ (ℤ𝑀)((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)) → ∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
5739, 47, 56sylc 65 . . . . . . 7 ((𝜑𝑧 = (seq𝑀( + , 𝐹)‘𝑁)) → ∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)))
5857ex 414 . . . . . 6 (𝜑 → (𝑧 = (seq𝑀( + , 𝐹)‘𝑁) → ∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
5938, 58impbid 211 . . . . 5 (𝜑 → (∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
6059adantr 482 . . . 4 ((𝜑 ∧ (seq𝑀( + , 𝐹)‘𝑁) ∈ V) → (∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
6160iota5 6523 . . 3 ((𝜑 ∧ (seq𝑀( + , 𝐹)‘𝑁) ∈ V) → (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))) = (seq𝑀( + , 𝐹)‘𝑁))
6225, 61mpan2 690 . 2 (𝜑 → (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))) = (seq𝑀( + , 𝐹)‘𝑁))
6324, 62eqtrd 2773 1 (𝜑 → (𝐺 Σg 𝐹) = (seq𝑀( + , 𝐹)‘𝑁))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 397   = wceq 1542  wex 1782  wcel 2107  wral 3062  wrex 3071  {crab 3433  Vcvv 3475  cdif 3944  wss 3947  ifcif 4527  𝒫 cpw 4601   × cxp 5673  ccnv 5674  ran crn 5676  cima 5678  ccom 5679  cio 6490   Fn wfn 6535  wf 6536  1-1-ontowf1o 6539  cfv 6540  (class class class)co 7404  1c1 11107  cz 12554  cuz 12818  ...cfz 13480  seqcseq 13962  chash 14286  Basecbs 17140  +gcplusg 17193  0gc0g 17381   Σg cgsu 17382
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7720  ax-cnex 11162  ax-resscn 11163  ax-pre-lttri 11180  ax-pre-lttrn 11181
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rab 3434  df-v 3477  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-id 5573  df-po 5587  df-so 5588  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-ov 7407  df-oprab 7408  df-mpo 7409  df-1st 7970  df-2nd 7971  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-er 8699  df-en 8936  df-dom 8937  df-sdom 8938  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-neg 11443  df-z 12555  df-uz 12819  df-fz 13481  df-seq 13963  df-gsum 17384
This theorem is referenced by:  gsumval2  18601
  Copyright terms: Public domain W3C validator