fourierdlem65 - Mathbox for Glauco Siliprandi

	Mathbox for Glauco Siliprandi		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > fourierdlem65		Structured version Visualization version GIF version

Theorem fourierdlem65 46885

Description: The distance of two adjacent points in the moved partition is preserved in the original partition. (Contributed by Glauco Siliprandi, 11-Dec-2019.)

**Hypotheses**
Ref	Expression
fourierdlem65.p	⊢ 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = 𝐴 ∧ (𝑝‘𝑚) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem65.t	⊢ 𝑇 = (𝐵 − 𝐴)
fourierdlem65.m	⊢ (𝜑 → 𝑀 ∈ ℕ)
fourierdlem65.q	⊢ (𝜑 → 𝑄 ∈ (𝑃‘𝑀))
fourierdlem65.c	⊢ (𝜑 → 𝐶 ∈ ℝ)
fourierdlem65.d	⊢ (𝜑 → 𝐷 ∈ (𝐶(,)+∞))
fourierdlem65.o	⊢ 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = 𝐶 ∧ (𝑝‘𝑚) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
fourierdlem65.n	⊢ 𝑁 = ((♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) − 1)
fourierdlem65.s	⊢ 𝑆 = (℩𝑓𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
fourierdlem65.e	⊢ 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)))
fourierdlem65.l	⊢ 𝐿 = (𝑦 ∈ (𝐴(,]𝐵) ↦ if(𝑦 = 𝐵, 𝐴, 𝑦))
fourierdlem65.z	⊢ 𝑍 = ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))

**Assertion**
Ref	Expression
fourierdlem65	⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))

Distinct variable groups: 𝐴,𝑓,𝑘,𝑦 𝐴,𝑖,𝑥,𝑘,𝑦 𝐴,𝑚,𝑝,𝑖 𝐵,𝑓,𝑘,𝑦 𝐵,𝑖,𝑥 𝐵,𝑚,𝑝 𝐶,𝑓,𝑦 𝐶,𝑖,𝑚,𝑝 𝑥,𝐶 𝐷,𝑓,𝑦 𝐷,𝑖,𝑚,𝑝 𝑥,𝐷 𝑖,𝐸,𝑘,𝑥,𝑦 𝑖,𝑀,𝑚,𝑝 𝑓,𝑁,𝑦 𝑖,𝑁,𝑚,𝑝 𝑥,𝑁 𝑄,𝑓,𝑘,𝑦 𝑄,𝑖,𝑥 𝑄,𝑝 𝑆,𝑓,𝑘,𝑦 𝑆,𝑖,𝑥 𝑆,𝑝 𝑇,𝑖,𝑘,𝑥,𝑦 𝑖,𝑍,𝑘,𝑦 𝜑,𝑓,𝑘,𝑦 𝑖,𝑗,𝑘,𝑥,𝑦 𝜑,𝑖,𝑥 Allowed substitution hints: 𝜑(𝑗,𝑚,𝑝) 𝐴(𝑗) 𝐵(𝑗) 𝐶(𝑗,𝑘) 𝐷(𝑗,𝑘) 𝑃(𝑥,𝑦,𝑓,𝑖,𝑗,𝑘,𝑚,𝑝) 𝑄(𝑗,𝑚) 𝑆(𝑗,𝑚) 𝑇(𝑓,𝑗,𝑚,𝑝) 𝐸(𝑓,𝑗,𝑚,𝑝) 𝐿(𝑥,𝑦,𝑓,𝑖,𝑗,𝑘,𝑚,𝑝) 𝑀(𝑥,𝑦,𝑓,𝑗,𝑘) 𝑁(𝑗,𝑘) 𝑂(𝑥,𝑦,𝑓,𝑖,𝑗,𝑘,𝑚,𝑝) 𝑍(𝑥,𝑓,𝑗,𝑚,𝑝)

