Theorem gsumsplit0 13934

Description: Splitting off the rightmost summand of a group sum (even if it is the only summand). Similar to gsumsplit1r 13482 except that 𝑁 can equal 𝑀 − 1. (Contributed by Jim Kingdon, 4-Apr-2026.)

Hypotheses

Ref	Expression
gsumsplit0.b	⊢ 𝐵 = (Base‘𝐺)
gsumsplit0.p	⊢ + = (+g‘𝐺)
gsumsplit0.g	⊢ (𝜑 → 𝐺 ∈ Mnd)
gsumsplit0.m	⊢ (𝜑 → 𝑀 ∈ ℤ)
gsumsplit0.n	⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘(𝑀 − 1)))
gsumsplit0.f	⊢ (𝜑 → 𝐹:(𝑀...(𝑁 + 1))⟶𝐵)

Assertion

Ref	Expression
gsumsplit0	⊢ (𝜑 → (𝐺 Σg 𝐹) = ((𝐺 Σg (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))))

Proof of Theorem gsumsplit0

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpr 110	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑁 = (𝑀 − 1))
2	1	oveq1d 6033	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) = ((𝑀 − 1) + 1))
3		gsumsplit0.m	. . . . . . . 8 ⊢ (𝜑 → 𝑀 ∈ ℤ)
4	3	zcnd 9603	. . . . . . 7 ⊢ (𝜑 → 𝑀 ∈ ℂ)
5		1cnd 8195	. . . . . . 7 ⊢ (𝜑 → 1 ∈ ℂ)
6	4, 5	npcand 8494	. . . . . 6 ⊢ (𝜑 → ((𝑀 − 1) + 1) = 𝑀)
7	6	adantr 276	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((𝑀 − 1) + 1) = 𝑀)
8	2, 7	eqtrd 2264	. . . 4 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) = 𝑀)
9	8	fveq2d 5643	. . 3 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹‘(𝑁 + 1)) = (𝐹‘𝑀))
10	3	zred 9602	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑀 ∈ ℝ)
11	10	ltm1d 9112	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑀 − 1) < 𝑀)
12	11	adantr 276	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀 − 1) < 𝑀)
13	1, 12	eqbrtrd 4110	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑁 < 𝑀)
14		peano2zm 9517	. . . . . . . . . . . . . 14 ⊢ (𝑀 ∈ ℤ → (𝑀 − 1) ∈ ℤ)
15	3, 14	syl 14	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑀 − 1) ∈ ℤ)
16	15	adantr 276	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀 − 1) ∈ ℤ)
17	1, 16	eqeltrd 2308	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑁 ∈ ℤ)
18		fzn 10277	. . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑁 < 𝑀 ↔ (𝑀...𝑁) = ∅))
19	3, 17, 18	syl2an2r 599	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 < 𝑀 ↔ (𝑀...𝑁) = ∅))
20	13, 19	mpbid 147	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀...𝑁) = ∅)
21	20	reseq2d 5013	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹 ↾ (𝑀...𝑁)) = (𝐹 ↾ ∅))
22		res0 5017	. . . . . . . 8 ⊢ (𝐹 ↾ ∅) = ∅
23	21, 22	eqtrdi 2280	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹 ↾ (𝑀...𝑁)) = ∅)
24	23	oveq2d 6034	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σg (𝐹 ↾ (𝑀...𝑁))) = (𝐺 Σg ∅))
25		gsumsplit0.g	. . . . . . . 8 ⊢ (𝜑 → 𝐺 ∈ Mnd)
26	25	adantr 276	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐺 ∈ Mnd)
27		eqid 2231	. . . . . . . 8 ⊢ (0g‘𝐺) = (0g‘𝐺)
28	27	gsum0g 13480	. . . . . . 7 ⊢ (𝐺 ∈ Mnd → (𝐺 Σg ∅) = (0g‘𝐺))
29	26, 28	syl 14	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σg ∅) = (0g‘𝐺))
30	24, 29	eqtrd 2264	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σg (𝐹 ↾ (𝑀...𝑁))) = (0g‘𝐺))
31	30	oveq1d 6033	. . . 4 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((𝐺 Σg (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))) = ((0g‘𝐺) + (𝐹‘(𝑁 + 1))))
32		gsumsplit0.f	. . . . . . 7 ⊢ (𝜑 → 𝐹:(𝑀...(𝑁 + 1))⟶𝐵)
33	32	adantr 276	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐹:(𝑀...(𝑁 + 1))⟶𝐵)
34	3	adantr 276	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑀 ∈ ℤ)
35	8, 34	eqeltrd 2308	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) ∈ ℤ)
36	8	eqcomd 2237	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑀 = (𝑁 + 1))
37		eqle 8271	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℝ ∧ 𝑀 = (𝑁 + 1)) → 𝑀 ≤ (𝑁 + 1))
38	10, 36, 37	syl2an2r 599	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝑀 ≤ (𝑁 + 1))
39		eluz2 9761	. . . . . . . 8 ⊢ ((𝑁 + 1) ∈ (ℤ≥‘𝑀) ↔ (𝑀 ∈ ℤ ∧ (𝑁 + 1) ∈ ℤ ∧ 𝑀 ≤ (𝑁 + 1)))
40	34, 35, 38, 39	syl3anbrc 1207	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) ∈ (ℤ≥‘𝑀))
41		eluzfz2 10267	. . . . . . 7 ⊢ ((𝑁 + 1) ∈ (ℤ≥‘𝑀) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
42	40, 41	syl 14	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑁 + 1) ∈ (𝑀...(𝑁 + 1)))
43	33, 42	ffvelcdmd 5783	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹‘(𝑁 + 1)) ∈ 𝐵)
44		gsumsplit0.b	. . . . . 6 ⊢ 𝐵 = (Base‘𝐺)
45		gsumsplit0.p	. . . . . 6 ⊢ + = (+g‘𝐺)
46	44, 45, 27	mndlid 13519	. . . . 5 ⊢ ((𝐺 ∈ Mnd ∧ (𝐹‘(𝑁 + 1)) ∈ 𝐵) → ((0g‘𝐺) + (𝐹‘(𝑁 + 1))) = (𝐹‘(𝑁 + 1)))
47	25, 43, 46	syl2an2r 599	. . . 4 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((0g‘𝐺) + (𝐹‘(𝑁 + 1))) = (𝐹‘(𝑁 + 1)))
48	31, 47	eqtrd 2264	. . 3 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((𝐺 Σg (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))) = (𝐹‘(𝑁 + 1)))
49	8	oveq2d 6034	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀...(𝑁 + 1)) = (𝑀...𝑀))
50		fzsn 10301	. . . . . . . . . . . . 13 ⊢ (𝑀 ∈ ℤ → (𝑀...𝑀) = {𝑀})
51	3, 50	syl 14	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑀...𝑀) = {𝑀})
52	51	adantr 276	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀...𝑀) = {𝑀})
53	49, 52	eqtrd 2264	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝑀...(𝑁 + 1)) = {𝑀})
54	53	feq2d 5470	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹:(𝑀...(𝑁 + 1))⟶𝐵 ↔ 𝐹:{𝑀}⟶𝐵))
55	33, 54	mpbid 147	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐹:{𝑀}⟶𝐵)
56		fsn2g 5822	. . . . . . . . . 10 ⊢ (𝑀 ∈ ℤ → (𝐹:{𝑀}⟶𝐵 ↔ ((𝐹‘𝑀) ∈ 𝐵 ∧ 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩})))
57	3, 56	syl 14	. . . . . . . . 9 ⊢ (𝜑 → (𝐹:{𝑀}⟶𝐵 ↔ ((𝐹‘𝑀) ∈ 𝐵 ∧ 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩})))
58	57	adantr 276	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹:{𝑀}⟶𝐵 ↔ ((𝐹‘𝑀) ∈ 𝐵 ∧ 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩})))
59	55, 58	mpbid 147	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → ((𝐹‘𝑀) ∈ 𝐵 ∧ 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩}))
60	59	simprd 114	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐹 = {⟨𝑀, (𝐹‘𝑀)⟩})
61	59	simpld 112	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐹‘𝑀) ∈ 𝐵)
62		fmptsn 5843	. . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ (𝐹‘𝑀) ∈ 𝐵) → {⟨𝑀, (𝐹‘𝑀)⟩} = (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀)))
63	3, 61, 62	syl2an2r 599	. . . . . 6 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → {⟨𝑀, (𝐹‘𝑀)⟩} = (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀)))
64	60, 63	eqtrd 2264	. . . . 5 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → 𝐹 = (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀)))
65	64	oveq2d 6034	. . . 4 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σg 𝐹) = (𝐺 Σg (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀))))
66		eqidd 2232	. . . . 5 ⊢ (((𝜑 ∧ 𝑁 = (𝑀 − 1)) ∧ 𝑥 = 𝑀) → (𝐹‘𝑀) = (𝐹‘𝑀))
67		nfv 1576	. . . . 5 ⊢ Ⅎ𝑥(𝜑 ∧ 𝑁 = (𝑀 − 1))
68		nfcv 2374	. . . . 5 ⊢ Ⅎ𝑥(𝐹‘𝑀)
69	44, 26, 34, 61, 66, 67, 68	gsumfzsnfd 13933	. . . 4 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σg (𝑥 ∈ {𝑀} ↦ (𝐹‘𝑀))) = (𝐹‘𝑀))
70	65, 69	eqtrd 2264	. . 3 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σg 𝐹) = (𝐹‘𝑀))
71	9, 48, 70	3eqtr4rd 2275	. 2 ⊢ ((𝜑 ∧ 𝑁 = (𝑀 − 1)) → (𝐺 Σg 𝐹) = ((𝐺 Σg (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))))
72	25	adantr 276	. . 3 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → 𝐺 ∈ Mnd)
73	3	adantr 276	. . 3 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → 𝑀 ∈ ℤ)
74		simpr 110	. . 3 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → 𝑁 ∈ (ℤ≥‘𝑀))
75	32	adantr 276	. . 3 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → 𝐹:(𝑀...(𝑁 + 1))⟶𝐵)
76	44, 45, 72, 73, 74, 75	gsumsplit1r 13482	. 2 ⊢ ((𝜑 ∧ 𝑁 ∈ (ℤ≥‘𝑀)) → (𝐺 Σg 𝐹) = ((𝐺 Σg (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))))
77		gsumsplit0.n	. . . 4 ⊢ (𝜑 → 𝑁 ∈ (ℤ≥‘(𝑀 − 1)))
78		uzp1 9790	. . . 4 ⊢ (𝑁 ∈ (ℤ≥‘(𝑀 − 1)) → (𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘((𝑀 − 1) + 1))))
79	77, 78	syl 14	. . 3 ⊢ (𝜑 → (𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘((𝑀 − 1) + 1))))
80	6	fveq2d 5643	. . . . 5 ⊢ (𝜑 → (ℤ≥‘((𝑀 − 1) + 1)) = (ℤ≥‘𝑀))
81	80	eleq2d 2301	. . . 4 ⊢ (𝜑 → (𝑁 ∈ (ℤ≥‘((𝑀 − 1) + 1)) ↔ 𝑁 ∈ (ℤ≥‘𝑀)))
82	81	orbi2d 797	. . 3 ⊢ (𝜑 → ((𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘((𝑀 − 1) + 1))) ↔ (𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘𝑀))))
83	79, 82	mpbid 147	. 2 ⊢ (𝜑 → (𝑁 = (𝑀 − 1) ∨ 𝑁 ∈ (ℤ≥‘𝑀)))
84	71, 76, 83	mpjaodan 805	1 ⊢ (𝜑 → (𝐺 Σg 𝐹) = ((𝐺 Σg (𝐹 ↾ (𝑀...𝑁))) + (𝐹‘(𝑁 + 1))))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∨ wo 715   = wceq 1397   ∈ wcel 2202  ∅c0 3494  {csn 3669  ⟨cop 3672   class class class wbr 4088   ↦ cmpt 4150   ↾ cres 4727  ⟶wf 5322  ‘cfv 5326  (class class class)co 6018  ℝcr 8031  1c1 8033   + caddc 8035   < clt 8214   ≤ cle 8215   − cmin 8350  ℤcz 9479  ℤ_≥cuz 9755  ...cfz 10243  Basecbs 13083  +_gcplusg 13161  0_gc0g 13340   Σ_g cgsu 13341  Mndcmnd 13500

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 716  ax-5 1495  ax-7 1496  ax-gen 1497  ax-ie1 1541  ax-ie2 1542  ax-8 1552  ax-10 1553  ax-11 1554  ax-i12 1555  ax-bndl 1557  ax-4 1558  ax-17 1574  ax-i9 1578  ax-ial 1582  ax-i5r 1583  ax-13 2204  ax-14 2205  ax-ext 2213  ax-coll 4204  ax-sep 4207  ax-nul 4215  ax-pow 4264  ax-pr 4299  ax-un 4530  ax-setind 4635  ax-iinf 4686  ax-cnex 8123  ax-resscn 8124  ax-1cn 8125  ax-1re 8126  ax-icn 8127  ax-addcl 8128  ax-addrcl 8129  ax-mulcl 8130  ax-addcom 8132  ax-addass 8134  ax-distr 8136  ax-i2m1 8137  ax-0lt1 8138  ax-0id 8140  ax-rnegex 8141  ax-cnre 8143  ax-pre-ltirr 8144  ax-pre-ltwlin 8145  ax-pre-lttrn 8146  ax-pre-apti 8147  ax-pre-ltadd 8148

This theorem depends on definitions:  df-bi 117  df-dc 842  df-3or 1005  df-3an 1006  df-tru 1400  df-fal 1403  df-nf 1509  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2363  df-ne 2403  df-nel 2498  df-ral 2515  df-rex 2516  df-reu 2517  df-rmo 2518  df-rab 2519  df-v 2804  df-sbc 3032  df-csb 3128  df-dif 3202  df-un 3204  df-in 3206  df-ss 3213  df-nul 3495  df-if 3606  df-pw 3654  df-sn 3675  df-pr 3676  df-op 3678  df-uni 3894  df-int 3929  df-iun 3972  df-br 4089  df-opab 4151  df-mpt 4152  df-tr 4188  df-id 4390  df-iord 4463  df-on 4465  df-ilim 4466  df-suc 4468  df-iom 4689  df-xp 4731  df-rel 4732  df-cnv 4733  df-co 4734  df-dm 4735  df-rn 4736  df-res 4737  df-ima 4738  df-iota 5286  df-fun 5328  df-fn 5329  df-f 5330  df-f1 5331  df-fo 5332  df-f1o 5333  df-fv 5334  df-riota 5971  df-ov 6021  df-oprab 6022  df-mpo 6023  df-1st 6303  df-2nd 6304  df-recs 6471  df-frec 6557  df-1o 6582  df-er 6702  df-en 6910  df-fin 6912  df-pnf 8216  df-mnf 8217  df-xr 8218  df-ltxr 8219  df-le 8220  df-sub 8352  df-neg 8353  df-inn 9144  df-2 9202  df-n0 9403  df-z 9480  df-uz 9756  df-fz 10244  df-seqfrec 10710  df-ndx 13086  df-slot 13087  df-base 13089  df-plusg 13174  df-0g 13342  df-igsum 13343  df-mgm 13440  df-sgrp 13486  df-mnd 13501  df-minusg 13588  df-mulg 13708

This theorem is referenced by:  gfsump1  16689