ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  gzsumsplit0 GIF version

Theorem gzsumsplit0 14238
Description: Splitting off the rightmost summand of a group sum (even if it is the only summand). Similar to gzsumsplit1r 13774 except that 𝑁 can equal 𝑀 − 1. (Contributed by Jim Kingdon, 4-Apr-2026.)
Hypotheses
Ref Expression
gzsumsplit0.b 𝐵 = (Base‘𝐺)
gzsumsplit0.p + = (+g‘𝐺)
gzsumsplit0.g (𝜑 → 𝐺 ∈ Mnd)
gzsumsplit0.m (𝜑 → 𝑀 ∈ ℤ)
gzsumsplit0.n (𝜑 → 𝑁 ∈ (ℤ≥‘(𝑀 − 1)))
gzsumsplit0.f (𝜑 → 𝐹:(𝑀...(𝑁 + 1))⟶𝐵)
Assertion
Ref Expression
gzsumsplit0 (𝜑 → (𝐺 Σgz 𝐹) = ((𝐺 Σgz (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))))

Proof of Theorem gzsumsplit0
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 simpr 110 . . . . . 6 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑁 = (𝑀 − 1))
21oveq1d 6103 . . . . 5 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) = ((𝑀 − 1) + 1))
3 gzsumsplit0.m . . . . . . . 8 (𝜑 → 𝑀 ∈ ℤ)
43zcnd 9780 . . . . . . 7 (𝜑 → 𝑀 ∈ ℂ)
5 1cnd 8348 . . . . . . 7 (𝜑 → 1 ∈ ℂ)
64, 5npcand 8648 . . . . . 6 (𝜑 → ((𝑀 − 1) + 1) = 𝑀)
76adantr 276 . . . . 5 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((𝑀 − 1) + 1) = 𝑀)
82, 7eqtrd 2271 . . . 4 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) = 𝑀)
98fveq2d 5702 . . 3 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹‘(𝑁 + 1)) = (𝐹‘𝑀))
103zred 9779 . . . . . . . . . . . . 13 (𝜑 → 𝑀 ∈ ℝ)
1110ltm1d 9270 . . . . . . . . . . . 12 (𝜑 → (𝑀 − 1) < 𝑀)
1211adantr 276 . . . . . . . . . . 11 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀 − 1) < 𝑀)
131, 12eqbrtrd 4153 . . . . . . . . . 10 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑁 < 𝑀)
14 peano2zm 9693 . . . . . . . . . . . . . 14 (𝑀 ∈ ℤ → (𝑀 − 1) ∈ ℤ)
153, 14syl 14 . . . . . . . . . . . . 13 (𝜑 → (𝑀 − 1) ∈ ℤ)
1615adantr 276 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀 − 1) ∈ ℤ)
171, 16eqeltrd 2315 . . . . . . . . . . 11 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑁 ∈ ℤ)
18 fzn 10463 . . . . . . . . . . 11 ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 < 𝑀 ↔ (𝑀...𝑁) = ∅))
193, 17, 18syl2an2r 603 . . . . . . . . . 10 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 < 𝑀 ↔ (𝑀...𝑁) = ∅))
2013, 19mpbid 147 . . . . . . . . 9 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀...𝑁) = ∅)
2120reseq2d 5065 . . . . . . . 8 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹 ↾ (𝑀...𝑁)) = (𝐹 ↾ ∅))
22 res0 5069 . . . . . . . 8 (𝐹 ↾ ∅) = ∅
2321, 22eqtrdi 2287 . . . . . . 7 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹 ↾ (𝑀...𝑁)) = ∅)
2423oveq2d 6104 . . . . . 6 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σgz (𝐹 ↾ (𝑀...𝑁))) = (𝐺 Σgz ∅))
25 gzsumsplit0.g . . . . . . . 8 (𝜑 → 𝐺 ∈ Mnd)
2625adantr 276 . . . . . . 7 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐺 ∈ Mnd)
27 eqid 2238 . . . . . . . 8 (0g‘𝐺) = (0g‘𝐺)
2827gzsum0 13772 . . . . . . 7 (𝐺 ∈ Mnd → (𝐺 Σgz ∅) = (0g‘𝐺))
2926, 28syl 14 . . . . . 6 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σgz ∅) = (0g‘𝐺))
3024, 29eqtrd 2271 . . . . 5 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σgz (𝐹 ↾ (𝑀...𝑁))) = (0g‘𝐺))
3130oveq1d 6103 . . . 4 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((𝐺 Σgz (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))) = ((0g‘𝐺) + (𝐹‘(𝑁 + 1))))
32 gzsumsplit0.f . . . . . . 7 (𝜑 → 𝐹:(𝑀...(𝑁 + 1))⟶𝐵)
3332adantr 276 . . . . . 6 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶𝐵)
343adantr 276 . . . . . . . 8 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑀 ∈ ℤ)
358, 34eqeltrd 2315 . . . . . . . 8 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) ∈ ℤ)
368eqcomd 2244 . . . . . . . . 9 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑀 = (𝑁 + 1))
37 eqle 8423 . . . . . . . . 9 ((𝑀 ∈ ℝ ∧ 𝑀 = (𝑁 + 1)) → 𝑀 ≤ (𝑁 + 1))
3810, 36, 37syl2an2r 603 . . . . . . . 8 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑀 ≤ (𝑁 + 1))
39 eluz2 9943 . . . . . . . 8 ((𝑁 + 1) ∈ (ℤ≥‘𝑀) ↔ (𝑀 ∈ ℤ ∧ (𝑁 + 1) ∈ ℤ ∧ 𝑀 ≤ (𝑁 + 1)))
4034, 35, 38, 39syl3anbrc 1212 . . . . . . 7 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) ∈ (ℤ≥‘𝑀))
41 eluzfz2 10453 . . . . . . 7 ((𝑁 + 1) ∈ (ℤ≥‘𝑀) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
4240, 41syl 14 . . . . . 6 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
4333, 42ffvelcdmd 5847 . . . . 5 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹‘(𝑁 + 1)) ∈ 𝐵)
44 gzsumsplit0.b . . . . . 6 𝐵 = (Base‘𝐺)
45 gzsumsplit0.p . . . . . 6 + = (+g‘𝐺)
4644, 45, 27mndlid 13807 . . . . 5 ((𝐺 ∈ Mnd ∧ (𝐹‘(𝑁 + 1)) ∈ 𝐵) → ((0g‘𝐺) + (𝐹‘(𝑁 + 1))) = (𝐹‘(𝑁 + 1)))
4725, 43, 46syl2an2r 603 . . . 4 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((0g‘𝐺) + (𝐹‘(𝑁 + 1))) = (𝐹‘(𝑁 + 1)))
4831, 47eqtrd 2271 . . 3 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((𝐺 Σgz (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))) = (𝐹‘(𝑁 + 1)))
498oveq2d 6104 . . . . . . . . . . 11 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀...(𝑁 + 1)) = (𝑀...𝑀))
50 fzsn 10489 . . . . . . . . . . . . 13 (𝑀 ∈ ℤ → (𝑀...𝑀) = {𝑀})
513, 50syl 14 . . . . . . . . . . . 12 (𝜑 → (𝑀...𝑀) = {𝑀})
5251adantr 276 . . . . . . . . . . 11 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀...𝑀) = {𝑀})
5349, 52eqtrd 2271 . . . . . . . . . 10 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀...(𝑁 + 1)) = {𝑀})
5453feq2d 5524 . . . . . . . . 9 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹:(𝑀...(𝑁 + 1))⟶𝐵 ↔ 𝐹:{𝑀}⟶𝐵))
5533, 54mpbid 147 . . . . . . . 8 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐹:{𝑀}⟶𝐵)
56 fsn2g 5886 . . . . . . . . . 10 (𝑀 ∈ ℤ → (𝐹:{𝑀}⟶𝐵 ↔ ((𝐹‘𝑀) ∈ 𝐵 ∧ 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩})))
573, 56syl 14 . . . . . . . . 9 (𝜑 → (𝐹:{𝑀}⟶𝐵 ↔ ((𝐹‘𝑀) ∈ 𝐵 ∧ 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩})))
5857adantr 276 . . . . . . . 8 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹:{𝑀}⟶𝐵 ↔ ((𝐹‘𝑀) ∈ 𝐵 ∧ 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩})))
5955, 58mpbid 147 . . . . . . 7 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((𝐹‘𝑀) ∈ 𝐵 ∧ 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩}))
6059simprd 114 . . . . . 6 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩})
6159simpld 112 . . . . . . 7 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹‘𝑀) ∈ 𝐵)
62 fmptsn 5907 . . . . . . 7 ((𝑀 ∈ ℤ ∧ (𝐹‘𝑀) ∈ 𝐵) → {⟨𝑀, (𝐹‘𝑀)⟩} = (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀)))
633, 61, 62syl2an2r 603 . . . . . 6 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → {⟨𝑀, (𝐹‘𝑀)⟩} = (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀)))
6460, 63eqtrd 2271 . . . . 5 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐹 = (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀)))
6564oveq2d 6104 . . . 4 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σgz 𝐹) = (𝐺 Σgz (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀))))
66 eqidd 2239 . . . . 5 (((𝜑 ∧ 𝑁 = (𝑀 − 1)) ∧ 𝑥 = 𝑀) → (𝐹‘𝑀) = (𝐹‘𝑀))
67 nfv 1581 . . . . 5 Ⅎ𝑥(𝜑 ∧ 𝑁 = (𝑀 − 1))
68 nfcv 2392 . . . . 5 Ⅎ𝑥(𝐹‘𝑀)
6944, 26, 34, 61, 66, 67, 68gzsumsnfd 14237 . . . 4 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σgz (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀))) = (𝐹‘𝑀))
7065, 69eqtrd 2271 . . 3 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σgz 𝐹) = (𝐹‘𝑀))
719, 48, 703eqtr4rd 2282 . 2 ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σgz 𝐹) = ((𝐺 Σgz (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))))
7225adantr 276 . . 3 ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → 𝐺 ∈ Mnd)
733adantr 276 . . 3 ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → 𝑀 ∈ ℤ)
74 simpr 110 . . 3 ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → 𝑁 ∈ (ℤ≥‘𝑀))
7532adantr 276 . . 3 ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → 𝐹:(𝑀...(𝑁 + 1))⟶𝐵)
7644, 45, 72, 73, 74, 75gzsumsplit1r 13774 . 2 ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → (𝐺 Σgz 𝐹) = ((𝐺 Σgz (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))))
77 gzsumsplit0.n . . . 4 (𝜑 → 𝑁 ∈ (ℤ≥‘(𝑀 − 1)))
78 uzp1 9972 . . . 4 (𝑁 ∈ (ℤ≥‘(𝑀 − 1)) → (𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘((𝑀 − 1) + 1))))
7977, 78syl 14 . . 3 (𝜑 → (𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘((𝑀 − 1) + 1))))
806fveq2d 5702 . . . . 5 (𝜑 → (ℤ≥‘((𝑀 − 1) + 1)) = (ℤ≥‘𝑀))
8180eleq2d 2308 . . . 4 (𝜑 → (𝑁 ∈ (ℤ≥‘((𝑀 − 1) + 1)) ↔ 𝑁 ∈ (ℤ≥‘𝑀)))
8281orbi2d 802 . . 3 (𝜑 → ((𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘((𝑀 − 1) + 1))) ↔ (𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘𝑀))))
8379, 82mpbid 147 . 2 (𝜑 → (𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘𝑀)))
8471, 76, 83mpjaodan 810 1 (𝜑 → (𝐺 Σgz 𝐹) = ((𝐺 Σgz (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))))
Colors of variables:    wff set class
This proof depends on syntax axioms:   → wi 4   ∧ wa 104   ↔ wb 105   ∨ wo 720   = wceq 1402   ∈ wcel 2209  ∅c0 3520  {csn 3709  ⟨cop 3712   class class class wbr 4131   ↦ cmpt 4193   ↾ cres 4778  ⟶wf 5376  ‘cfv 5380  (class class class)co 6088  ℝcr 8184  1c1 8186   + caddc 8188   < clt 8366   ≤ cle 8367   − cmin 8504  ℤcz 9655  ℤ≥cuz 9937  ...cfz 10428  Basecbs 13410  +gcplusg 13490  0gc0g 13669   Σgz cgzsu 13670  Mndcmnd 13788
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4248  ax-sep 4251  ax-nul 4261  ax-pow 4313  ax-pr 4348  ax-un 4580  ax-setind 4686  ax-iinf 4737  ax-cnex 8276  ax-resscn 8277  ax-1cn 8278  ax-1re 8279  ax-icn 8280  ax-addcl 8281  ax-addrcl 8282  ax-mulcl 8283  ax-addcom 8285  ax-addass 8287  ax-distr 8289  ax-i2m1 8290  ax-0lt1 8291  ax-0id 8293  ax-rnegex 8294  ax-cnre 8296  ax-pre-ltirr 8297  ax-pre-ltwlin 8298  ax-pre-lttrn 8299  ax-pre-apti 8300  ax-pre-ltadd 8301
This proof depends on definitions:  df-bi 117  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4132  df-opab 4194  df-mpt 4195  df-tr 4232  df-id 4440  df-iord 4513  df-on 4515  df-ilim 4516  df-suc 4518  df-iom 4740  df-xp 4782  df-rel 4783  df-cnv 4784  df-co 4785  df-dm 4786  df-rn 4787  df-res 4788  df-ima 4789  df-iota 5340  df-fun 5382  df-fn 5383  df-f 5384  df-f1 5385  df-fo 5386  df-f1o 5387  df-fv 5388  df-riota 6041  df-ov 6091  df-oprab 6092  df-mpo 6093  df-1st 6378  df-2nd 6379  df-recs 6580  df-frec 6666  df-1o 6691  df-er 6811  df-en 7027  df-fin 7029  df-pnf 8368  df-mnf 8369  df-xr 8370  df-ltxr 8371  df-le 8372  df-sub 8506  df-neg 8507  df-inn 9314  df-2 9372  df-n0 9575  df-z 9656  df-uz 9938  df-fz 10429  df-seqfrec 10906  df-ndx 13413  df-slot 13414  df-base 13416  df-plusg 13503  df-0g 13671  df-gzsum 13672  df-mgm 13735  df-sgrp 13776  df-mnd 13789  df-minusg 13868  df-mulg 13982
This theorem is used by:  gsump1  14247
  Copyright terms: Public domain W3C validator