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

Theorem suppgsumssiun 33401
Description: The support of a function defined as a group sum is a subset of the indexed union of the supports. (Contributed by Thierry Arnoux, 16-Mar-2026.)
Hypotheses
Ref Expression
suppgsumssiun.1 𝑍 = (0g𝑀)
suppgsumssiun.2 (𝜑𝑀 ∈ Mnd)
suppgsumssiun.3 (𝜑𝐵𝑊)
suppgsumssiun.4 (𝜑𝐴𝑉)
suppgsumssiun.5 (((𝜑𝑥𝐴) ∧ 𝑦𝐵) → 𝐶𝑋)
Assertion
Ref Expression
suppgsumssiun (𝜑 → ((𝑥𝐴 ↦ (𝑀 Σg (𝑦𝐵𝐶))) supp 𝑍) ⊆ 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))
Distinct variable groups:   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦   𝑦,𝑀   𝑦,𝑊   𝑥,𝑍   𝜑,𝑥,𝑦
Allowed substitution hints:   𝐶(𝑥, 𝑦)   𝑀(𝑥)   𝑉(𝑥, 𝑦)   𝑊(𝑥)   𝑋(𝑥, 𝑦)   𝑍(𝑦)

Proof of Theorem suppgsumssiun
StepHypRef Expression
1 nfv 1943 . 2 𝑥𝜑
2 nfcv 2924 . 2 𝑥𝐴
3 nfcv 2924 . . 3 𝑥𝐵
4 nfmpt1 5209 . . . 4 𝑥(𝑥𝐴𝐶)
5 nfcv 2924 . . . 4 𝑥 supp
6 nfcv 2924 . . . 4 𝑥𝑍
74, 5, 6nfov 7442 . . 3 𝑥((𝑥𝐴𝐶) supp 𝑍)
83, 7nfiun 4987 . 2 𝑥 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍)
9 mpt0 6677 . . . . . . 7 (𝑦 ∈ ∅ ↦ 𝐶) = ∅
109oveq2i 7423 . . . . . 6 (𝑀 Σg (𝑦 ∈ ∅ ↦ 𝐶)) = (𝑀 Σg ∅)
11 suppgsumssiun.1 . . . . . . 7 𝑍 = (0g𝑀)
1211gsum0 18748 . . . . . 6 (𝑀 Σg ∅) = 𝑍
1310, 12eqtri 2785 . . . . 5 (𝑀 Σg (𝑦 ∈ ∅ ↦ 𝐶)) = 𝑍
14 mpteq1 5199 . . . . . . 7 (𝐵 = ∅ → (𝑦𝐵𝐶) = (𝑦 ∈ ∅ ↦ 𝐶))
1514oveq2d 7428 . . . . . 6 (𝐵 = ∅ → (𝑀 Σg (𝑦𝐵𝐶)) = (𝑀 Σg (𝑦 ∈ ∅ ↦ 𝐶)))
1615adantl 486 . . . . 5 (((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 = ∅) → (𝑀 Σg (𝑦𝐵𝐶)) = (𝑀 Σg (𝑦 ∈ ∅ ↦ 𝐶)))
17 suppgsumssiun.2 . . . . . . . 8 (𝜑𝑀 ∈ Mnd)
18 suppgsumssiun.3 . . . . . . . 8 (𝜑𝐵𝑊)
1911gsumz 18901 . . . . . . . 8 ((𝑀 ∈ Mnd ∧ 𝐵𝑊) → (𝑀 Σg (𝑦𝐵𝑍)) = 𝑍)
2017, 18, 19syl2anc 595 . . . . . . 7 (𝜑 → (𝑀 Σg (𝑦𝐵𝑍)) = 𝑍)
2120adantr 485 . . . . . 6 ((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) → (𝑀 Σg (𝑦𝐵𝑍)) = 𝑍)
2221adantr 485 . . . . 5 (((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 = ∅) → (𝑀 Σg (𝑦𝐵𝑍)) = 𝑍)
2313, 16, 223eqtr4a 2823 . . . 4 (((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 = ∅) → (𝑀 Σg (𝑦𝐵𝐶)) = (𝑀 Σg (𝑦𝐵𝑍)))
24 nfv 1943 . . . . . . . 8 𝑦𝜑
25 nfcv 2924 . . . . . . . . . 10 𝑦𝐴
26 nfiu1 4991 . . . . . . . . . 10 𝑦 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍)
2725, 26nfdif 4083 . . . . . . . . 9 𝑦(𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))
2827nfcri 2916 . . . . . . . 8 𝑦 𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))
2924, 28nfan 1928 . . . . . . 7 𝑦(𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍)))
30 nfv 1943 . . . . . . 7 𝑦 𝐵 ≠ ∅
3129, 30nfan 1928 . . . . . 6 𝑦((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅)
32 simpllr 787 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → 𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍)))
33 iindif2 5042 . . . . . . . . . . 11 (𝐵 ≠ ∅ → 𝑦𝐵 (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)) = (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍)))
3433ad2antlr 739 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → 𝑦𝐵 (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)) = (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍)))
3532, 34eleqtrrd 2865 . . . . . . . . 9 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → 𝑥 𝑦𝐵 (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)))
36 eliin 4960 . . . . . . . . . . 11 (𝑥 𝑦𝐵 (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)) → (𝑥 𝑦𝐵 (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)) ↔ ∀𝑦𝐵 𝑥 ∈ (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍))))
3736ibi 270 . . . . . . . . . 10 (𝑥 𝑦𝐵 (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)) → ∀𝑦𝐵 𝑥 ∈ (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)))
3837r19.21bi 3256 . . . . . . . . 9 ((𝑥 𝑦𝐵 (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)) ∧ 𝑦𝐵) → 𝑥 ∈ (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)))
3935, 38sylancom 599 . . . . . . . 8 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → 𝑥 ∈ (𝐴 ∖ ((𝑥𝐴𝐶) supp 𝑍)))
4039eldifbd 3917 . . . . . . 7 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → ¬ 𝑥 ∈ ((𝑥𝐴𝐶) supp 𝑍))
4132eldifad 3916 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → 𝑥𝐴)
42 nfv 1943 . . . . . . . . . . . . 13 𝑥((𝜑𝐵 ≠ ∅) ∧ 𝑦𝐵)
43 suppgsumssiun.5 . . . . . . . . . . . . . . 15 (((𝜑𝑥𝐴) ∧ 𝑦𝐵) → 𝐶𝑋)
4443an32s 664 . . . . . . . . . . . . . 14 (((𝜑𝑦𝐵) ∧ 𝑥𝐴) → 𝐶𝑋)
4544adantllr 731 . . . . . . . . . . . . 13 ((((𝜑𝐵 ≠ ∅) ∧ 𝑦𝐵) ∧ 𝑥𝐴) → 𝐶𝑋)
46 eqid 2762 . . . . . . . . . . . . 13 (𝑥𝐴𝐶) = (𝑥𝐴𝐶)
4742, 45, 46fnmptd 6676 . . . . . . . . . . . 12 (((𝜑𝐵 ≠ ∅) ∧ 𝑦𝐵) → (𝑥𝐴𝐶) Fn 𝐴)
4847adantllr 731 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → (𝑥𝐴𝐶) Fn 𝐴)
49 suppgsumssiun.4 . . . . . . . . . . . 12 (𝜑𝐴𝑉)
5049ad3antrrr 742 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → 𝐴𝑉)
51 eqid 2762 . . . . . . . . . . . . . 14 (Base‘𝑀) = (Base‘𝑀)
5251, 11mndidcl 18813 . . . . . . . . . . . . 13 (𝑀 ∈ Mnd → 𝑍 ∈ (Base‘𝑀))
5317, 52syl 18 . . . . . . . . . . . 12 (𝜑𝑍 ∈ (Base‘𝑀))
5453ad3antrrr 742 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → 𝑍 ∈ (Base‘𝑀))
55 elsuppfn 8164 . . . . . . . . . . 11 (((𝑥𝐴𝐶) Fn 𝐴𝐴𝑉𝑍 ∈ (Base‘𝑀)) → (𝑥 ∈ ((𝑥𝐴𝐶) supp 𝑍) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐶)‘𝑥) ≠ 𝑍)))
5648, 50, 54, 55syl3anc 1397 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → (𝑥 ∈ ((𝑥𝐴𝐶) supp 𝑍) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐶)‘𝑥) ≠ 𝑍)))
5741, 56mpbirand 719 . . . . . . . . 9 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → (𝑥 ∈ ((𝑥𝐴𝐶) supp 𝑍) ↔ ((𝑥𝐴𝐶)‘𝑥) ≠ 𝑍))
58 difssd 4090 . . . . . . . . . . . . . 14 (𝜑 → (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍)) ⊆ 𝐴)
5958sselda 3936 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) → 𝑥𝐴)
6059, 43syldanl 613 . . . . . . . . . . . 12 (((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝑦𝐵) → 𝐶𝑋)
6160adantlr 727 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → 𝐶𝑋)
6246fvmpt2 7001 . . . . . . . . . . 11 ((𝑥𝐴𝐶𝑋) → ((𝑥𝐴𝐶)‘𝑥) = 𝐶)
6341, 61, 62syl2anc 595 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → ((𝑥𝐴𝐶)‘𝑥) = 𝐶)
6463neeq1d 3016 . . . . . . . . 9 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → (((𝑥𝐴𝐶)‘𝑥) ≠ 𝑍𝐶𝑍))
6557, 64bitrd 282 . . . . . . . 8 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → (𝑥 ∈ ((𝑥𝐴𝐶) supp 𝑍) ↔ 𝐶𝑍))
6665necon2bbid 3000 . . . . . . 7 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → (𝐶 = 𝑍 ↔ ¬ 𝑥 ∈ ((𝑥𝐴𝐶) supp 𝑍)))
6740, 66mpbird 260 . . . . . 6 ((((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) ∧ 𝑦𝐵) → 𝐶 = 𝑍)
6831, 67mpteq2da 5202 . . . . 5 (((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) → (𝑦𝐵𝐶) = (𝑦𝐵𝑍))
6968oveq2d 7428 . . . 4 (((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) ∧ 𝐵 ≠ ∅) → (𝑀 Σg (𝑦𝐵𝐶)) = (𝑀 Σg (𝑦𝐵𝑍)))
7023, 69pm2.61dane 3044 . . 3 ((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) → (𝑀 Σg (𝑦𝐵𝐶)) = (𝑀 Σg (𝑦𝐵𝑍)))
7170, 21eqtrd 2797 . 2 ((𝜑𝑥 ∈ (𝐴 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))) → (𝑀 Σg (𝑦𝐵𝐶)) = 𝑍)
721, 2, 8, 71, 49suppss2f 32994 1 (𝜑 → ((𝑥𝐴 ↦ (𝑀 Σg (𝑦𝐵𝐶))) supp 𝑍) ⊆ 𝑦𝐵 ((𝑥𝐴𝐶) supp 𝑍))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wb 209  wa 400   = wceq 1569  wcel 2142  wne 2957  wral 3078  cdif 3901  wss 3904  c0 4285   ciun 4955   ciin 4956  cmpt 5191   Fn wfn 6531  cfv 6536  (class class class)co 7412   supp csupp 8154  Basecbs 17275  0gc0g 17498   Σg cgsu 17499  Mndcmnd 18798
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1824  ax-4 1838  ax-5 1939  ax-6 1996  ax-7 2037  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-rep 5237  ax-sep 5256  ax-nul 5268  ax-pow 5335  ax-pr 5403  ax-un 7734
This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1104  df-tru 1572  df-fal 1582  df-ex 1809  df-nf 1813  df-sb 2096  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3456  df-sbc 3744  df-csb 3853  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4487  df-pw 4563  df-sn 4589  df-pr 4591  df-op 4595  df-uni 4872  df-iun 4957  df-iin 4958  df-br 5109  df-opab 5173  df-mpt 5192  df-id 5555  df-xp 5666  df-rel 5667  df-cnv 5668  df-co 5669  df-dm 5670  df-rn 5671  df-res 5672  df-ima 5673  df-pred 6302  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-supp 8155  df-frecs 8276  df-wrecs 8307  df-recs 8356  df-rdg 8395  df-seq 14045  df-0g 17500  df-gsum 17501  df-mgm 18704  df-sgrp 18783  df-mnd 18799
This theorem is used by:  psrmonprod  33951
  Copyright terms: Public domain W3C validator