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 46186

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 484	. . . . . . . 8 ⊢ (((𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → 𝑦 = (𝐸‘(𝑆‘𝑗)))
4		simpl 482	. . . . . . . 8 ⊢ (((𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → (𝐸‘(𝑆‘𝑗)) = 𝐵)
5	3, 4	eqtrd 2777	. . . . . . 7 ⊢ (((𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → 𝑦 = 𝐵)
6	5	iftrued 4533	. . . . . 6 ⊢ (((𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → if(𝑦 = 𝐵, 𝐴, 𝑦) = 𝐴)
7	6	adantll 714	. . . . 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 46133	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 < 𝐵))
12	11	simp1d 1143	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℝ)
13	11	simp2d 1144	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ ℝ)
14	11	simp3d 1145	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 < 𝐵)
15		fourierdlem65.t	. . . . . . . . 9 ⊢ 𝑇 = (𝐵 − 𝐴)
16		fourierdlem65.e	. . . . . . . . 9 ⊢ 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)))
17	12, 13, 14, 15, 16	fourierdlem4 46126	. . . . . . . 8 ⊢ (𝜑 → 𝐸:ℝ⟶(𝐴(,]𝐵))
18	17	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐸:ℝ⟶(𝐴(,]𝐵))
19		fourierdlem65.c	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐶 ∈ ℝ)
20		ioossre 13448	. . . . . . . . . . . . . . . 16 ⊢ (𝐶(,)+∞) ⊆ ℝ
21		fourierdlem65.d	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐷 ∈ (𝐶(,)+∞))
22	20, 21	sselid 3981	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐷 ∈ ℝ)
23	19	rexrd 11311	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐶 ∈ ℝ^*)
24		pnfxr 11315	. . . . . . . . . . . . . . . . 17 ⊢ +∞ ∈ ℝ^*
25	24	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → +∞ ∈ ℝ^*)
26		ioogtlb 45508	. . . . . . . . . . . . . . . 16 ⊢ ((𝐶 ∈ ℝ^* ∧ +∞ ∈ ℝ^* ∧ 𝐷 ∈ (𝐶(,)+∞)) → 𝐶 < 𝐷)
27	23, 25, 21, 26	syl3anc 1373	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐶 < 𝐷)
28		fourierdlem65.o	. . . . . . . . . . . . . . 15 ⊢ 𝑂 = (𝑚 ∈ ℕ ↦ {𝑝 ∈ (ℝ ↑_m (0...𝑚)) ∣ (((𝑝‘0) = 𝐶 ∧ (𝑝‘𝑚) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑚)(𝑝‘𝑖) < (𝑝‘(𝑖 + 1)))})
29		id 22	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 𝑥 → 𝑦 = 𝑥)
30	15	eqcomi 2746	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝐵 − 𝐴) = 𝑇
31	30	oveq2i 7442	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 · (𝐵 − 𝐴)) = (𝑘 · 𝑇)
32	31	a1i 11	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 = 𝑥 → (𝑘 · (𝐵 − 𝐴)) = (𝑘 · 𝑇))
33	29, 32	oveq12d 7449	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑥 → (𝑦 + (𝑘 · (𝐵 − 𝐴))) = (𝑥 + (𝑘 · 𝑇)))
34	33	eleq1d 2826	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 𝑥 → ((𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄))
35	34	rexbidv 3179	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑥 → (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄))
36	35	cbvrabv 3447	. . . . . . . . . . . . . . . 16 ⊢ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} = {𝑥 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ ran 𝑄}
37	36	uneq2i 4165	. . . . . . . . . . . . . . 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 46175	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑁 ∈ ℕ ∧ 𝑆 ∈ (𝑂‘𝑁)) ∧ 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))))
41	40	simpld 494	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 ∈ ℕ ∧ 𝑆 ∈ (𝑂‘𝑁)))
42	41	simprd 495	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 ∈ (𝑂‘𝑁))
43	41	simpld 494	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑁 ∈ ℕ)
44	28	fourierdlem2 46124	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → (𝑆 ∈ (𝑂‘𝑁) ↔ (𝑆 ∈ (ℝ ↑_m (0...𝑁)) ∧ (((𝑆‘0) = 𝐶 ∧ (𝑆‘𝑁) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1))))))
45	43, 44	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑆 ∈ (𝑂‘𝑁) ↔ (𝑆 ∈ (ℝ ↑_m (0...𝑁)) ∧ (((𝑆‘0) = 𝐶 ∧ (𝑆‘𝑁) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1))))))
46	42, 45	mpbid 232	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑆 ∈ (ℝ ↑_m (0...𝑁)) ∧ (((𝑆‘0) = 𝐶 ∧ (𝑆‘𝑁) = 𝐷) ∧ ∀𝑖 ∈ (0..^𝑁)(𝑆‘𝑖) < (𝑆‘(𝑖 + 1)))))
47	46	simpld 494	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ∈ (ℝ ↑_m (0...𝑁)))
48		elmapi 8889	. . . . . . . . . 10 ⊢ (𝑆 ∈ (ℝ ↑_m (0...𝑁)) → 𝑆:(0...𝑁)⟶ℝ)
49	47, 48	syl 17	. . . . . . . . 9 ⊢ (𝜑 → 𝑆:(0...𝑁)⟶ℝ)
50	49	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑆:(0...𝑁)⟶ℝ)
51		elfzofz 13715	. . . . . . . . 9 ⊢ (𝑗 ∈ (0..^𝑁) → 𝑗 ∈ (0...𝑁))
52	51	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑗 ∈ (0...𝑁))
53	50, 52	ffvelcdmd 7105	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ∈ ℝ)
54	18, 53	ffvelcdmd 7105	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵))
55	54	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵))
56	12	ad2antrr 726	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐴 ∈ ℝ)
57	2, 7, 55, 56	fvmptd 7023	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐿‘(𝐸‘(𝑆‘𝑗))) = 𝐴)
58	57	oveq2d 7447	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝐸‘(𝑆‘(𝑗 + 1))) − 𝐴))
59	13	ad2antrr 726	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐵 ∈ ℝ)
60	14	ad2antrr 726	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐴 < 𝐵)
61	53	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) ∈ ℝ)
62		simpr 484	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) = 𝐵)
63		fzofzp1 13803	. . . . . . . . 9 ⊢ (𝑗 ∈ (0..^𝑁) → (𝑗 + 1) ∈ (0...𝑁))
64	63	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑗 + 1) ∈ (0...𝑁))
65	50, 64	ffvelcdmd 7105	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘(𝑗 + 1)) ∈ ℝ)
66	65	adantr 480	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘(𝑗 + 1)) ∈ ℝ)
67		elfzoelz 13699	. . . . . . . . . . 11 ⊢ (𝑗 ∈ (0..^𝑁) → 𝑗 ∈ ℤ)
68	67	zred 12722	. . . . . . . . . 10 ⊢ (𝑗 ∈ (0..^𝑁) → 𝑗 ∈ ℝ)
69	68	adantl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑗 ∈ ℝ)
70	69	ltp1d 12198	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑗 < (𝑗 + 1))
71	40	simprd 495	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
72	71	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
73		isorel 7346	. . . . . . . . 9 ⊢ ((𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) ∧ (𝑗 ∈ (0...𝑁) ∧ (𝑗 + 1) ∈ (0...𝑁))) → (𝑗 < (𝑗 + 1) ↔ (𝑆‘𝑗) < (𝑆‘(𝑗 + 1))))
74	72, 52, 64, 73	syl12anc 837	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑗 < (𝑗 + 1) ↔ (𝑆‘𝑗) < (𝑆‘(𝑗 + 1))))
75	70, 74	mpbid 232	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) < (𝑆‘(𝑗 + 1)))
76	75	adantr 480	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) < (𝑆‘(𝑗 + 1)))
77		isof1o 7343	. . . . . . . . . . 11 ⊢ (𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) → 𝑆:(0...𝑁)–1-1-onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
78		f1ofo 6855	. . . . . . . . . . 11 ⊢ (𝑆:(0...𝑁)–1-1-onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}) → 𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
79	71, 77, 78	3syl 18	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
80	79	ad3antrrr 730	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → 𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
81	19	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → 𝐶 ∈ ℝ)
82	22	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → 𝐷 ∈ ℝ)
83	13, 12	resubcld 11691	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℝ)
84	15, 83	eqeltrid 2845	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑇 ∈ ℝ)
85	84	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑇 ∈ ℝ)
86	53, 85	readdcld 11290	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + 𝑇) ∈ ℝ)
87	86	adantr 480	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ ℝ)
88	19	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ∈ ℝ)
89	28, 43, 42	fourierdlem15 46137	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝑆:(0...𝑁)⟶(𝐶[,]𝐷))
90	89	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑆:(0...𝑁)⟶(𝐶[,]𝐷))
91	90, 52	ffvelcdmd 7105	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ∈ (𝐶[,]𝐷))
92	22	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐷 ∈ ℝ)
93		elicc2 13452	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ) → ((𝑆‘𝑗) ∈ (𝐶[,]𝐷) ↔ ((𝑆‘𝑗) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘𝑗) ∧ (𝑆‘𝑗) ≤ 𝐷)))
94	88, 92, 93	syl2anc 584	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) ∈ (𝐶[,]𝐷) ↔ ((𝑆‘𝑗) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘𝑗) ∧ (𝑆‘𝑗) ≤ 𝐷)))
95	91, 94	mpbid 232	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘𝑗) ∧ (𝑆‘𝑗) ≤ 𝐷))
96	95	simp2d 1144	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ≤ (𝑆‘𝑗))
97	12, 13	posdifd 11850	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝐴 < 𝐵 ↔ 0 < (𝐵 − 𝐴)))
98	14, 97	mpbid 232	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 0 < (𝐵 − 𝐴))
99	98, 15	breqtrrdi 5185	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 0 < 𝑇)
100	84, 99	elrpd 13074	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝑇 ∈ ℝ⁺)
101	100	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑇 ∈ ℝ⁺)
102	53, 101	ltaddrpd 13110	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) < ((𝑆‘𝑗) + 𝑇))
103	88, 53, 86, 96, 102	lelttrd 11419	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 < ((𝑆‘𝑗) + 𝑇))
104	88, 86, 103	ltled 11409	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ≤ ((𝑆‘𝑗) + 𝑇))
105	104	adantr 480	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → 𝐶 ≤ ((𝑆‘𝑗) + 𝑇))
106	65	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → (𝑆‘(𝑗 + 1)) ∈ ℝ)
107		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇))
108	87, 106	ltnled 11408	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → (((𝑆‘𝑗) + 𝑇) < (𝑆‘(𝑗 + 1)) ↔ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)))
109	107, 108	mpbird 257	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) < (𝑆‘(𝑗 + 1)))
110	90, 64	ffvelcdmd 7105	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘(𝑗 + 1)) ∈ (𝐶[,]𝐷))
111		elicc2 13452	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐶 ∈ ℝ ∧ 𝐷 ∈ ℝ) → ((𝑆‘(𝑗 + 1)) ∈ (𝐶[,]𝐷) ↔ ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ 𝐷)))
112	88, 92, 111	syl2anc 584	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘(𝑗 + 1)) ∈ (𝐶[,]𝐷) ↔ ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ 𝐷)))
113	110, 112	mpbid 232	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ 𝐶 ≤ (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ 𝐷))
114	113	simp3d 1145	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘(𝑗 + 1)) ≤ 𝐷)
115	114	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → (𝑆‘(𝑗 + 1)) ≤ 𝐷)
116	87, 106, 82, 109, 115	ltletrd 11421	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) < 𝐷)
117	87, 82, 116	ltled 11409	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ≤ 𝐷)
118	81, 82, 87, 105, 117	eliccd 45517	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ (𝐶[,]𝐷))
119	118	adantlr 715	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ (𝐶[,]𝐷))
120	16	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇))))
121		id 22	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (𝑆‘𝑗) → 𝑥 = (𝑆‘𝑗))
122		oveq2 7439	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥 = (𝑆‘𝑗) → (𝐵 − 𝑥) = (𝐵 − (𝑆‘𝑗)))
123	122	oveq1d 7446	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = (𝑆‘𝑗) → ((𝐵 − 𝑥) / 𝑇) = ((𝐵 − (𝑆‘𝑗)) / 𝑇))
124	123	fveq2d 6910	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = (𝑆‘𝑗) → (⌊‘((𝐵 − 𝑥) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)))
125	124	oveq1d 7446	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = (𝑆‘𝑗) → ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇) = ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
126	121, 125	oveq12d 7449	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = (𝑆‘𝑗) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
127	126	adantl 481	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑥 = (𝑆‘𝑗)) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
128	13	adantr 480	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐵 ∈ ℝ)
129	128, 53	resubcld 11691	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝑆‘𝑗)) ∈ ℝ)
130	129, 101	rerpdivcld 13108	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ)
131	130	flcld 13838	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∈ ℤ)
132	131	zred 12722	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∈ ℝ)
133	132, 85	remulcld 11291	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) ∈ ℝ)
134	53, 133	readdcld 11290	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) ∈ ℝ)
135	120, 127, 53, 134	fvmptd 7023	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) = ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
136	135	oveq1d 7446	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) = (((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − (𝑆‘𝑗)))
137	136	oveq1d 7446	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) = ((((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − (𝑆‘𝑗)) / 𝑇))
138	53	recnd 11289	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ∈ ℂ)
139	133	recnd 11289	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) ∈ ℂ)
140	138, 139	pncan2d 11622	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − (𝑆‘𝑗)) = ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
141	140	oveq1d 7446	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − (𝑆‘𝑗)) / 𝑇) = (((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) / 𝑇))
142	132	recnd 11289	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∈ ℂ)
143	85	recnd 11289	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑇 ∈ ℂ)
144	101	rpne0d 13082	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑇 ≠ 0)
145	142, 143, 144	divcan4d 12049	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) / 𝑇) = (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)))
146	137, 141, 145	3eqtrd 2781	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) = (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)))
147	146, 131	eqeltrd 2841	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℤ)
148		peano2zm 12660	. . . . . . . . . . . . . 14 ⊢ ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℤ → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) ∈ ℤ)
149	147, 148	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) ∈ ℤ)
150	149	ad2antrr 726	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) ∈ ℤ)
151	30	oveq2i 7442	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴)) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)
152	151	oveq2i 7442	. . . . . . . . . . . . . . . 16 ⊢ (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇))
153	152	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)))
154	135	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) = ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
155		oveq1 7438	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) = (𝐵 − (𝑆‘𝑗)))
156	155	eqcomd 2743	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → (𝐵 − (𝑆‘𝑗)) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
157	156	oveq1d 7446	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → ((𝐵 − (𝑆‘𝑗)) / 𝑇) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
158	157	fveq2d 6910	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) = (⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)))
159	158	oveq1d 7446	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) = ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
160	159	oveq2d 7447	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐸‘(𝑆‘𝑗)) = 𝐵 → ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
161	160	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
162	146, 142	eqeltrd 2841	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℂ)
163		1cnd 11256	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 1 ∈ ℂ)
164	162, 163, 143	subdird 11720	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − (1 · 𝑇)))
165	84	recnd 11289	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → 𝑇 ∈ ℂ)
166	165	mullidd 11279	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝜑 → (1 · 𝑇) = 𝑇)
167	166	oveq2d 7447	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − (1 · 𝑇)) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇))
168	167	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − (1 · 𝑇)) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇))
169	164, 168	eqtrd 2777	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇))
170	169	oveq2d 7447	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇)))
171	162, 143	mulcld 11281	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) ∈ ℂ)
172	138, 143, 171	ppncand 11660	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) − 𝑇)) = ((𝑆‘𝑗) + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇)))
173		flid 13848	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℤ → (⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
174	147, 173	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
175	174	eqcomd 2743	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) = (⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)))
176	175	oveq1d 7446	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) = ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
177	176	oveq2d 7447	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇)) = ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
178	170, 172, 177	3eqtrrd 2782	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)))
179	178	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘𝑗) + ((⌊‘(((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)))
180	154, 161, 179	3eqtrrd 2782	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · 𝑇)) = (𝐸‘(𝑆‘𝑗)))
181	153, 180, 62	3eqtrd 2781	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) = 𝐵)
182	8	fourierdlem2 46124	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑀 ∈ ℕ → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
183	9, 182	syl 17	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝑄 ∈ (𝑃‘𝑀) ↔ (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))))
184	10, 183	mpbid 232	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → (𝑄 ∈ (ℝ ↑_m (0...𝑀)) ∧ (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1)))))
185	184	simprd 495	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵) ∧ ∀𝑖 ∈ (0..^𝑀)(𝑄‘𝑖) < (𝑄‘(𝑖 + 1))))
186	185	simpld 494	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((𝑄‘0) = 𝐴 ∧ (𝑄‘𝑀) = 𝐵))
187	186	simprd 495	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑄‘𝑀) = 𝐵)
188	187	eqcomd 2743	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐵 = (𝑄‘𝑀))
189	8, 9, 10	fourierdlem15 46137	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝑄:(0...𝑀)⟶(𝐴[,]𝐵))
190		ffn 6736	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑄:(0...𝑀)⟶(𝐴[,]𝐵) → 𝑄 Fn (0...𝑀))
191	189, 190	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑄 Fn (0...𝑀))
192	9	nnnn0d 12587	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝑀 ∈ ℕ₀)
193		nn0uz 12920	. . . . . . . . . . . . . . . . . . 19 ⊢ ℕ₀ = (ℤ_≥‘0)
194	192, 193	eleqtrdi 2851	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝑀 ∈ (ℤ_≥‘0))
195		eluzfz2 13572	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑀 ∈ (ℤ_≥‘0) → 𝑀 ∈ (0...𝑀))
196	194, 195	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑀 ∈ (0...𝑀))
197		fnfvelrn 7100	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑄 Fn (0...𝑀) ∧ 𝑀 ∈ (0...𝑀)) → (𝑄‘𝑀) ∈ ran 𝑄)
198	191, 196, 197	syl2anc 584	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑄‘𝑀) ∈ ran 𝑄)
199	188, 198	eqeltrd 2841	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐵 ∈ ran 𝑄)
200	199	ad2antrr 726	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐵 ∈ ran 𝑄)
201	181, 200	eqeltrd 2841	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) ∈ ran 𝑄)
202	201	adantr 480	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) ∈ ran 𝑄)
203		oveq1 7438	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) → (𝑘 · (𝐵 − 𝐴)) = (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴)))
204	203	oveq2d 7447	. . . . . . . . . . . . . 14 ⊢ (𝑘 = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) → (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))))
205	204	eleq1d 2826	. . . . . . . . . . . . 13 ⊢ (𝑘 = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) → ((((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) ∈ ran 𝑄))
206	205	rspcev 3622	. . . . . . . . . . . 12 ⊢ ((((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) ∈ ℤ ∧ (((𝑆‘𝑗) + 𝑇) + (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) − 1) · (𝐵 − 𝐴))) ∈ ran 𝑄) → ∃𝑘 ∈ ℤ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
207	150, 202, 206	syl2anc 584	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ∃𝑘 ∈ ℤ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
208		oveq1 7438	. . . . . . . . . . . . . 14 ⊢ (𝑦 = ((𝑆‘𝑗) + 𝑇) → (𝑦 + (𝑘 · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))))
209	208	eleq1d 2826	. . . . . . . . . . . . 13 ⊢ (𝑦 = ((𝑆‘𝑗) + 𝑇) → ((𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
210	209	rexbidv 3179	. . . . . . . . . . . 12 ⊢ (𝑦 = ((𝑆‘𝑗) + 𝑇) → (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
211	210	elrab 3692	. . . . . . . . . . 11 ⊢ (((𝑆‘𝑗) + 𝑇) ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} ↔ (((𝑆‘𝑗) + 𝑇) ∈ (𝐶[,]𝐷) ∧ ∃𝑘 ∈ ℤ (((𝑆‘𝑗) + 𝑇) + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
212	119, 207, 211	sylanbrc 583	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})
213		elun2 4183	. . . . . . . . . 10 ⊢ (((𝑆‘𝑗) + 𝑇) ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} → ((𝑆‘𝑗) + 𝑇) ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
214	212, 213	syl 17	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
215		foelrn 7127	. . . . . . . . 9 ⊢ ((𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}) ∧ ((𝑆‘𝑗) + 𝑇) ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖))
216	80, 214, 215	syl2anc 584	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖))
217		eqcom 2744	. . . . . . . . 9 ⊢ (((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖) ↔ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
218	217	rexbii 3094	. . . . . . . 8 ⊢ (∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖) ↔ ∃𝑖 ∈ (0...𝑁)(𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
219	216, 218	sylib 218	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ∃𝑖 ∈ (0...𝑁)(𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
220	102	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → (𝑆‘𝑗) < ((𝑆‘𝑗) + 𝑇))
221	217	biimpri 228	. . . . . . . . . . . . . 14 ⊢ ((𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇) → ((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖))
222	221	adantl 481	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) = (𝑆‘𝑖))
223	220, 222	breqtrd 5169	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → (𝑆‘𝑗) < (𝑆‘𝑖))
224	109	adantr 480	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) + 𝑇) < (𝑆‘(𝑗 + 1)))
225	222, 224	eqbrtrrd 5167	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))
226	223, 225	jca 511	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
227	226	adantlr 715	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
228		simplll 775	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → (𝜑 ∧ 𝑗 ∈ (0..^𝑁)))
229		simplr 769	. . . . . . . . . . 11 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → 𝑖 ∈ (0...𝑁))
230		elfzelz 13564	. . . . . . . . . . . . 13 ⊢ (𝑖 ∈ (0...𝑁) → 𝑖 ∈ ℤ)
231	230	ad2antlr 727	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → 𝑖 ∈ ℤ)
232	67	ad3antlr 731	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → 𝑗 ∈ ℤ)
233		simpr 484	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → (𝑆‘𝑗) < (𝑆‘𝑖))
234	72	ad2antrr 726	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
235	52	ad2antrr 726	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → 𝑗 ∈ (0...𝑁))
236		simplr 769	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → 𝑖 ∈ (0...𝑁))
237		isorel 7346	. . . . . . . . . . . . . . . 16 ⊢ ((𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) ∧ (𝑗 ∈ (0...𝑁) ∧ 𝑖 ∈ (0...𝑁))) → (𝑗 < 𝑖 ↔ (𝑆‘𝑗) < (𝑆‘𝑖)))
238	234, 235, 236, 237	syl12anc 837	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → (𝑗 < 𝑖 ↔ (𝑆‘𝑗) < (𝑆‘𝑖)))
239	233, 238	mpbird 257	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑗) < (𝑆‘𝑖)) → 𝑗 < 𝑖)
240	239	adantrr 717	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → 𝑗 < 𝑖)
241		simpr 484	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))
242	72	ad2antrr 726	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → 𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})))
243		simplr 769	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → 𝑖 ∈ (0...𝑁))
244	64	ad2antrr 726	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → (𝑗 + 1) ∈ (0...𝑁))
245		isorel 7346	. . . . . . . . . . . . . . . 16 ⊢ ((𝑆 Isom < , < ((0...𝑁), ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) ∧ (𝑖 ∈ (0...𝑁) ∧ (𝑗 + 1) ∈ (0...𝑁))) → (𝑖 < (𝑗 + 1) ↔ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
246	242, 243, 244, 245	syl12anc 837	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → (𝑖 < (𝑗 + 1) ↔ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
247	241, 246	mpbird 257	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))) → 𝑖 < (𝑗 + 1))
248	247	adantrl 716	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → 𝑖 < (𝑗 + 1))
249		btwnnz 12694	. . . . . . . . . . . . 13 ⊢ ((𝑗 ∈ ℤ ∧ 𝑗 < 𝑖 ∧ 𝑖 < (𝑗 + 1)) → ¬ 𝑖 ∈ ℤ)
250	232, 240, 248, 249	syl3anc 1373	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) ∧ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))) → ¬ 𝑖 ∈ ℤ)
251	231, 250	pm2.65da 817	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑖 ∈ (0...𝑁)) → ¬ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
252	228, 229, 251	syl2anc 584	. . . . . . . . . 10 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) ∧ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇)) → ¬ ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
253	227, 252	pm2.65da 817	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) ∧ 𝑖 ∈ (0...𝑁)) → ¬ (𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
254	253	nrexdv 3149	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ¬ ∃𝑖 ∈ (0...𝑁)(𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
255	254	adantlr 715	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇)) → ¬ ∃𝑖 ∈ (0...𝑁)(𝑆‘𝑖) = ((𝑆‘𝑗) + 𝑇))
256	219, 255	condan 818	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇))
257	61	rexrd 11311	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) ∈ ℝ^*)
258	84	ad2antrr 726	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝑇 ∈ ℝ)
259	61, 258	readdcld 11290	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘𝑗) + 𝑇) ∈ ℝ)
260		elioc2 13450	. . . . . . 7 ⊢ (((𝑆‘𝑗) ∈ ℝ^* ∧ ((𝑆‘𝑗) + 𝑇) ∈ ℝ) → ((𝑆‘(𝑗 + 1)) ∈ ((𝑆‘𝑗)(,]((𝑆‘𝑗) + 𝑇)) ↔ ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ (𝑆‘𝑗) < (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇))))
261	257, 259, 260	syl2anc 584	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘(𝑗 + 1)) ∈ ((𝑆‘𝑗)(,]((𝑆‘𝑗) + 𝑇)) ↔ ((𝑆‘(𝑗 + 1)) ∈ ℝ ∧ (𝑆‘𝑗) < (𝑆‘(𝑗 + 1)) ∧ (𝑆‘(𝑗 + 1)) ≤ ((𝑆‘𝑗) + 𝑇))))
262	66, 76, 256, 261	mpbir3and 1343	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘(𝑗 + 1)) ∈ ((𝑆‘𝑗)(,]((𝑆‘𝑗) + 𝑇)))
263	56, 59, 60, 15, 16, 61, 62, 262	fourierdlem26 46148	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘(𝑗 + 1))) = (𝐴 + ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗))))
264	263	oveq1d 7446	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − 𝐴) = ((𝐴 + ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗))) − 𝐴))
265	56	recnd 11289	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐴 ∈ ℂ)
266	65	recnd 11289	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘(𝑗 + 1)) ∈ ℂ)
267	266, 138	subcld 11620	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) ∈ ℂ)
268	267	adantr 480	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)) ∈ ℂ)
269	265, 268	pncan2d 11622	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐴 + ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗))) − 𝐴) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
270	58, 264, 269	3eqtrd 2781	. 2 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
271	1	a1i 11	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐿 = (𝑦 ∈ (𝐴(,]𝐵) ↦ if(𝑦 = 𝐵, 𝐴, 𝑦)))
272		eqcom 2744	. . . . . . . . . . . 12 ⊢ (𝑦 = (𝐸‘(𝑆‘𝑗)) ↔ (𝐸‘(𝑆‘𝑗)) = 𝑦)
273	272	biimpi 216	. . . . . . . . . . 11 ⊢ (𝑦 = (𝐸‘(𝑆‘𝑗)) → (𝐸‘(𝑆‘𝑗)) = 𝑦)
274	273	adantl 481	. . . . . . . . . 10 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → (𝐸‘(𝑆‘𝑗)) = 𝑦)
275		neqne 2948	. . . . . . . . . . 11 ⊢ (¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 → (𝐸‘(𝑆‘𝑗)) ≠ 𝐵)
276	275	adantr 480	. . . . . . . . . 10 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → (𝐸‘(𝑆‘𝑗)) ≠ 𝐵)
277	274, 276	eqnetrrd 3009	. . . . . . . . 9 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → 𝑦 ≠ 𝐵)
278	277	neneqd 2945	. . . . . . . 8 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → ¬ 𝑦 = 𝐵)
279	278	iffalsed 4536	. . . . . . 7 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → if(𝑦 = 𝐵, 𝐴, 𝑦) = 𝑦)
280		simpr 484	. . . . . . 7 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → 𝑦 = (𝐸‘(𝑆‘𝑗)))
281	279, 280	eqtrd 2777	. . . . . 6 ⊢ ((¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → if(𝑦 = 𝐵, 𝐴, 𝑦) = (𝐸‘(𝑆‘𝑗)))
282	281	adantll 714	. . . . 5 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ 𝑦 = (𝐸‘(𝑆‘𝑗))) → if(𝑦 = 𝐵, 𝐴, 𝑦) = (𝐸‘(𝑆‘𝑗)))
283	54	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵))
284	271, 282, 283, 283	fvmptd 7023	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐿‘(𝐸‘(𝑆‘𝑗))) = (𝐸‘(𝑆‘𝑗)))
285	284	oveq2d 7447	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐸‘(𝑆‘𝑗))))
286		id 22	. . . . . . . 8 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → 𝑥 = (𝑆‘(𝑗 + 1)))
287		oveq2 7439	. . . . . . . . . . 11 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → (𝐵 − 𝑥) = (𝐵 − (𝑆‘(𝑗 + 1))))
288	287	oveq1d 7446	. . . . . . . . . 10 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → ((𝐵 − 𝑥) / 𝑇) = ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇))
289	288	fveq2d 6910	. . . . . . . . 9 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → (⌊‘((𝐵 − 𝑥) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)))
290	289	oveq1d 7446	. . . . . . . 8 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇) = ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇))
291	286, 290	oveq12d 7449	. . . . . . 7 ⊢ (𝑥 = (𝑆‘(𝑗 + 1)) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)))
292	291	adantl 481	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ 𝑥 = (𝑆‘(𝑗 + 1))) → (𝑥 + ((⌊‘((𝐵 − 𝑥) / 𝑇)) · 𝑇)) = ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)))
293	128, 65	resubcld 11691	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝑆‘(𝑗 + 1))) ∈ ℝ)
294	293, 101	rerpdivcld 13108	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ)
295	294	flcld 13838	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℤ)
296	295	zred 12722	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℝ)
297	296, 85	remulcld 11291	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇) ∈ ℝ)
298	65, 297	readdcld 11290	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) ∈ ℝ)
299	120, 292, 65, 298	fvmptd 7023	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘(𝑗 + 1))) = ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)))
300	299, 135	oveq12d 7449	. . . 4 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐸‘(𝑆‘𝑗))) = (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))))
301	300	adantr 480	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐸‘(𝑆‘𝑗))) = (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))))
302		flle 13839	. . . . . . . . . . . . 13 ⊢ (((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇))
303	294, 302	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇))
304	53, 65, 75	ltled 11409	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ≤ (𝑆‘(𝑗 + 1)))
305	53, 65, 128, 304	lesub2dd 11880	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝑆‘(𝑗 + 1))) ≤ (𝐵 − (𝑆‘𝑗)))
306	293, 129, 101, 305	lediv1dd 13135	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
307	296, 294, 130, 303, 306	letrd 11418	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
308	307	adantr 480	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
309	296	adantr 480	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℝ)
310		1red 11262	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → 1 ∈ ℝ)
311	309, 310	readdcld 11290	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℝ)
312	130	adantr 480	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ)
313		simpr 484	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
314	311, 312, 313	nltled 11411	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
315	314	adantlr 715	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
316	79	ad3antrrr 730	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
317	88	ad2antrr 726	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝐶 ∈ ℝ)
318	92	ad2antrr 726	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝐷 ∈ ℝ)
319		fourierdlem65.z	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑍 = ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))
320	135, 134	eqeltrd 2841	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) ∈ ℝ)
321	128, 320	resubcld 11691	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐸‘(𝑆‘𝑗))) ∈ ℝ)
322	53, 321	readdcld 11290	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) ∈ ℝ)
323	319, 322	eqeltrid 2845	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑍 ∈ ℝ)
324	323	ad2antrr 726	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ∈ ℝ)
325	12	rexrd 11311	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → 𝐴 ∈ ℝ^*)
326	325	adantr 480	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐴 ∈ ℝ^*)
327		elioc2 13450	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ) → ((𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵) ↔ ((𝐸‘(𝑆‘𝑗)) ∈ ℝ ∧ 𝐴 < (𝐸‘(𝑆‘𝑗)) ∧ (𝐸‘(𝑆‘𝑗)) ≤ 𝐵)))
328	326, 128, 327	syl2anc 584	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘𝑗)) ∈ (𝐴(,]𝐵) ↔ ((𝐸‘(𝑆‘𝑗)) ∈ ℝ ∧ 𝐴 < (𝐸‘(𝑆‘𝑗)) ∧ (𝐸‘(𝑆‘𝑗)) ≤ 𝐵)))
329	54, 328	mpbid 232	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘𝑗)) ∈ ℝ ∧ 𝐴 < (𝐸‘(𝑆‘𝑗)) ∧ (𝐸‘(𝑆‘𝑗)) ≤ 𝐵))
330	329	simp3d 1145	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) ≤ 𝐵)
331	128, 320	subge0d 11853	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (0 ≤ (𝐵 − (𝐸‘(𝑆‘𝑗))) ↔ (𝐸‘(𝑆‘𝑗)) ≤ 𝐵))
332	330, 331	mpbird 257	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 0 ≤ (𝐵 − (𝐸‘(𝑆‘𝑗))))
333	53, 321	addge01d 11851	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (0 ≤ (𝐵 − (𝐸‘(𝑆‘𝑗))) ↔ (𝑆‘𝑗) ≤ ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))))
334	332, 333	mpbid 232	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑆‘𝑗) ≤ ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))))
335	88, 53, 322, 96, 334	letrd 11418	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ≤ ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))))
336	335, 319	breqtrrdi 5185	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐶 ≤ 𝑍)
337	336	ad2antrr 726	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝐶 ≤ 𝑍)
338	65	ad2antrr 726	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝑆‘(𝑗 + 1)) ∈ ℝ)
339	294	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ)
340		reflcl 13836	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℝ)
341		peano2re 11434	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℝ → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℝ)
342	339, 340, 341	3syl 18	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℝ)
343	128	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝐵 ∈ ℝ)
344	343, 324	resubcld 11691	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝐵 − 𝑍) ∈ ℝ)
345	101	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑇 ∈ ℝ⁺)
346	344, 345	rerpdivcld 13108	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − 𝑍) / 𝑇) ∈ ℝ)
347		flltp1 13840	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) ∈ ℝ → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
348	294, 347	syl 17	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
349	348	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
350	295	peano2zd 12725	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℤ)
351	350	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ∈ ℤ)
352	130	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ)
353		simpr 484	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇))
354	321, 101	rerpdivcld 13108	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) ∈ ℝ)
355	354	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) ∈ ℝ)
356	12	adantr 480	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐴 ∈ ℝ)
357	329	simp2d 1144	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐴 < (𝐸‘(𝑆‘𝑗)))
358	356, 320, 128, 357	ltsub2dd 11876	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐸‘(𝑆‘𝑗))) < (𝐵 − 𝐴))
359	358, 15	breqtrrdi 5185	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐸‘(𝑆‘𝑗))) < 𝑇)
360	321, 85, 101, 359	ltdiv1dd 13134	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) < (𝑇 / 𝑇))
361	143, 144	dividd 12041	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑇 / 𝑇) = 1)
362	360, 361	breqtrd 5169	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) < 1)
363	362	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇) < 1)
364	129	recnd 11289	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝑆‘𝑗)) ∈ ℂ)
365	321	recnd 11289	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐸‘(𝑆‘𝑗))) ∈ ℂ)
366	364, 365, 143, 144	divsubdird 12082	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) − (𝐵 − (𝐸‘(𝑆‘𝑗)))) / 𝑇) = (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)))
367	366	eqcomd 2743	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) = (((𝐵 − (𝑆‘𝑗)) − (𝐵 − (𝐸‘(𝑆‘𝑗)))) / 𝑇))
368	128	recnd 11289	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐵 ∈ ℂ)
369	320	recnd 11289	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐸‘(𝑆‘𝑗)) ∈ ℂ)
370	368, 138, 369	nnncan1d 11654	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝑆‘𝑗)) − (𝐵 − (𝐸‘(𝑆‘𝑗)))) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
371	370	oveq1d 7446	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) − (𝐵 − (𝐸‘(𝑆‘𝑗)))) / 𝑇) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
372	367, 371	eqtrd 2777	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
373	372, 147	eqeltrd 2841	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) ∈ ℤ)
374	373	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) ∈ ℤ)
375	351, 352, 353, 355, 363, 374	zltlesub 45297	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)))
376	319	a1i 11	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝑍 = ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))))
377	376	oveq2d 7447	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − 𝑍) = (𝐵 − ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))))
378	138, 368, 369	addsub12d 11643	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) = (𝐵 + ((𝑆‘𝑗) − (𝐸‘(𝑆‘𝑗)))))
379	368, 369, 138	subsub2d 11649	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))) = (𝐵 + ((𝑆‘𝑗) − (𝐸‘(𝑆‘𝑗)))))
380	378, 379	eqtr4d 2780	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) = (𝐵 − ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))))
381	380	oveq2d 7447	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗))))) = (𝐵 − (𝐵 − ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))))
382	369, 138	subcld 11620	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) ∈ ℂ)
383	368, 382	nncand 11625	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − (𝐵 − ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
384	377, 381, 383	3eqtrd 2781	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − 𝑍) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
385	384	oveq1d 7446	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − 𝑍) / 𝑇) = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇))
386	371, 367, 385	3eqtr4d 2787	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) = ((𝐵 − 𝑍) / 𝑇))
387	386	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (((𝐵 − (𝑆‘𝑗)) / 𝑇) − ((𝐵 − (𝐸‘(𝑆‘𝑗))) / 𝑇)) = ((𝐵 − 𝑍) / 𝑇))
388	375, 387	breqtrd 5169	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − 𝑍) / 𝑇))
389	339, 342, 346, 349, 388	ltletrd 11421	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((𝐵 − 𝑍) / 𝑇))
390	293	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝐵 − (𝑆‘(𝑗 + 1))) ∈ ℝ)
391	390, 344, 345	ltdiv1d 13122	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ((𝐵 − (𝑆‘(𝑗 + 1))) < (𝐵 − 𝑍) ↔ ((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇) < ((𝐵 − 𝑍) / 𝑇)))
392	389, 391	mpbird 257	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝐵 − (𝑆‘(𝑗 + 1))) < (𝐵 − 𝑍))
393	324, 338, 343	ltsub2d 11873	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝑍 < (𝑆‘(𝑗 + 1)) ↔ (𝐵 − (𝑆‘(𝑗 + 1))) < (𝐵 − 𝑍)))
394	392, 393	mpbird 257	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 < (𝑆‘(𝑗 + 1)))
395	114	ad2antrr 726	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝑆‘(𝑗 + 1)) ≤ 𝐷)
396	324, 338, 318, 394, 395	ltletrd 11421	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 < 𝐷)
397	324, 318, 396	ltled 11409	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ≤ 𝐷)
398	317, 318, 324, 337, 397	eliccd 45517	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ∈ (𝐶[,]𝐷))
399	30	a1i 11	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝐵 − 𝐴) = 𝑇)
400	399	oveq2d 7447	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴)) = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇))
401	382, 143, 144	divcan1d 12044	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · 𝑇) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
402	400, 401	eqtrd 2777	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴)) = ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)))
403	376, 402	oveq12d 7449	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) = (((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))))
404	138, 365	addcomd 11463	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) = ((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝑆‘𝑗)))
405	404	oveq1d 7446	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))) = (((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝑆‘𝑗)) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))))
406	365, 138, 369	ppncand 11660	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝑆‘𝑗)) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))) = ((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝐸‘(𝑆‘𝑗))))
407	368, 369	npcand 11624	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝐸‘(𝑆‘𝑗))) = 𝐵)
408	406, 407	eqtrd 2777	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (((𝐵 − (𝐸‘(𝑆‘𝑗))) + (𝑆‘𝑗)) + ((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗))) = 𝐵)
409	403, 405, 408	3eqtrd 2781	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) = 𝐵)
410	199	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → 𝐵 ∈ ran 𝑄)
411	409, 410	eqeltrd 2841	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) ∈ ran 𝑄)
412		oveq1 7438	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑘 = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) → (𝑘 · (𝐵 − 𝐴)) = ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴)))
413	412	oveq2d 7447	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑘 = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) → (𝑍 + (𝑘 · (𝐵 − 𝐴))) = (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))))
414	413	eleq1d 2826	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = (((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) → ((𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) ∈ ran 𝑄))
415	414	rspcev 3622	. . . . . . . . . . . . . . . . . 18 ⊢ (((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) ∈ ℤ ∧ (𝑍 + ((((𝐸‘(𝑆‘𝑗)) − (𝑆‘𝑗)) / 𝑇) · (𝐵 − 𝐴))) ∈ ran 𝑄) → ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
416	147, 411, 415	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
417	416	ad2antrr 726	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄)
418		oveq1 7438	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = 𝑍 → (𝑦 + (𝑘 · (𝐵 − 𝐴))) = (𝑍 + (𝑘 · (𝐵 − 𝐴))))
419	418	eleq1d 2826	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = 𝑍 → ((𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
420	419	rexbidv 3179	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑍 → (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄 ↔ ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
421	420	elrab 3692	. . . . . . . . . . . . . . . 16 ⊢ (𝑍 ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} ↔ (𝑍 ∈ (𝐶[,]𝐷) ∧ ∃𝑘 ∈ ℤ (𝑍 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄))
422	398, 417, 421	sylanbrc 583	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})
423		elun2 4183	. . . . . . . . . . . . . . 15 ⊢ (𝑍 ∈ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄} → 𝑍 ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
424	422, 423	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → 𝑍 ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}))
425		foelrn 7127	. . . . . . . . . . . . . 14 ⊢ ((𝑆:(0...𝑁)–onto→({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄}) ∧ 𝑍 ∈ ({𝐶, 𝐷} ∪ {𝑦 ∈ (𝐶[,]𝐷) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · (𝐵 − 𝐴))) ∈ ran 𝑄})) → ∃𝑖 ∈ (0...𝑁)𝑍 = (𝑆‘𝑖))
426	316, 424, 425	syl2anc 584	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ∃𝑖 ∈ (0...𝑁)𝑍 = (𝑆‘𝑖))
427	53	adantr 480	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) ∈ ℝ)
428	321	adantr 480	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐵 − (𝐸‘(𝑆‘𝑗))) ∈ ℝ)
429	320	adantr 480	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) ∈ ℝ)
430	13	ad2antrr 726	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐵 ∈ ℝ)
431	330	adantr 480	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) ≤ 𝐵)
432	275	necomd 2996	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (¬ (𝐸‘(𝑆‘𝑗)) = 𝐵 → 𝐵 ≠ (𝐸‘(𝑆‘𝑗)))
433	432	adantl 481	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 𝐵 ≠ (𝐸‘(𝑆‘𝑗)))
434	429, 430, 431, 433	leneltd 11415	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐸‘(𝑆‘𝑗)) < 𝐵)
435	429, 430	posdifd 11850	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘𝑗)) < 𝐵 ↔ 0 < (𝐵 − (𝐸‘(𝑆‘𝑗)))))
436	434, 435	mpbid 232	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → 0 < (𝐵 − (𝐸‘(𝑆‘𝑗))))
437	428, 436	elrpd 13074	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝐵 − (𝐸‘(𝑆‘𝑗))) ∈ ℝ⁺)
438	427, 437	ltaddrpd 13110	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) < ((𝑆‘𝑗) + (𝐵 − (𝐸‘(𝑆‘𝑗)))))
439	438, 319	breqtrrdi 5185	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) < 𝑍)
440	439	ad2antrr 726	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → (𝑆‘𝑗) < 𝑍)
441		simpr 484	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → 𝑍 = (𝑆‘𝑖))
442	440, 441	breqtrd 5169	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → (𝑆‘𝑗) < (𝑆‘𝑖))
443	394	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → 𝑍 < (𝑆‘(𝑗 + 1)))
444	441, 443	eqbrtrrd 5167	. . . . . . . . . . . . . . . 16 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))
445	442, 444	jca 511	. . . . . . . . . . . . . . 15 ⊢ (((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) ∧ 𝑍 = (𝑆‘𝑖)) → ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
446	445	ex 412	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (𝑍 = (𝑆‘𝑖) → ((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))))
447	446	reximdv 3170	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → (∃𝑖 ∈ (0...𝑁)𝑍 = (𝑆‘𝑖) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1)))))
448	426, 447	mpd 15	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇)) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
449	315, 448	syldan 591	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
450	251	nrexdv 3149	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ¬ ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
451	450	ad2antrr 726	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) ∧ ¬ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)) → ¬ ∃𝑖 ∈ (0...𝑁)((𝑆‘𝑗) < (𝑆‘𝑖) ∧ (𝑆‘𝑖) < (𝑆‘(𝑗 + 1))))
452	449, 451	condan 818	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))
453	308, 452	jca 511	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∧ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1)))
454	130	adantr 480	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ)
455	295	adantr 480	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℤ)
456		flbi 13856	. . . . . . . . . 10 ⊢ ((((𝐵 − (𝑆‘𝑗)) / 𝑇) ∈ ℝ ∧ (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ∈ ℤ) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ↔ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∧ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))))
457	454, 455, 456	syl2anc 584	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ↔ ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) ≤ ((𝐵 − (𝑆‘𝑗)) / 𝑇) ∧ ((𝐵 − (𝑆‘𝑗)) / 𝑇) < ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) + 1))))
458	453, 457	mpbird 257	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)))
459	458	eqcomd 2743	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) = (⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)))
460	459	oveq1d 7446	. . . . . 6 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇) = ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))
461	460	oveq2d 7447	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) = ((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)))
462	461	oveq1d 7446	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))) = (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))))
463	266	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘(𝑗 + 1)) ∈ ℂ)
464	138	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (𝑆‘𝑗) ∈ ℂ)
465	139	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇) ∈ ℂ)
466	463, 464, 465	pnpcan2d 11658	. . . 4 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
467	462, 466	eqtrd 2777	. . 3 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → (((𝑆‘(𝑗 + 1)) + ((⌊‘((𝐵 − (𝑆‘(𝑗 + 1))) / 𝑇)) · 𝑇)) − ((𝑆‘𝑗) + ((⌊‘((𝐵 − (𝑆‘𝑗)) / 𝑇)) · 𝑇))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
468	285, 301, 467	3eqtrd 2781	. 2 ⊢ (((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) ∧ ¬ (𝐸‘(𝑆‘𝑗)) = 𝐵) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))
469	270, 468	pm2.61dan 813	1 ⊢ ((𝜑 ∧ 𝑗 ∈ (0..^𝑁)) → ((𝐸‘(𝑆‘(𝑗 + 1))) − (𝐿‘(𝐸‘(𝑆‘𝑗)))) = ((𝑆‘(𝑗 + 1)) − (𝑆‘𝑗)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1540 ∈ wcel 2108 ≠ wne 2940 ∀wral 3061 ∃wrex 3070 {crab 3436 ∪ cun 3949 ifcif 4525 {cpr 4628 class class class wbr 5143 ↦ cmpt 5225 ran crn 5686 ℩cio 6512 Fn wfn 6556 ⟶wf 6557 –onto→wfo 6559 –1-1-onto→wf1o 6560 ‘cfv 6561 Isom wiso 6562 (class class class)co 7431 ↑_m cmap 8866 ℂcc 11153 ℝcr 11154 0cc0 11155 1c1 11156 + caddc 11158 · cmul 11160 +∞cpnf 11292 ℝ^*cxr 11294 < clt 11295 ≤ cle 11296 − cmin 11492 / cdiv 11920 ℕcn 12266 ℕ₀cn0 12526 ℤcz 12613 ℤ_≥cuz 12878 ℝ⁺crp 13034 (,)cioo 13387 (,]cioc 13388 [,]cicc 13390 ...cfz 13547 ..^cfzo 13694 ⌊cfl 13830 ♯chash 14369

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2157 ax-12 2177 ax-ext 2708 ax-rep 5279 ax-sep 5296 ax-nul 5306 ax-pow 5365 ax-pr 5432 ax-un 7755 ax-inf2 9681 ax-cnex 11211 ax-resscn 11212 ax-1cn 11213 ax-icn 11214 ax-addcl 11215 ax-addrcl 11216 ax-mulcl 11217 ax-mulrcl 11218 ax-mulcom 11219 ax-addass 11220 ax-mulass 11221 ax-distr 11222 ax-i2m1 11223 ax-1ne0 11224 ax-1rid 11225 ax-rnegex 11226 ax-rrecex 11227 ax-cnre 11228 ax-pre-lttri 11229 ax-pre-lttrn 11230 ax-pre-ltadd 11231 ax-pre-mulgt0 11232 ax-pre-sup 11233

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2065 df-mo 2540 df-eu 2569 df-clab 2715 df-cleq 2729 df-clel 2816 df-nfc 2892 df-ne 2941 df-nel 3047 df-ral 3062 df-rex 3071 df-rmo 3380 df-reu 3381 df-rab 3437 df-v 3482 df-sbc 3789 df-csb 3900 df-dif 3954 df-un 3956 df-in 3958 df-ss 3968 df-pss 3971 df-nul 4334 df-if 4526 df-pw 4602 df-sn 4627 df-pr 4629 df-op 4633 df-uni 4908 df-int 4947 df-iun 4993 df-iin 4994 df-br 5144 df-opab 5206 df-mpt 5226 df-tr 5260 df-id 5578 df-eprel 5584 df-po 5592 df-so 5593 df-fr 5637 df-se 5638 df-we 5639 df-xp 5691 df-rel 5692 df-cnv 5693 df-co 5694 df-dm 5695 df-rn 5696 df-res 5697 df-ima 5698 df-pred 6321 df-ord 6387 df-on 6388 df-lim 6389 df-suc 6390 df-iota 6514 df-fun 6563 df-fn 6564 df-f 6565 df-f1 6566 df-fo 6567 df-f1o 6568 df-fv 6569 df-isom 6570 df-riota 7388 df-ov 7434 df-oprab 7435 df-mpo 7436 df-om 7888 df-1st 8014 df-2nd 8015 df-frecs 8306 df-wrecs 8337 df-recs 8411 df-rdg 8450 df-1o 8506 df-2o 8507 df-oadd 8510 df-er 8745 df-map 8868 df-en 8986 df-dom 8987 df-sdom 8988 df-fin 8989 df-fi 9451 df-sup 9482 df-inf 9483 df-oi 9550 df-dju 9941 df-card 9979 df-pnf 11297 df-mnf 11298 df-xr 11299 df-ltxr 11300 df-le 11301 df-sub 11494 df-neg 11495 df-div 11921 df-nn 12267 df-2 12329 df-3 12330 df-n0 12527 df-xnn0 12600 df-z 12614 df-uz 12879 df-q 12991 df-rp 13035 df-xneg 13154 df-xadd 13155 df-xmul 13156 df-ioo 13391 df-ioc 13392 df-icc 13394 df-fz 13548 df-fzo 13695 df-fl 13832 df-seq 14043 df-exp 14103 df-hash 14370 df-cj 15138 df-re 15139 df-im 15140 df-sqrt 15274 df-abs 15275 df-rest 17467 df-topgen 17488 df-psmet 21356 df-xmet 21357 df-met 21358 df-bl 21359 df-mopn 21360 df-top 22900 df-topon 22917 df-bases 22953 df-cld 23027 df-ntr 23028 df-cls 23029 df-nei 23106 df-lp 23144 df-cmp 23395

This theorem is referenced by: fourierdlem89 46210 fourierdlem90 46211 fourierdlem91 46212

W3C validator