**Proof of Theorem fourierdlem65**
Step	Hyp	Ref	Expression
1		fourierdlem65.l	. . . . . 6 ⊢ 𝐿 = (𝑦 ∈ (𝐴(,]𝐵) ↦ if(𝑦 = 𝐵, 𝐴, 𝑦))
2	1	a1i 11	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐿 = (𝑦 ∈ (𝐴(,]𝐵) ↦ if(𝑦 = 𝐵, 𝐴, 𝑦)))
3		simpr 489	. . . . . . . 8 ⊢ (((𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → 𝑦 = (𝐸‘(𝑆‘𝑗)))
4		simpl 487	. . . . . . . 8 ⊢ (((𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → (𝐸‘(𝑆‘𝑗)) = 𝐵)
5	3, 4	eqtrd 2798	. . . . . . 7 ⊢ (((𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → 𝑦 = 𝐵)
6	5	iftrued 4495	. . . . . 6 ⊢ (((𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → if(𝑦 = 𝐵, 𝐴, 𝑦) = 𝐴)
7	6	adantll 726	. . . . 5 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → if(𝑦 = 𝐵, 𝐴, 𝑦) = 𝐴)
8		fourierdlem65.p	. . . . . . . . . . 11 ⊢ 𝑃 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = 𝐴 ∧ (𝑝‘𝑚) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
9		fourierdlem65.m	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ∈ ℕ)
10		fourierdlem65.q	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑄 ∈ (𝑃‘𝑀))
11	8, 9, 10	fourierdlem11 46832	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵))
12	11	simp1d 1160	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℝ)
13	11	simp2d 1161	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ ℝ)
14	11	simp3d 1162	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 < 𝐵)
15		fourierdlem65.t	. . . . . . . . 9 ⊢ 𝑇 = (𝐵 − 𝐴)
16		fourierdlem65.e	. . . . . . . . 9 ⊢ 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)))
17	12, 13, 14, 15, 16	fourierdlem4 46825	. . . . . . . 8 ⊢ (𝜑 → 𝐸:ℝ⟶(𝐴(,]𝐵))
18	17	adantr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐸:ℝ⟶(𝐴(,]𝐵))
19		fourierdlem65.c	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐶 ∈ ℝ)
20		ioossre 13429	. . . . . . . . . . . . . . . 16 ⊢ (𝐶(,)+∞) ⊆ ℝ
21		fourierdlem65.d	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐷 ∈ (𝐶(,)+∞))
22	20, 21	sselid 3935	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐷 ∈ ℝ)
23	19	rexrd 11254	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐶 ∈ ℝ^*)
24		pnfxr 11258	. . . . . . . . . . . . . . . . 17 ⊢ +∞ ∈ ℝ^*
25	24	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → +∞ ∈ ℝ^*)
26		ioogtlb 46211	. . . . . . . . . . . . . . . 16 ⊢ ((𝐶 ∈ ℝ^* ∧ +∞ ∈ ℝ^* ∧ 𝐷 ∈ (𝐶(,)+∞)) → 𝐶 < 𝐷)
27	23, 25, 21, 26	syl3anc 1398	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐶 < 𝐷)
28		fourierdlem65.o	. . . . . . . . . . . . . . 15 ⊢ 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = 𝐶 ∧ (𝑝‘𝑚) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
29		id 23	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 𝑥 → 𝑦 = 𝑥)
30	15	eqcomi 2772	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝐵 − 𝐴) = 𝑇
31	30	oveq2i 7421	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 · (𝐵 − 𝐴)) = (𝑘 · 𝑇)
32	31	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 𝑥 → (𝑘 · (𝐵 − 𝐴)) = (𝑘 · 𝑇))
33	29, 32	oveq12d 7428	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑥 → (𝑦 + (𝑘 · (𝐵 − 𝐴))) = (𝑥 + (𝑘 · 𝑇)))
34	33	eleq1d 2848	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 𝑥 → ((𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄))
35	34	rexbidv 3189	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑥 → (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄))
36	35	cbvrabv 3426	. . . . . . . . . . . . . . . 16 ⊢ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} = {𝑥 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄}
37	36	uneq2i 4119	. . . . . . . . . . . . . . 15 ⊢ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}) = ({𝐶, 𝐷} ∪ {𝑥 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄})
38		fourierdlem65.n	. . . . . . . . . . . . . . 15 ⊢ 𝑁 = ((♯‘({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) − 1)
39		fourierdlem65.s	. . . . . . . . . . . . . . 15 ⊢ 𝑆 = (℩𝑓𝑓 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
40	15, 8, 9, 10, 19, 22, 27, 28, 37, 38, 39	fourierdlem54 46874	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑁 ∈ ℕ ∧ 𝑆 ∈ (𝑂‘𝑁)) ∧ 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))))
41	40	simpld 499	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 ∈ ℕ ∧ 𝑆 ∈ (𝑂‘𝑁)))
42	41	simprd 500	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 ∈ (𝑂‘𝑁))
43	41	simpld 499	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑁 ∈ ℕ)
44	28	fourierdlem2 46823	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → (𝑆 ∈ (𝑂‘𝑁) ↔ (𝑆 ∈ (ℝ ↑_m (0...𝑁)) ∧ (((𝑆‘0) = 𝐶 ∧ (𝑆‘𝑁) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1))))))
45	43, 44	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑆 ∈ (𝑂‘𝑁) ↔ (𝑆 ∈ (ℝ ↑_m (0...𝑁)) ∧ (((𝑆‘0) = 𝐶 ∧ (𝑆‘𝑁) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1))))))
46	42, 45	mpbid 235	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑆 ∈ (ℝ ↑_m (0...𝑁)) ∧ (((𝑆‘0) = 𝐶 ∧ (𝑆‘𝑁) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1)))))
47	46	simpld 499	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ∈ (ℝ ↑_m (0...𝑁)))
48		elmapi 8842	. . . . . . . . . 10 ⊢ (𝑆 ∈ (ℝ ↑_m (0...𝑁)) → 𝑆:(0...𝑁)⟶ℝ)
49	47, 48	syl 18	. . . . . . . . 9 ⊢ (𝜑 → 𝑆:(0...𝑁)⟶ℝ)
50	49	adantr 485	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑆:(0...𝑁)⟶ℝ)
51		elfzofz 13700	. . . . . . . . 9 ⊢ (𝑗 ∈ (0..^𝑁) → 𝑗 ∈ (0...𝑁))
52	51	adantl 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑗 ∈ (0...𝑁))
53	50, 52	ffvelcdmd 7080	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ∈ ℝ)
54	18, 53	ffvelcdmd 7080	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵))
55	54	adantr 485	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵))
56	12	ad2antrr 738	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐴 ∈ ℝ)
57	2, 7, 55, 56	fvmptd 6997	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐿‘(𝐸‘(𝑆‘𝑗))) = 𝐴)
58	57	oveq2d 7426	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝐸‘(𝑆‘(𝑗 + 1))) − 𝐴))
59	13	ad2antrr 738	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐵 ∈ ℝ)
60	14	ad2antrr 738	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐴 < 𝐵)
61	53	adantr 485	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) ∈ ℝ)
62		simpr 489	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) = 𝐵)
63		fzofzp1 13789	. . . . . . . . 9 ⊢ (𝑗 ∈ (0..^𝑁) → (𝑗 + 1) ∈ (0...𝑁))
64	63	adantl 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑗 + 1) ∈ (0...𝑁))
65	50, 64	ffvelcdmd 7080	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘(𝑗 + 1)) ∈ ℝ)
66	65	adantr 485	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘(𝑗 + 1)) ∈ ℝ)
67		elfzoelz 13683	. . . . . . . . . . 11 ⊢ (𝑗 ∈ (0..^𝑁) → 𝑗 ∈ ℤ)
68	67	zred 12695	. . . . . . . . . 10 ⊢ (𝑗 ∈ (0..^𝑁) → 𝑗 ∈ ℝ)
69	68	adantl 486	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑗 ∈ ℝ)
70	69	ltp1d 12140	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑗 < (𝑗 + 1))
71	40	simprd 500	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
72	71	adantr 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
73		isorel 7324	. . . . . . . . 9 ⊢ ((𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) ∧ (𝑗 ∈ (0...𝑁) ∧ (𝑗 + 1) ∈ (0...𝑁))) → (𝑗 < (𝑗 + 1) ↔ (𝑆‘𝑗) < (𝑆‘(𝑗 + 1))))
74	72, 52, 64, 73	syl12anc 849	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑗 < (𝑗 + 1) ↔ (𝑆‘𝑗) < (𝑆‘(𝑗 + 1))))
75	70, 74	mpbid 235	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) < (𝑆‘(𝑗 + 1)))
76	75	adantr 485	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) < (𝑆‘(𝑗 + 1)))
77		isof1o 7321	. . . . . . . . . . 11 ⊢ (𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) → 𝑆:(0...𝑁)–1-1-onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
78		f1ofo 6828	. . . . . . . . . . 11 ⊢ (𝑆:(0...𝑁)–1-1-onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}) → 𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
79	71, 77, 78	3syl 19	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
80	79	ad3antrrr 742	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → 𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
81	19	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → 𝐶 ∈ ℝ)
82	22	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → 𝐷 ∈ ℝ)
83	13, 12	resubcld 11637	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℝ)
84	15, 83	eqeltrid 2867	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑇 ∈ ℝ)
85	84	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑇 ∈ ℝ)
86	53, 85	readdcld 11233	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + 𝑇) ∈ ℝ)
87	86	adantr 485	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ ℝ)
88	19	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ∈ ℝ)
89	28, 43, 42	fourierdlem15 46836	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝑆:(0...𝑁)⟶(𝐶[,]𝐷))
90	89	adantr 485	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑆:(0...𝑁)⟶(𝐶[,]𝐷))
91	90, 52	ffvelcdmd 7080	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ∈ (𝐶[,]𝐷))
92	22	adantr 485	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐷 ∈ ℝ)
93		elicc2 13433	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ) → ((𝑆‘𝑗) ∈ (𝐶[,]𝐷) ↔ ((𝑆‘𝑗) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘𝑗) ∧ (𝑆‘𝑗) ≤ 𝐷)))
94	88, 92, 93	syl2anc 595	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) ∈ (𝐶[,]𝐷) ↔ ((𝑆‘𝑗) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘𝑗) ∧ (𝑆‘𝑗) ≤ 𝐷)))
95	91, 94	mpbid 235	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘𝑗) ∧ (𝑆‘𝑗) ≤ 𝐷))
96	95	simp2d 1161	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ≤ (𝑆‘𝑗))
97	12, 13	posdifd 11796	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝐴 < 𝐵 ↔ 0 < (𝐵 − 𝐴)))
98	14, 97	mpbid 235	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 0 < (𝐵 − 𝐴))
99	98, 15	breqtrrdi 5153	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 0 < 𝑇)
100	84, 99	elrpd 13052	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝑇 ∈ ℝ⁺)
101	100	adantr 485	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑇 ∈ ℝ⁺)
102	53, 101	ltaddrpd 13088	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) < ((𝑆‘𝑗) + 𝑇))
103	88, 53, 86, 96, 102	lelttrd 11363	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 < ((𝑆‘𝑗) + 𝑇))
104	88, 86, 103	ltled 11353	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ≤ ((𝑆‘𝑗) + 𝑇))
105	104	adantr 485	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → 𝐶 ≤ ((𝑆‘𝑗) + 𝑇))
106	65	adantr 485	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → (𝑆‘(𝑗 + 1)) ∈ ℝ)
107		simpr 489	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇))
108	87, 106	ltnled 11352	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → (((𝑆‘𝑗) + 𝑇) < (𝑆‘(𝑗 + 1)) ↔ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)))
109	107, 108	mpbird 260	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) < (𝑆‘(𝑗 + 1)))
110	90, 64	ffvelcdmd 7080	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘(𝑗 + 1)) ∈ (𝐶[,]𝐷))
111		elicc2 13433	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ) → ((𝑆‘(𝑗 + 1)) ∈ (𝐶[,]𝐷) ↔ ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ 𝐷)))
112	88, 92, 111	syl2anc 595	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘(𝑗 + 1)) ∈ (𝐶[,]𝐷) ↔ ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ 𝐷)))
113	110, 112	mpbid 235	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ 𝐷))
114	113	simp3d 1162	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘(𝑗 + 1)) ≤ 𝐷)
115	114	adantr 485	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → (𝑆‘(𝑗 + 1)) ≤ 𝐷)
116	87, 106, 82, 109, 115	ltletrd 11365	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) < 𝐷)
117	87, 82, 116	ltled 11353	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ≤ 𝐷)
118	81, 82, 87, 105, 117	eliccd 46220	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ (𝐶[,]𝐷))
119	118	adantlr 727	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ (𝐶[,]𝐷))
120	16	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇))))
121		id 23	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (𝑆‘𝑗) → 𝑥 = (𝑆‘𝑗))
122		oveq2 7418	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥 = (𝑆‘𝑗) → (𝐵 − 𝑥) = (𝐵 − (𝑆‘𝑗)))
123	122	oveq1d 7425	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = (𝑆‘𝑗) → ((𝐵 − 𝑥) / 𝑇) = ((𝐵 − (𝑆‘𝑗)) / 𝑇))
124	123	fveq2d 6885	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = (𝑆‘𝑗) → (⌊‘((𝐵 − 𝑥) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)))
125	124	oveq1d 7425	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (𝑆‘𝑗) → ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇) = ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
126	121, 125	oveq12d 7428	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = (𝑆‘𝑗) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
127	126	adantl 486	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑥 = (𝑆‘𝑗)) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
128	13	adantr 485	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐵 ∈ ℝ)
129	128, 53	resubcld 11637	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝑆‘𝑗)) ∈ ℝ)
130	129, 101	rerpdivcld 13086	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ)
131	130	flcld 13827	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∈ ℤ)
132	131	zred 12695	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∈ ℝ)
133	132, 85	remulcld 11234	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) ∈ ℝ)
134	53, 133	readdcld 11233	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) ∈ ℝ)
135	120, 127, 53, 134	fvmptd 6997	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) = ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
136	135	oveq1d 7425	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) = (((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − (𝑆‘𝑗)))
137	136	oveq1d 7425	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) = ((((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − (𝑆‘𝑗)) / 𝑇))
138	53	recnd 11232	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ∈ ℂ)
139	133	recnd 11232	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) ∈ ℂ)
140	138, 139	pncan2d 11566	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − (𝑆‘𝑗)) = ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
141	140	oveq1d 7425	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − (𝑆‘𝑗)) / 𝑇) = (((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) / 𝑇))
142	132	recnd 11232	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∈ ℂ)
143	85	recnd 11232	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑇 ∈ ℂ)
144	101	rpne0d 13060	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑇 ≠ 0)
145	142, 143, 144	divcan4d 11992	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) / 𝑇) = (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)))
146	137, 141, 145	3eqtrd 2802	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) = (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)))
147	146, 131	eqeltrd 2863	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℤ)
148		peano2zm 12632	. . . . . . . . . . . . . 14 ⊢ ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℤ → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) ∈ ℤ)
149	147, 148	syl 18	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) ∈ ℤ)
150	149	ad2antrr 738	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) ∈ ℤ)
151	30	oveq2i 7421	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴)) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)
152	151	oveq2i 7421	. . . . . . . . . . . . . . . 16 ⊢ (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇))
153	152	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)))
154	135	adantr 485	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) = ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
155		oveq1 7417	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) = (𝐵 − (𝑆‘𝑗)))
156	155	eqcomd 2769	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → (𝐵 − (𝑆‘𝑗)) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
157	156	oveq1d 7425	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → ((𝐵 − (𝑆‘𝑗)) / 𝑇) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
158	157	fveq2d 6885	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) = (⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)))
159	158	oveq1d 7425	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) = ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
160	159	oveq2d 7426	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
161	160	adantl 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
162	146, 142	eqeltrd 2863	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℂ)
163		1cnd 11197	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 1 ∈ ℂ)
164	162, 163, 143	subdird 11666	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − (1 · 𝑇)))
165	84	recnd 11232	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → 𝑇 ∈ ℂ)
166	165	mullidd 11222	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (1 · 𝑇) = 𝑇)
167	166	oveq2d 7426	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − (1 · 𝑇)) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇))
168	167	adantr 485	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − (1 · 𝑇)) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇))
169	164, 168	eqtrd 2798	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇))
170	169	oveq2d 7426	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇)))
171	162, 143	mulcld 11224	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) ∈ ℂ)
172	138, 143, 171	ppncand 11604	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇)) = ((𝑆‘𝑗) + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇)))
173		flid 13837	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℤ → (⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
174	147, 173	syl 18	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
175	174	eqcomd 2769	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) = (⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)))
176	175	oveq1d 7425	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) = ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
177	176	oveq2d 7426	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
178	170, 172, 177	3eqtrrd 2803	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)))
179	178	adantr 485	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)))
180	154, 161, 179	3eqtrrd 2803	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)) = (𝐸‘(𝑆‘𝑗)))
181	153, 180, 62	3eqtrd 2802	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) = 𝐵)
182	8	fourierdlem2 46823	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑀 ∈ ℕ → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
183	9, 182	syl 18	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
184	10, 183	mpbid 235	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))))
185	184	simprd 500	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))
186	185	simpld 499	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵))
187	186	simprd 500	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑄‘𝑀) = 𝐵)
188	187	eqcomd 2769	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐵 = (𝑄‘𝑀))
189	8, 9, 10	fourierdlem15 46836	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
190		ffn 6705	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑄:(0...𝑀)⟶(𝐴[,]𝐵) → 𝑄 Fn (0...𝑀))
191	189, 190	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑄 Fn (0...𝑀))
192	9	nnnn0d 12560	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑀 ∈ ℕ₀)
193		nn0uz 12895	. . . . . . . . . . . . . . . . . . 19 ⊢ ℕ₀ = (ℤ_≥‘0)
194	192, 193	eleqtrdi 2873	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝑀 ∈ (ℤ_≥‘0))
195		eluzfz2 13555	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑀 ∈ (ℤ_≥‘0) → 𝑀 ∈ (0...𝑀))
196	194, 195	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑀 ∈ (0...𝑀))
197		fnfvelrn 7075	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑄 Fn (0...𝑀) ∧ 𝑀 ∈ (0...𝑀)) → (𝑄‘𝑀) ∈ ran 𝑄)
198	191, 196, 197	syl2anc 595	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑄‘𝑀) ∈ ran 𝑄)
199	188, 198	eqeltrd 2863	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ∈ ran 𝑄)
200	199	ad2antrr 738	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐵 ∈ ran 𝑄)
201	181, 200	eqeltrd 2863	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) ∈ ran 𝑄)
202	201	adantr 485	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) ∈ ran 𝑄)
203		oveq1 7417	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) → (𝑘 · (𝐵 − 𝐴)) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴)))
204	203	oveq2d 7426	. . . . . . . . . . . . . 14 ⊢ (𝑘 = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) → (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))))
205	204	eleq1d 2848	. . . . . . . . . . . . 13 ⊢ (𝑘 = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) → ((((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) ∈ ran 𝑄))
206	205	rspcev 3581	. . . . . . . . . . . 12 ⊢ ((((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) ∈ ℤ ∧ (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) ∈ ran 𝑄) → ∃𝑘 ∈ ℤ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
207	150, 202, 206	syl2anc 595	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ∃𝑘 ∈ ℤ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
208		oveq1 7417	. . . . . . . . . . . . . 14 ⊢ (𝑦 = ((𝑆‘𝑗) + 𝑇) → (𝑦 + (𝑘 · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))))
209	208	eleq1d 2848	. . . . . . . . . . . . 13 ⊢ (𝑦 = ((𝑆‘𝑗) + 𝑇) → ((𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
210	209	rexbidv 3189	. . . . . . . . . . . 12 ⊢ (𝑦 = ((𝑆‘𝑗) + 𝑇) → (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
211	210	elrab 3650	. . . . . . . . . . 11 ⊢ (((𝑆‘𝑗) + 𝑇) ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} ↔ (((𝑆‘𝑗) + 𝑇) ∈ (𝐶[,]𝐷) ∧ ∃𝑘 ∈ ℤ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
212	119, 207, 211	sylanbrc 594	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})
213		elun2 4136	. . . . . . . . . 10 ⊢ (((𝑆‘𝑗) + 𝑇) ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} → ((𝑆‘𝑗) + 𝑇) ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
214	212, 213	syl 18	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
215		foelrn 7102	. . . . . . . . 9 ⊢ ((𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}) ∧ ((𝑆‘𝑗) + 𝑇) ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖))
216	80, 214, 215	syl2anc 595	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖))
217		eqcom 2770	. . . . . . . . 9 ⊢ (((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖) ↔ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
218	217	rexbii 3112	. . . . . . . 8 ⊢ (∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖) ↔ ∃𝑖 ∈ (0...𝑁)(𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
219	216, 218	sylib 221	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ∃𝑖 ∈ (0...𝑁)(𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
220	102	ad2antrr 738	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → (𝑆‘𝑗) < ((𝑆‘𝑗) + 𝑇))
221	217	bilanri 511	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖))
222	220, 221	breqtrd 5137	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → (𝑆‘𝑗) < (𝑆‘𝑖))
223	109	adantr 485	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) < (𝑆‘(𝑗 + 1)))
224	221, 223	eqbrtrrd 5135	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))
225	222, 224	jca 520	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
226	225	adantlr 727	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
227		simplll 786	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → (𝜑 ∧ 𝑗 ∈ (0..^𝑁)))
228		simplr 780	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → 𝑖 ∈ (0...𝑁))
229		elfzelz 13547	. . . . . . . . . . . . 13 ⊢ (𝑖 ∈ (0...𝑁) → 𝑖 ∈ ℤ)
230	229	ad2antlr 739	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → 𝑖 ∈ ℤ)
231	67	ad3antlr 743	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → 𝑗 ∈ ℤ)
232		simpr 489	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → (𝑆‘𝑗) < (𝑆‘𝑖))
233	72	ad2antrr 738	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
234	52	ad2antrr 738	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → 𝑗 ∈ (0...𝑁))
235		simplr 780	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → 𝑖 ∈ (0...𝑁))
236		isorel 7324	. . . . . . . . . . . . . . . 16 ⊢ ((𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) ∧ (𝑗 ∈ (0...𝑁) ∧ 𝑖 ∈ (0...𝑁))) → (𝑗 < 𝑖 ↔ (𝑆‘𝑗) < (𝑆‘𝑖)))
237	233, 234, 235, 236	syl12anc 849	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → (𝑗 < 𝑖 ↔ (𝑆‘𝑗) < (𝑆‘𝑖)))
238	232, 237	mpbird 260	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → 𝑗 < 𝑖)
239	238	adantrr 729	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → 𝑗 < 𝑖)
240		simpr 489	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))
241	72	ad2antrr 738	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
242		simplr 780	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → 𝑖 ∈ (0...𝑁))
243	64	ad2antrr 738	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → (𝑗 + 1) ∈ (0...𝑁))
244		isorel 7324	. . . . . . . . . . . . . . . 16 ⊢ ((𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) ∧ (𝑖 ∈ (0...𝑁) ∧ (𝑗 + 1) ∈ (0...𝑁))) → (𝑖 < (𝑗 + 1) ↔ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
245	241, 242, 243, 244	syl12anc 849	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → (𝑖 < (𝑗 + 1) ↔ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
246	240, 245	mpbird 260	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → 𝑖 < (𝑗 + 1))
247	246	adantrl 728	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → 𝑖 < (𝑗 + 1))
248		btwnnz 12667	. . . . . . . . . . . . 13 ⊢ ((𝑗 ∈ ℤ ∧ 𝑗 < 𝑖 ∧ 𝑖 < (𝑗 + 1)) → ¬ 𝑖 ∈ ℤ)
249	231, 239, 247, 248	syl3anc 1398	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → ¬ 𝑖 ∈ ℤ)
250	230, 249	pm2.65da 828	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) → ¬ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
251	227, 228, 250	syl2anc 595	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ¬ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
252	226, 251	pm2.65da 828	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) → ¬ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
253	252	nrexdv 3160	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ¬ ∃𝑖 ∈ (0...𝑁)(𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
254	253	adantlr 727	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ¬ ∃𝑖 ∈ (0...𝑁)(𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
255	219, 254	condan 829	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇))
256	61	rexrd 11254	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) ∈ ℝ^*)
257	84	ad2antrr 738	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝑇 ∈ ℝ)
258	61, 257	readdcld 11233	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘𝑗) + 𝑇) ∈ ℝ)
259		elioc2 13431	. . . . . . 7 ⊢ (((𝑆‘𝑗) ∈ ℝ^* ∧ ((𝑆‘𝑗) + 𝑇) ∈ ℝ) → ((𝑆‘(𝑗 + 1)) ∈ ((𝑆‘𝑗)(,]((𝑆‘𝑗) + 𝑇)) ↔ ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ (𝑆‘𝑗) < (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇))))
260	256, 258, 259	syl2anc 595	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘(𝑗 + 1)) ∈ ((𝑆‘𝑗)(,]((𝑆‘𝑗) + 𝑇)) ↔ ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ (𝑆‘𝑗) < (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇))))
261	66, 76, 255, 260	mpbir3and 1361	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘(𝑗 + 1)) ∈ ((𝑆‘𝑗)(,]((𝑆‘𝑗) + 𝑇)))
262	56, 59, 60, 15, 16, 61, 62, 261	fourierdlem26 46847	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘(𝑗 + 1))) = (𝐴 + ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗))))
263	262	oveq1d 7425	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − 𝐴) = ((𝐴 + ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗))) − 𝐴))
264	56	recnd 11232	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐴 ∈ ℂ)
265	65	recnd 11232	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘(𝑗 + 1)) ∈ ℂ)
266	265, 138	subcld 11564	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) ∈ ℂ)
267	266	adantr 485	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) ∈ ℂ)
268	264, 267	pncan2d 11566	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐴 + ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗))) − 𝐴) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
269	58, 263, 268	3eqtrd 2802	. 2 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
270	1	a1i 11	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐿 = (𝑦 ∈ (𝐴(,]𝐵) ↦ if(𝑦 = 𝐵, 𝐴, 𝑦)))
271		eqcom 2770	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐸‘(𝑆‘𝑗)) ↔ (𝐸‘(𝑆‘𝑗)) = 𝑦)
272	271	bilani 509	. . . . . . . . . 10 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → (𝐸‘(𝑆‘𝑗)) = 𝑦)
273		neqne 2966	. . . . . . . . . . 11 ⊢ (¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 → (𝐸‘(𝑆‘𝑗)) ≠ 𝐵)
274	273	adantr 485	. . . . . . . . . 10 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → (𝐸‘(𝑆‘𝑗)) ≠ 𝐵)
275	272, 274	eqnetrrd 3026	. . . . . . . . 9 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → 𝑦 ≠ 𝐵)
276	275	neneqd 2963	. . . . . . . 8 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → ¬ 𝑦 = 𝐵)
277	276	iffalsed 4498	. . . . . . 7 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → if(𝑦 = 𝐵, 𝐴, 𝑦) = 𝑦)
278		simpr 489	. . . . . . 7 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → 𝑦 = (𝐸‘(𝑆‘𝑗)))
279	277, 278	eqtrd 2798	. . . . . 6 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → if(𝑦 = 𝐵, 𝐴, 𝑦) = (𝐸‘(𝑆‘𝑗)))
280	279	adantll 726	. . . . 5 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → if(𝑦 = 𝐵, 𝐴, 𝑦) = (𝐸‘(𝑆‘𝑗)))
281	54	adantr 485	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵))
282	270, 280, 281, 281	fvmptd 6997	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐿‘(𝐸‘(𝑆‘𝑗))) = (𝐸‘(𝑆‘𝑗)))
283	282	oveq2d 7426	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐸‘(𝑆‘𝑗))))
284		id 23	. . . . . . . 8 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → 𝑥 = (𝑆‘(𝑗 + 1)))
285		oveq2 7418	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → (𝐵 − 𝑥) = (𝐵 − (𝑆‘(𝑗 + 1))))
286	285	oveq1d 7425	. . . . . . . . . 10 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → ((𝐵 − 𝑥) / 𝑇) = ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇))
287	286	fveq2d 6885	. . . . . . . . 9 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → (⌊‘((𝐵 − 𝑥) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)))
288	287	oveq1d 7425	. . . . . . . 8 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇) = ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇))
289	284, 288	oveq12d 7428	. . . . . . 7 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)))
290	289	adantl 486	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑥 = (𝑆‘(𝑗 + 1))) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)))
291	128, 65	resubcld 11637	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝑆‘(𝑗 + 1))) ∈ ℝ)
292	291, 101	rerpdivcld 13086	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ)
293	292	flcld 13827	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℤ)
294	293	zred 12695	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℝ)
295	294, 85	remulcld 11234	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇) ∈ ℝ)
296	65, 295	readdcld 11233	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) ∈ ℝ)
297	120, 290, 65, 296	fvmptd 6997	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘(𝑗 + 1))) = ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)))
298	297, 135	oveq12d 7428	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐸‘(𝑆‘𝑗))) = (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))))
299	298	adantr 485	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐸‘(𝑆‘𝑗))) = (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))))
300		flle 13828	. . . . . . . . . . . . 13 ⊢ (((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇))
301	292, 300	syl 18	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇))
302	53, 65, 75	ltled 11353	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ≤ (𝑆‘(𝑗 + 1)))
303	53, 65, 128, 302	lesub2dd 11826	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝑆‘(𝑗 + 1))) ≤ (𝐵 − (𝑆‘𝑗)))
304	291, 129, 101, 303	lediv1dd 13113	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
305	294, 292, 130, 301, 304	letrd 11362	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
306	305	adantr 485	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
307	294	adantr 485	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℝ)
308		1red 11204	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → 1 ∈ ℝ)
309	307, 308	readdcld 11233	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℝ)
310	130	adantr 485	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ)
311		simpr 489	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
312	309, 310, 311	nltled 11355	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
313	312	adantlr 727	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
314	79	ad3antrrr 742	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
315	88	ad2antrr 738	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝐶 ∈ ℝ)
316	92	ad2antrr 738	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝐷 ∈ ℝ)
317		fourierdlem65.z	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑍 = ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))
318	135, 134	eqeltrd 2863	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) ∈ ℝ)
319	128, 318	resubcld 11637	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐸‘(𝑆‘𝑗))) ∈ ℝ)
320	53, 319	readdcld 11233	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) ∈ ℝ)
321	317, 320	eqeltrid 2867	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑍 ∈ ℝ)
322	321	ad2antrr 738	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ∈ ℝ)
323	12	rexrd 11254	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → 𝐴 ∈ ℝ^*)
324	323	adantr 485	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐴 ∈ ℝ^*)
325		elioc2 13431	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ) → ((𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵) ↔ ((𝐸‘(𝑆‘𝑗)) ∈ ℝ ∧ 𝐴 < (𝐸‘(𝑆‘𝑗)) ∧ (𝐸‘(𝑆‘𝑗)) ≤ 𝐵)))
326	324, 128, 325	syl2anc 595	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵) ↔ ((𝐸‘(𝑆‘𝑗)) ∈ ℝ ∧ 𝐴 < (𝐸‘(𝑆‘𝑗)) ∧ (𝐸‘(𝑆‘𝑗)) ≤ 𝐵)))
327	54, 326	mpbid 235	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘𝑗)) ∈ ℝ ∧ 𝐴 < (𝐸‘(𝑆‘𝑗)) ∧ (𝐸‘(𝑆‘𝑗)) ≤ 𝐵))
328	327	simp3d 1162	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) ≤ 𝐵)
329	128, 318	subge0d 11799	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (0 ≤ (𝐵 − (𝐸‘(𝑆‘𝑗))) ↔ (𝐸‘(𝑆‘𝑗)) ≤ 𝐵))
330	328, 329	mpbird 260	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 0 ≤ (𝐵 − (𝐸‘(𝑆‘𝑗))))
331	53, 319	addge01d 11797	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (0 ≤ (𝐵 − (𝐸‘(𝑆‘𝑗))) ↔ (𝑆‘𝑗) ≤ ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))))
332	330, 331	mpbid 235	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ≤ ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))))
333	88, 53, 320, 96, 332	letrd 11362	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ≤ ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))))
334	333, 317	breqtrrdi 5153	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ≤ 𝑍)
335	334	ad2antrr 738	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝐶 ≤ 𝑍)
336	65	ad2antrr 738	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝑆‘(𝑗 + 1)) ∈ ℝ)
337	292	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ)
338		reflcl 13825	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℝ)
339		peano2re 11378	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℝ → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℝ)
340	337, 338, 339	3syl 19	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℝ)
341	128	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝐵 ∈ ℝ)
342	341, 322	resubcld 11637	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝐵 − 𝑍) ∈ ℝ)
343	101	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑇 ∈ ℝ⁺)
344	342, 343	rerpdivcld 13086	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − 𝑍) / 𝑇) ∈ ℝ)
345		flltp1 13829	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
346	292, 345	syl 18	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
347	346	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
348	293	peano2zd 12698	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℤ)
349	348	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℤ)
350	130	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ)
351		simpr 489	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
352	319, 101	rerpdivcld 13086	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) ∈ ℝ)
353	352	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) ∈ ℝ)
354	12	adantr 485	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐴 ∈ ℝ)
355	327	simp2d 1161	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐴 < (𝐸‘(𝑆‘𝑗)))
356	354, 318, 128, 355	ltsub2dd 11822	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐸‘(𝑆‘𝑗))) < (𝐵 − 𝐴))
357	356, 15	breqtrrdi 5153	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐸‘(𝑆‘𝑗))) < 𝑇)
358	319, 85, 101, 357	ltdiv1dd 13112	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) < (𝑇 / 𝑇))
359	143, 144	dividd 11984	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑇 / 𝑇) = 1)
360	358, 359	breqtrd 5137	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) < 1)
361	360	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) < 1)
362	129	recnd 11232	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝑆‘𝑗)) ∈ ℂ)
363	319	recnd 11232	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐸‘(𝑆‘𝑗))) ∈ ℂ)
364	362, 363, 143, 144	divsubdird 12025	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) − (𝐵 − (𝐸‘(𝑆‘𝑗)))) / 𝑇) = (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)))
365	364	eqcomd 2769	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) = (((𝐵 − (𝑆‘𝑗)) − (𝐵 − (𝐸‘(𝑆‘𝑗)))) / 𝑇))
366	128	recnd 11232	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐵 ∈ ℂ)
367	318	recnd 11232	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) ∈ ℂ)
368	366, 138, 367	nnncan1d 11598	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘𝑗)) − (𝐵 − (𝐸‘(𝑆‘𝑗)))) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
369	368	oveq1d 7425	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) − (𝐵 − (𝐸‘(𝑆‘𝑗)))) / 𝑇) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
370	365, 369	eqtrd 2798	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
371	370, 147	eqeltrd 2863	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) ∈ ℤ)
372	371	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) ∈ ℤ)
373	349, 350, 351, 353, 361, 372	zltlesub 46004	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)))
374	317	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑍 = ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))))
375	374	oveq2d 7426	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − 𝑍) = (𝐵 − ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))))
376	138, 366, 367	addsub12d 11587	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) = (𝐵 + ((𝑆‘𝑗) − (𝐸‘(𝑆‘𝑗)))))
377	366, 367, 138	subsub2d 11593	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))) = (𝐵 + ((𝑆‘𝑗) − (𝐸‘(𝑆‘𝑗)))))
378	376, 377	eqtr4d 2801	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) = (𝐵 − ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))))
379	378	oveq2d 7426	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))) = (𝐵 − (𝐵 − ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))))
380	367, 138	subcld 11564	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) ∈ ℂ)
381	366, 380	nncand 11569	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐵 − ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
382	375, 379, 381	3eqtrd 2802	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − 𝑍) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
383	382	oveq1d 7425	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − 𝑍) / 𝑇) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
384	369, 365, 383	3eqtr4d 2808	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) = ((𝐵 − 𝑍) / 𝑇))
385	384	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) = ((𝐵 − 𝑍) / 𝑇))
386	373, 385	breqtrd 5137	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − 𝑍) / 𝑇))
387	337, 340, 344, 347, 386	ltletrd 11365	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((𝐵 − 𝑍) / 𝑇))
388	291	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝐵 − (𝑆‘(𝑗 + 1))) ∈ ℝ)
389	388, 342, 343	ltdiv1d 13100	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘(𝑗 + 1))) < (𝐵 − 𝑍) ↔ ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((𝐵 − 𝑍) / 𝑇)))
390	387, 389	mpbird 260	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝐵 − (𝑆‘(𝑗 + 1))) < (𝐵 − 𝑍))
391	322, 336, 341	ltsub2d 11819	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝑍 < (𝑆‘(𝑗 + 1)) ↔ (𝐵 − (𝑆‘(𝑗 + 1))) < (𝐵 − 𝑍)))
392	390, 391	mpbird 260	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 < (𝑆‘(𝑗 + 1)))
393	114	ad2antrr 738	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝑆‘(𝑗 + 1)) ≤ 𝐷)
394	322, 336, 316, 392, 393	ltletrd 11365	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 < 𝐷)
395	322, 316, 394	ltled 11353	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ≤ 𝐷)
396	315, 316, 322, 335, 395	eliccd 46220	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ∈ (𝐶[,]𝐷))
397	30	a1i 11	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − 𝐴) = 𝑇)
398	397	oveq2d 7426	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴)) = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇))
399	380, 143, 144	divcan1d 11987	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
400	398, 399	eqtrd 2798	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴)) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
401	374, 400	oveq12d 7428	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))))
402	138, 363	addcomd 11407	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) = ((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝑆‘𝑗)))
403	402	oveq1d 7425	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))) = (((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝑆‘𝑗)) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))))
404	363, 138, 367	ppncand 11604	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝑆‘𝑗)) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))) = ((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝐸‘(𝑆‘𝑗))))
405	366, 367	npcand 11568	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝐸‘(𝑆‘𝑗))) = 𝐵)
406	404, 405	eqtrd 2798	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝑆‘𝑗)) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))) = 𝐵)
407	401, 403, 406	3eqtrd 2802	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) = 𝐵)
408	199	adantr 485	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐵 ∈ ran 𝑄)
409	407, 408	eqeltrd 2863	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) ∈ ran 𝑄)
410		oveq1 7417	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) → (𝑘 · (𝐵 − 𝐴)) = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴)))
411	410	oveq2d 7426	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) → (𝑍 + (𝑘 · (𝐵 − 𝐴))) = (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))))
412	411	eleq1d 2848	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) → ((𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) ∈ ran 𝑄))
413	412	rspcev 3581	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℤ ∧ (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) ∈ ran 𝑄) → ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
414	147, 409, 413	syl2anc 595	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
415	414	ad2antrr 738	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
416		oveq1 7417	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑍 → (𝑦 + (𝑘 · (𝐵 − 𝐴))) = (𝑍 + (𝑘 · (𝐵 − 𝐴))))
417	416	eleq1d 2848	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 𝑍 → ((𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
418	417	rexbidv 3189	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑍 → (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
419	418	elrab 3650	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} ↔ (𝑍 ∈ (𝐶[,]𝐷) ∧ ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
420	396, 415, 419	sylanbrc 594	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})
421		elun2 4136	. . . . . . . . . . . . . . 15 ⊢ (𝑍 ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} → 𝑍 ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
422	420, 421	syl 18	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
423		foelrn 7102	. . . . . . . . . . . . . 14 ⊢ ((𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}) ∧ 𝑍 ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) → ∃𝑖 ∈ (0...𝑁)𝑍 = (𝑆‘𝑖))
424	314, 422, 423	syl2anc 595	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ∃𝑖 ∈ (0...𝑁)𝑍 = (𝑆‘𝑖))
425	53	adantr 485	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) ∈ ℝ)
426	319	adantr 485	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐵 − (𝐸‘(𝑆‘𝑗))) ∈ ℝ)
427	318	adantr 485	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) ∈ ℝ)
428	13	ad2antrr 738	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐵 ∈ ℝ)
429	328	adantr 485	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) ≤ 𝐵)
430	273	necomd 3013	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 → 𝐵 ≠ (𝐸‘(𝑆‘𝑗)))
431	430	adantl 486	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐵 ≠ (𝐸‘(𝑆‘𝑗)))
432	427, 428, 429, 431	leneltd 11359	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) < 𝐵)
433	427, 428	posdifd 11796	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘𝑗)) < 𝐵 ↔ 0 < (𝐵 − (𝐸‘(𝑆‘𝑗)))))
434	432, 433	mpbid 235	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 0 < (𝐵 − (𝐸‘(𝑆‘𝑗))))
435	426, 434	elrpd 13052	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐵 − (𝐸‘(𝑆‘𝑗))) ∈ ℝ⁺)
436	425, 435	ltaddrpd 13088	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) < ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))))
437	436, 317	breqtrrdi 5153	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) < 𝑍)
438	437	ad2antrr 738	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → (𝑆‘𝑗) < 𝑍)
439		simpr 489	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → 𝑍 = (𝑆‘𝑖))
440	438, 439	breqtrd 5137	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → (𝑆‘𝑗) < (𝑆‘𝑖))
441	392	adantr 485	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → 𝑍 < (𝑆‘(𝑗 + 1)))
442	439, 441	eqbrtrrd 5135	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))
443	440, 442	jca 520	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
444	443	ex 417	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝑍 = (𝑆‘𝑖) → ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))))
445	444	reximdv 3180	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (∃𝑖 ∈ (0...𝑁)𝑍 = (𝑆‘𝑖) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))))
446	424, 445	mpd 16	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
447	313, 446	syldan 602	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
448	250	nrexdv 3160	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ¬ ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
449	448	ad2antrr 738	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ¬ ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
450	447, 449	condan 829	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
451	306, 450	jca 520	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∧ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)))
452	130	adantr 485	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ)
453	293	adantr 485	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℤ)
454		flbi 13845	. . . . . . . . . 10 ⊢ ((((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ ∧ (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℤ) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ↔ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∧ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))))
455	452, 453, 454	syl2anc 595	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ↔ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∧ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))))
456	451, 455	mpbird 260	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)))
457	456	eqcomd 2769	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)))
458	457	oveq1d 7425	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇) = ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
459	458	oveq2d 7426	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) = ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
460	459	oveq1d 7425	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))) = (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))))
461	265	adantr 485	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘(𝑗 + 1)) ∈ ℂ)
462	138	adantr 485	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) ∈ ℂ)
463	139	adantr 485	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) ∈ ℂ)
464	461, 462, 463	pnpcan2d 11602	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
465	460, 464	eqtrd 2798	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
466	283, 299, 465	3eqtrd 2802	. 2 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
467	269, 466	pm2.61dan 824	1 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 400 ∧ w3a 1103 = wceq 1570 ∈ wcel 2143 ≠ wne 2958 ∀wral 3079 ∃wrex 3089 {crab 3416 ∪ cun 3903 ifcif 4487 {cpr 4591 class class class wbr 5109 ↦ cmpt 5192 ran crn 5662 ℩cio 6490 Fn wfn 6531 ⟶wf 6532 –onto→wfo 6534 –1-1-onto→wf1o 6535 ‘cfv 6536 Isom wiso 6537 (class class class)co 7410 ↑_m cmap 8820 ℂcc 11093 ℝcr 11094 0cc0 11095 1c1 11096 + caddc 11098 · cmul 11100 +∞cpnf 11235 ℝ^*cxr 11237 < clt 11238 ≤ cle 11239 − cmin 11436 / cdiv 11866 ℕcn 12228 ℕ₀cn0 12499 ℤcz 12586 ℤ_≥cuz 12857 ℝ⁺crp 13011 (,)cioo 13367 (,]cioc 13368 [,]cicc 13370 ...cfz 13530 ..^cfzo 13678 ⌊cfl 13819 ♯chash 14362

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1825 ax-4 1839 ax-5 1940 ax-6 1997 ax-7 2038 ax-8 2145 ax-9 2153 ax-10 2176 ax-11 2192 ax-12 2213 ax-ext 2735 ax-rep 5238 ax-sep 5257 ax-nul 5269 ax-pow 5336 ax-pr 5404 ax-un 7732 ax-inf2 9606 ax-cnex 11151 ax-resscn 11152 ax-1cn 11153 ax-icn 11154 ax-addcl 11155 ax-addrcl 11156 ax-mulcl 11157 ax-mulrcl 11158 ax-mulcom 11159 ax-addass 11160 ax-mulass 11161 ax-distr 11162 ax-i2m1 11163 ax-1ne0 11164 ax-1rid 11165 ax-rnegex 11166 ax-rrecex 11167 ax-cnre 11168 ax-pre-lttri 11169 ax-pre-lttrn 11170 ax-pre-ltadd 11171 ax-pre-mulgt0 11172 ax-pre-sup 11173

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1810 df-nf 1814 df-sb 2097 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2838 df-nfc 2912 df-ne 2959 df-nel 3065 df-ral 3080 df-rex 3090 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3457 df-sbc 3745 df-csb 3854 df-dif 3908 df-un 3910 df-in 3912 df-ss 3922 df-pss 3925 df-nul 4287 df-if 4488 df-pw 4564 df-sn 4590 df-pr 4592 df-op 4596 df-uni 4873 df-int 4913 df-iun 4958 df-iin 4959 df-br 5110 df-opab 5174 df-mpt 5193 df-tr 5219 df-id 5556 df-eprel 5561 df-po 5569 df-so 5570 df-fr 5614 df-se 5615 df-we 5616 df-xp 5667 df-rel 5668 df-cnv 5669 df-co 5670 df-dm 5671 df-rn 5672 df-res 5673 df-ima 5674 df-pred 6302 df-ord 6363 df-on 6364 df-lim 6365 df-suc 6366 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-isom 6545 df-riota 7367 df-ov 7413 df-oprab 7414 df-mpo 7415 df-om 7859 df-1st 7982 df-2nd 7983 df-frecs 8274 df-wrecs 8305 df-recs 8354 df-rdg 8393 df-1o 8449 df-2o 8450 df-oadd 8453 df-er 8690 df-map 8822 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-fi 9367 df-sup 9398 df-inf 9399 df-oi 9468 df-dju 9883 df-card 9921 df-pnf 11240 df-mnf 11241 df-xr 11242 df-ltxr 11243 df-le 11244 df-sub 11438 df-neg 11439 df-div 11867 df-nn 12229 df-2 12298 df-3 12299 df-n0 12500 df-xnn0 12573 df-z 12587 df-uz 12858 df-q 12968 df-rp 13012 df-xneg 13132 df-xadd 13133 df-xmul 13134 df-ioo 13371 df-ioc 13372 df-icc 13374 df-fz 13531 df-fzo 13679 df-fl 13821 df-seq 14034 df-exp 14094 df-hash 14363 df-cj 15146 df-re 15147 df-im 15148 df-sqrt 15282 df-abs 15283 df-rest 17470 df-topgen 17491 df-psmet 21514 df-xmet 21515 df-met 21516 df-bl 21517 df-mopn 21518 df-top 23051 df-topon 23068 df-bases 23103 df-cld 23176 df-ntr 23177 df-cls 23178 df-nei 23255 df-lp 23293 df-cmp 23544

This theorem is referenced by: fourierdlem89 46909 fourierdlem90 46910 fourierdlem91 46911

W3C validator