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

Theorem gsumpt 19194
Description: Sum of a family that is nonzero at at most one point. (Contributed by Stefan O'Rear, 7-Feb-2015.) (Revised by Mario Carneiro, 25-Apr-2016.) (Revised by AV, 6-Jun-2019.)
Hypotheses
Ref Expression
gsumpt.b 𝐵 = (Base‘𝐺)
gsumpt.z 0 = (0g𝐺)
gsumpt.g (𝜑𝐺 ∈ Mnd)
gsumpt.a (𝜑𝐴𝑉)
gsumpt.x (𝜑𝑋𝐴)
gsumpt.f (𝜑𝐹:𝐴𝐵)
gsumpt.s (𝜑 → (𝐹 supp 0 ) ⊆ {𝑋})
Assertion
Ref Expression
gsumpt (𝜑 → (𝐺 Σg 𝐹) = (𝐹𝑋))

Proof of Theorem gsumpt
Dummy variable 𝑎 is distinct from all other variables.
StepHypRef Expression
1 gsumpt.f . . . 4 (𝜑𝐹:𝐴𝐵)
2 gsumpt.x . . . . 5 (𝜑𝑋𝐴)
32snssd 4694 . . . 4 (𝜑 → {𝑋} ⊆ 𝐴)
41, 3feqresmpt 6732 . . 3 (𝜑 → (𝐹 ↾ {𝑋}) = (𝑎 ∈ {𝑋} ↦ (𝐹𝑎)))
54oveq2d 7180 . 2 (𝜑 → (𝐺 Σg (𝐹 ↾ {𝑋})) = (𝐺 Σg (𝑎 ∈ {𝑋} ↦ (𝐹𝑎))))
6 gsumpt.b . . 3 𝐵 = (Base‘𝐺)
7 gsumpt.z . . 3 0 = (0g𝐺)
8 eqid 2738 . . 3 (Cntz‘𝐺) = (Cntz‘𝐺)
9 gsumpt.g . . 3 (𝜑𝐺 ∈ Mnd)
10 gsumpt.a . . 3 (𝜑𝐴𝑉)
111, 2ffvelrnd 6856 . . . . . . . 8 (𝜑 → (𝐹𝑋) ∈ 𝐵)
12 eqidd 2739 . . . . . . . 8 (𝜑 → ((𝐹𝑋)(+g𝐺)(𝐹𝑋)) = ((𝐹𝑋)(+g𝐺)(𝐹𝑋)))
13 eqid 2738 . . . . . . . . . 10 (+g𝐺) = (+g𝐺)
146, 13, 8elcntzsn 18566 . . . . . . . . 9 ((𝐹𝑋) ∈ 𝐵 → ((𝐹𝑋) ∈ ((Cntz‘𝐺)‘{(𝐹𝑋)}) ↔ ((𝐹𝑋) ∈ 𝐵 ∧ ((𝐹𝑋)(+g𝐺)(𝐹𝑋)) = ((𝐹𝑋)(+g𝐺)(𝐹𝑋)))))
1511, 14syl 17 . . . . . . . 8 (𝜑 → ((𝐹𝑋) ∈ ((Cntz‘𝐺)‘{(𝐹𝑋)}) ↔ ((𝐹𝑋) ∈ 𝐵 ∧ ((𝐹𝑋)(+g𝐺)(𝐹𝑋)) = ((𝐹𝑋)(+g𝐺)(𝐹𝑋)))))
1611, 12, 15mpbir2and 713 . . . . . . 7 (𝜑 → (𝐹𝑋) ∈ ((Cntz‘𝐺)‘{(𝐹𝑋)}))
1716snssd 4694 . . . . . 6 (𝜑 → {(𝐹𝑋)} ⊆ ((Cntz‘𝐺)‘{(𝐹𝑋)}))
18 eqid 2738 . . . . . . 7 (mrCls‘(SubMnd‘𝐺)) = (mrCls‘(SubMnd‘𝐺))
19 eqid 2738 . . . . . . 7 (𝐺s ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)})) = (𝐺s ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
208, 18, 19cntzspan 19076 . . . . . 6 ((𝐺 ∈ Mnd ∧ {(𝐹𝑋)} ⊆ ((Cntz‘𝐺)‘{(𝐹𝑋)})) → (𝐺s ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)})) ∈ CMnd)
219, 17, 20syl2anc 587 . . . . 5 (𝜑 → (𝐺s ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)})) ∈ CMnd)
226submacs 18100 . . . . . . . 8 (𝐺 ∈ Mnd → (SubMnd‘𝐺) ∈ (ACS‘𝐵))
23 acsmre 17019 . . . . . . . 8 ((SubMnd‘𝐺) ∈ (ACS‘𝐵) → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
249, 22, 233syl 18 . . . . . . 7 (𝜑 → (SubMnd‘𝐺) ∈ (Moore‘𝐵))
2511snssd 4694 . . . . . . 7 (𝜑 → {(𝐹𝑋)} ⊆ 𝐵)
2618mrccl 16978 . . . . . . 7 (((SubMnd‘𝐺) ∈ (Moore‘𝐵) ∧ {(𝐹𝑋)} ⊆ 𝐵) → ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ∈ (SubMnd‘𝐺))
2724, 25, 26syl2anc 587 . . . . . 6 (𝜑 → ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ∈ (SubMnd‘𝐺))
2819, 8submcmn2 19071 . . . . . 6 (((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ∈ (SubMnd‘𝐺) → ((𝐺s ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)})) ∈ CMnd ↔ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ⊆ ((Cntz‘𝐺)‘((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))))
2927, 28syl 17 . . . . 5 (𝜑 → ((𝐺s ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)})) ∈ CMnd ↔ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ⊆ ((Cntz‘𝐺)‘((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))))
3021, 29mpbid 235 . . . 4 (𝜑 → ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ⊆ ((Cntz‘𝐺)‘((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)})))
311ffnd 6499 . . . . . 6 (𝜑𝐹 Fn 𝐴)
32 simpr 488 . . . . . . . . . 10 (((𝜑𝑎𝐴) ∧ 𝑎 = 𝑋) → 𝑎 = 𝑋)
3332fveq2d 6672 . . . . . . . . 9 (((𝜑𝑎𝐴) ∧ 𝑎 = 𝑋) → (𝐹𝑎) = (𝐹𝑋))
3424, 18, 25mrcssidd 16992 . . . . . . . . . . 11 (𝜑 → {(𝐹𝑋)} ⊆ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
35 fvex 6681 . . . . . . . . . . . 12 (𝐹𝑋) ∈ V
3635snss 4671 . . . . . . . . . . 11 ((𝐹𝑋) ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ↔ {(𝐹𝑋)} ⊆ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
3734, 36sylibr 237 . . . . . . . . . 10 (𝜑 → (𝐹𝑋) ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
3837ad2antrr 726 . . . . . . . . 9 (((𝜑𝑎𝐴) ∧ 𝑎 = 𝑋) → (𝐹𝑋) ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
3933, 38eqeltrd 2833 . . . . . . . 8 (((𝜑𝑎𝐴) ∧ 𝑎 = 𝑋) → (𝐹𝑎) ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
40 eldifsn 4672 . . . . . . . . . . 11 (𝑎 ∈ (𝐴 ∖ {𝑋}) ↔ (𝑎𝐴𝑎𝑋))
41 gsumpt.s . . . . . . . . . . . 12 (𝜑 → (𝐹 supp 0 ) ⊆ {𝑋})
427fvexi 6682 . . . . . . . . . . . . 13 0 ∈ V
4342a1i 11 . . . . . . . . . . . 12 (𝜑0 ∈ V)
441, 41, 10, 43suppssr 7884 . . . . . . . . . . 11 ((𝜑𝑎 ∈ (𝐴 ∖ {𝑋})) → (𝐹𝑎) = 0 )
4540, 44sylan2br 598 . . . . . . . . . 10 ((𝜑 ∧ (𝑎𝐴𝑎𝑋)) → (𝐹𝑎) = 0 )
467subm0cl 18085 . . . . . . . . . . . 12 (((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ∈ (SubMnd‘𝐺) → 0 ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
4727, 46syl 17 . . . . . . . . . . 11 (𝜑0 ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
4847adantr 484 . . . . . . . . . 10 ((𝜑 ∧ (𝑎𝐴𝑎𝑋)) → 0 ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
4945, 48eqeltrd 2833 . . . . . . . . 9 ((𝜑 ∧ (𝑎𝐴𝑎𝑋)) → (𝐹𝑎) ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
5049anassrs 471 . . . . . . . 8 (((𝜑𝑎𝐴) ∧ 𝑎𝑋) → (𝐹𝑎) ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
5139, 50pm2.61dane 3021 . . . . . . 7 ((𝜑𝑎𝐴) → (𝐹𝑎) ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
5251ralrimiva 3096 . . . . . 6 (𝜑 → ∀𝑎𝐴 (𝐹𝑎) ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
53 ffnfv 6886 . . . . . 6 (𝐹:𝐴⟶((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ↔ (𝐹 Fn 𝐴 ∧ ∀𝑎𝐴 (𝐹𝑎) ∈ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)})))
5431, 52, 53sylanbrc 586 . . . . 5 (𝜑𝐹:𝐴⟶((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
5554frnd 6506 . . . 4 (𝜑 → ran 𝐹 ⊆ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}))
568cntzidss 18579 . . . 4 ((((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)}) ⊆ ((Cntz‘𝐺)‘((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)})) ∧ ran 𝐹 ⊆ ((mrCls‘(SubMnd‘𝐺))‘{(𝐹𝑋)})) → ran 𝐹 ⊆ ((Cntz‘𝐺)‘ran 𝐹))
5730, 55, 56syl2anc 587 . . 3 (𝜑 → ran 𝐹 ⊆ ((Cntz‘𝐺)‘ran 𝐹))
581ffund 6502 . . . 4 (𝜑 → Fun 𝐹)
59 snfi 8635 . . . . 5 {𝑋} ∈ Fin
60 ssfi 8765 . . . . 5 (({𝑋} ∈ Fin ∧ (𝐹 supp 0 ) ⊆ {𝑋}) → (𝐹 supp 0 ) ∈ Fin)
6159, 41, 60sylancr 590 . . . 4 (𝜑 → (𝐹 supp 0 ) ∈ Fin)
621, 10fexd 6994 . . . . 5 (𝜑𝐹 ∈ V)
63 isfsupp 8903 . . . . 5 ((𝐹 ∈ V ∧ 0 ∈ V) → (𝐹 finSupp 0 ↔ (Fun 𝐹 ∧ (𝐹 supp 0 ) ∈ Fin)))
6462, 43, 63syl2anc 587 . . . 4 (𝜑 → (𝐹 finSupp 0 ↔ (Fun 𝐹 ∧ (𝐹 supp 0 ) ∈ Fin)))
6558, 61, 64mpbir2and 713 . . 3 (𝜑𝐹 finSupp 0 )
666, 7, 8, 9, 10, 1, 57, 41, 65gsumzres 19141 . 2 (𝜑 → (𝐺 Σg (𝐹 ↾ {𝑋})) = (𝐺 Σg 𝐹))
67 fveq2 6668 . . . 4 (𝑎 = 𝑋 → (𝐹𝑎) = (𝐹𝑋))
686, 67gsumsn 19186 . . 3 ((𝐺 ∈ Mnd ∧ 𝑋𝐴 ∧ (𝐹𝑋) ∈ 𝐵) → (𝐺 Σg (𝑎 ∈ {𝑋} ↦ (𝐹𝑎))) = (𝐹𝑋))
699, 2, 11, 68syl3anc 1372 . 2 (𝜑 → (𝐺 Σg (𝑎 ∈ {𝑋} ↦ (𝐹𝑎))) = (𝐹𝑋))
705, 66, 693eqtr3d 2781 1 (𝜑 → (𝐺 Σg 𝐹) = (𝐹𝑋))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 399   = wceq 1542  wcel 2113  wne 2934  wral 3053  Vcvv 3397  cdif 3838  wss 3841  {csn 4513   class class class wbr 5027  cmpt 5107  ran crn 5520  cres 5521  Fun wfun 6327   Fn wfn 6328  wf 6329  cfv 6333  (class class class)co 7164   supp csupp 7849  Fincfn 8548   finSupp cfsupp 8899  Basecbs 16579  s cress 16580  +gcplusg 16661  0gc0g 16809   Σg cgsu 16810  Moorecmre 16949  mrClscmrc 16950  ACScacs 16952  Mndcmnd 18020  SubMndcsubmnd 18064  Cntzccntz 18556  CMndccmn 19017
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 1916  ax-6 1974  ax-7 2019  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2161  ax-12 2178  ax-ext 2710  ax-rep 5151  ax-sep 5164  ax-nul 5171  ax-pow 5229  ax-pr 5293  ax-un 7473  ax-cnex 10664  ax-resscn 10665  ax-1cn 10666  ax-icn 10667  ax-addcl 10668  ax-addrcl 10669  ax-mulcl 10670  ax-mulrcl 10671  ax-mulcom 10672  ax-addass 10673  ax-mulass 10674  ax-distr 10675  ax-i2m1 10676  ax-1ne0 10677  ax-1rid 10678  ax-rnegex 10679  ax-rrecex 10680  ax-cnre 10681  ax-pre-lttri 10682  ax-pre-lttrn 10683  ax-pre-ltadd 10684  ax-pre-mulgt0 10685
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 2074  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 3399  df-sbc 3680  df-csb 3789  df-dif 3844  df-un 3846  df-in 3848  df-ss 3858  df-pss 3860  df-nul 4210  df-if 4412  df-pw 4487  df-sn 4514  df-pr 4516  df-tp 4518  df-op 4520  df-uni 4794  df-int 4834  df-iun 4880  df-iin 4881  df-br 5028  df-opab 5090  df-mpt 5108  df-tr 5134  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  df-se 5479  df-we 5480  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-pred 6123  df-ord 6169  df-on 6170  df-lim 6171  df-suc 6172  df-iota 6291  df-fun 6335  df-fn 6336  df-f 6337  df-f1 6338  df-fo 6339  df-f1o 6340  df-fv 6341  df-isom 6342  df-riota 7121  df-ov 7167  df-oprab 7168  df-mpo 7169  df-om 7594  df-1st 7707  df-2nd 7708  df-supp 7850  df-wrecs 7969  df-recs 8030  df-rdg 8068  df-1o 8124  df-er 8313  df-en 8549  df-dom 8550  df-sdom 8551  df-fin 8552  df-fsupp 8900  df-oi 9040  df-card 9434  df-pnf 10748  df-mnf 10749  df-xr 10750  df-ltxr 10751  df-le 10752  df-sub 10943  df-neg 10944  df-nn 11710  df-2 11772  df-n0 11970  df-z 12056  df-uz 12318  df-fz 12975  df-fzo 13118  df-seq 13454  df-hash 13776  df-ndx 16582  df-slot 16583  df-base 16585  df-sets 16586  df-ress 16587  df-plusg 16674  df-0g 16811  df-gsum 16812  df-mre 16953  df-mrc 16954  df-acs 16956  df-mgm 17961  df-sgrp 18010  df-mnd 18021  df-submnd 18066  df-mulg 18336  df-cntz 18558  df-cmn 19019
This theorem is referenced by:  gsummpt1n0  19197  dprdfid  19251  uvcresum  20602  frlmup2  20608  evlslem3  20887  evlslem1  20889  coe1tmmul2  21044  coe1tmmul  21045  mamulid  21185  mamurid  21186  coe1mul3  24844  tayl0  25101  jensen  25718  linc1  45284
  Copyright terms: Public domain W3C validator