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

Theorem gsumval2a 18540
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 2736 . . . 4 (0g𝐺) = (0g𝐺)
3 gsumval2.p . . . 4 + = (+g𝐺)
4 gsumval2a.o . . . 4 𝑂 = {𝑥𝐵 ∣ ∀𝑦𝐵 ((𝑥 + 𝑦) = 𝑦 ∧ (𝑦 + 𝑥) = 𝑦)}
5 eqidd 2737 . . . 4 (𝜑 → (𝐹 “ (V ∖ 𝑂)) = (𝐹 “ (V ∖ 𝑂)))
6 gsumval2.g . . . 4 (𝜑𝐺𝑉)
7 ovexd 7392 . . . 4 (𝜑 → (𝑀...𝑁) ∈ V)
8 gsumval2.f . . . 4 (𝜑𝐹:(𝑀...𝑁)⟶𝐵)
91, 2, 3, 4, 5, 6, 7, 8gsumval 18532 . . 3 (𝜑 → (𝐺 Σg 𝐹) = if(ran 𝐹𝑂, (0g𝐺), if((𝑀...𝑁) ∈ ran ..., (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))), (℩𝑧𝑓(𝑓:(1...(♯‘(𝐹 “ (V ∖ 𝑂))))–1-1-onto→(𝐹 “ (V ∖ 𝑂)) ∧ 𝑧 = (seq1( + , (𝐹𝑓))‘(♯‘(𝐹 “ (V ∖ 𝑂)))))))))
10 gsumval2a.f . . . . 5 (𝜑 → ¬ ran 𝐹𝑂)
1110iffalsed 4497 . . . 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 13428 . . . . . . 7 ...:(ℤ × ℤ)⟶𝒫 ℤ
13 ffn 6668 . . . . . . 7 (...:(ℤ × ℤ)⟶𝒫 ℤ → ... Fn (ℤ × ℤ))
1412, 13ax-mp 5 . . . . . 6 ... Fn (ℤ × ℤ)
15 gsumval2.n . . . . . . 7 (𝜑𝑁 ∈ (ℤ𝑀))
16 eluzel2 12768 . . . . . . 7 (𝑁 ∈ (ℤ𝑀) → 𝑀 ∈ ℤ)
1715, 16syl 17 . . . . . 6 (𝜑𝑀 ∈ ℤ)
18 eluzelz 12773 . . . . . . 7 (𝑁 ∈ (ℤ𝑀) → 𝑁 ∈ ℤ)
1915, 18syl 17 . . . . . 6 (𝜑𝑁 ∈ ℤ)
20 fnovrn 7529 . . . . . 6 ((... Fn (ℤ × ℤ) ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀...𝑁) ∈ ran ...)
2114, 17, 19, 20mp3an2i 1466 . . . . 5 (𝜑 → (𝑀...𝑁) ∈ ran ...)
2221iftrued 4494 . . . 4 (𝜑 → if((𝑀...𝑁) ∈ ran ..., (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))), (℩𝑧𝑓(𝑓:(1...(♯‘(𝐹 “ (V ∖ 𝑂))))–1-1-onto→(𝐹 “ (V ∖ 𝑂)) ∧ 𝑧 = (seq1( + , (𝐹𝑓))‘(♯‘(𝐹 “ (V ∖ 𝑂))))))) = (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
2311, 22eqtrd 2776 . . 3 (𝜑 → if(ran 𝐹𝑂, (0g𝐺), if((𝑀...𝑁) ∈ ran ..., (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))), (℩𝑧𝑓(𝑓:(1...(♯‘(𝐹 “ (V ∖ 𝑂))))–1-1-onto→(𝐹 “ (V ∖ 𝑂)) ∧ 𝑧 = (seq1( + , (𝐹𝑓))‘(♯‘(𝐹 “ (V ∖ 𝑂)))))))) = (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
249, 23eqtrd 2776 . 2 (𝜑 → (𝐺 Σg 𝐹) = (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
25 fvex 6855 . . 3 (seq𝑀( + , 𝐹)‘𝑁) ∈ V
26 fzopth 13478 . . . . . . . . . . 11 (𝑁 ∈ (ℤ𝑀) → ((𝑀...𝑁) = (𝑚...𝑛) ↔ (𝑀 = 𝑚𝑁 = 𝑛)))
2715, 26syl 17 . . . . . . . . . 10 (𝜑 → ((𝑀...𝑁) = (𝑚...𝑛) ↔ (𝑀 = 𝑚𝑁 = 𝑛)))
28 simpl 483 . . . . . . . . . . . . . 14 ((𝑀 = 𝑚𝑁 = 𝑛) → 𝑀 = 𝑚)
2928seqeq1d 13912 . . . . . . . . . . . . 13 ((𝑀 = 𝑚𝑁 = 𝑛) → seq𝑀( + , 𝐹) = seq𝑚( + , 𝐹))
30 simpr 485 . . . . . . . . . . . . 13 ((𝑀 = 𝑚𝑁 = 𝑛) → 𝑁 = 𝑛)
3129, 30fveq12d 6849 . . . . . . . . . . . 12 ((𝑀 = 𝑚𝑁 = 𝑛) → (seq𝑀( + , 𝐹)‘𝑁) = (seq𝑚( + , 𝐹)‘𝑛))
3231eqcomd 2742 . . . . . . . . . . 11 ((𝑀 = 𝑚𝑁 = 𝑛) → (seq𝑚( + , 𝐹)‘𝑛) = (seq𝑀( + , 𝐹)‘𝑁))
33 eqeq1 2740 . . . . . . . . . . 11 (𝑧 = (seq𝑚( + , 𝐹)‘𝑛) → (𝑧 = (seq𝑀( + , 𝐹)‘𝑁) ↔ (seq𝑚( + , 𝐹)‘𝑛) = (seq𝑀( + , 𝐹)‘𝑁)))
3432, 33syl5ibrcom 246 . . . . . . . . . 10 ((𝑀 = 𝑚𝑁 = 𝑛) → (𝑧 = (seq𝑚( + , 𝐹)‘𝑛) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
3527, 34syl6bi 252 . . . . . . . . 9 (𝜑 → ((𝑀...𝑁) = (𝑚...𝑛) → (𝑧 = (seq𝑚( + , 𝐹)‘𝑛) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁))))
3635impd 411 . . . . . . . 8 (𝜑 → (((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
3736rexlimdvw 3157 . . . . . . 7 (𝜑 → (∃𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
3837exlimdv 1936 . . . . . 6 (𝜑 → (∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) → 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
3917adantr 481 . . . . . . . 8 ((𝜑𝑧 = (seq𝑀( + , 𝐹)‘𝑁)) → 𝑀 ∈ ℤ)
40 oveq2 7365 . . . . . . . . . . . . 13 (𝑛 = 𝑁 → (𝑀...𝑛) = (𝑀...𝑁))
4140eqcomd 2742 . . . . . . . . . . . 12 (𝑛 = 𝑁 → (𝑀...𝑁) = (𝑀...𝑛))
4241biantrurd 533 . . . . . . . . . . 11 (𝑛 = 𝑁 → (𝑧 = (seq𝑀( + , 𝐹)‘𝑛) ↔ ((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛))))
43 fveq2 6842 . . . . . . . . . . . 12 (𝑛 = 𝑁 → (seq𝑀( + , 𝐹)‘𝑛) = (seq𝑀( + , 𝐹)‘𝑁))
4443eqeq2d 2747 . . . . . . . . . . 11 (𝑛 = 𝑁 → (𝑧 = (seq𝑀( + , 𝐹)‘𝑛) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
4542, 44bitr3d 280 . . . . . . . . . 10 (𝑛 = 𝑁 → (((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
4645rspcev 3581 . . . . . . . . 9 ((𝑁 ∈ (ℤ𝑀) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)) → ∃𝑛 ∈ (ℤ𝑀)((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)))
4715, 46sylan 580 . . . . . . . 8 ((𝜑𝑧 = (seq𝑀( + , 𝐹)‘𝑁)) → ∃𝑛 ∈ (ℤ𝑀)((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)))
48 fveq2 6842 . . . . . . . . . 10 (𝑚 = 𝑀 → (ℤ𝑚) = (ℤ𝑀))
49 oveq1 7364 . . . . . . . . . . . 12 (𝑚 = 𝑀 → (𝑚...𝑛) = (𝑀...𝑛))
5049eqeq2d 2747 . . . . . . . . . . 11 (𝑚 = 𝑀 → ((𝑀...𝑁) = (𝑚...𝑛) ↔ (𝑀...𝑁) = (𝑀...𝑛)))
51 seqeq1 13909 . . . . . . . . . . . . 13 (𝑚 = 𝑀 → seq𝑚( + , 𝐹) = seq𝑀( + , 𝐹))
5251fveq1d 6844 . . . . . . . . . . . 12 (𝑚 = 𝑀 → (seq𝑚( + , 𝐹)‘𝑛) = (seq𝑀( + , 𝐹)‘𝑛))
5352eqeq2d 2747 . . . . . . . . . . 11 (𝑚 = 𝑀 → (𝑧 = (seq𝑚( + , 𝐹)‘𝑛) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)))
5450, 53anbi12d 631 . . . . . . . . . 10 (𝑚 = 𝑀 → (((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) ↔ ((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛))))
5548, 54rexeqbidv 3320 . . . . . . . . 9 (𝑚 = 𝑀 → (∃𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) ↔ ∃𝑛 ∈ (ℤ𝑀)((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛))))
5655spcegv 3556 . . . . . . . 8 (𝑀 ∈ ℤ → (∃𝑛 ∈ (ℤ𝑀)((𝑀...𝑁) = (𝑀...𝑛) ∧ 𝑧 = (seq𝑀( + , 𝐹)‘𝑛)) → ∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
5739, 47, 56sylc 65 . . . . . . 7 ((𝜑𝑧 = (seq𝑀( + , 𝐹)‘𝑁)) → ∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)))
5857ex 413 . . . . . 6 (𝜑 → (𝑧 = (seq𝑀( + , 𝐹)‘𝑁) → ∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))))
5938, 58impbid 211 . . . . 5 (𝜑 → (∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
6059adantr 481 . . . 4 ((𝜑 ∧ (seq𝑀( + , 𝐹)‘𝑁) ∈ V) → (∃𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛)) ↔ 𝑧 = (seq𝑀( + , 𝐹)‘𝑁)))
6160iota5 6479 . . 3 ((𝜑 ∧ (seq𝑀( + , 𝐹)‘𝑁) ∈ V) → (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))) = (seq𝑀( + , 𝐹)‘𝑁))
6225, 61mpan2 689 . 2 (𝜑 → (℩𝑧𝑚𝑛 ∈ (ℤ𝑚)((𝑀...𝑁) = (𝑚...𝑛) ∧ 𝑧 = (seq𝑚( + , 𝐹)‘𝑛))) = (seq𝑀( + , 𝐹)‘𝑁))
6324, 62eqtrd 2776 1 (𝜑 → (𝐺 Σg 𝐹) = (seq𝑀( + , 𝐹)‘𝑁))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 396   = wceq 1541  wex 1781  wcel 2106  wral 3064  wrex 3073  {crab 3407  Vcvv 3445  cdif 3907  wss 3910  ifcif 4486  𝒫 cpw 4560   × cxp 5631  ccnv 5632  ran crn 5634  cima 5636  ccom 5637  cio 6446   Fn wfn 6491  wf 6492  1-1-ontowf1o 6495  cfv 6496  (class class class)co 7357  1c1 11052  cz 12499  cuz 12763  ...cfz 13424  seqcseq 13906  chash 14230  Basecbs 17083  +gcplusg 17133  0gc0g 17321   Σg cgsu 17322
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-sep 5256  ax-nul 5263  ax-pow 5320  ax-pr 5384  ax-un 7672  ax-cnex 11107  ax-resscn 11108  ax-pre-lttri 11125  ax-pre-lttrn 11126
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3065  df-rex 3074  df-rab 3408  df-v 3447  df-sbc 3740  df-csb 3856  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-nul 4283  df-if 4487  df-pw 4562  df-sn 4587  df-pr 4589  df-op 4593  df-uni 4866  df-iun 4956  df-br 5106  df-opab 5168  df-mpt 5189  df-id 5531  df-po 5545  df-so 5546  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-rn 5644  df-res 5645  df-ima 5646  df-pred 6253  df-iota 6448  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-ov 7360  df-oprab 7361  df-mpo 7362  df-1st 7921  df-2nd 7922  df-frecs 8212  df-wrecs 8243  df-recs 8317  df-rdg 8356  df-er 8648  df-en 8884  df-dom 8885  df-sdom 8886  df-pnf 11191  df-mnf 11192  df-xr 11193  df-ltxr 11194  df-le 11195  df-neg 11388  df-z 12500  df-uz 12764  df-fz 13425  df-seq 13907  df-gsum 17324
This theorem is referenced by:  gsumval2  18541
  Copyright terms: Public domain W3C validator