stoweidlem11 - Mathbox for Glauco Siliprandi

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

Theorem stoweidlem11 46016

Description: This lemma is used to prove that there is a function 𝑔 as in the proof of [BrosowskiDeutsh] p. 92 (at the top of page 92): this lemma proves that g(t) < ( j + 1 / 3 ) * ε. Here 𝐸 is used to represent ε in the paper. (Contributed by Glauco Siliprandi, 20-Apr-2017.)

**Hypotheses**
Ref	Expression
stoweidlem11.1	⊢ (𝜑 → 𝑁 ∈ ℕ)
stoweidlem11.2	⊢ (𝜑 → 𝑡 ∈ 𝑇)
stoweidlem11.3	⊢ (𝜑 → 𝑗 ∈ (1...𝑁))
stoweidlem11.4	⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝑋‘𝑖):𝑇⟶ℝ)
stoweidlem11.5	⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ≤ 1)
stoweidlem11.6	⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → ((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁))
stoweidlem11.7	⊢ (𝜑 → 𝐸 ∈ ℝ⁺)
stoweidlem11.8	⊢ (𝜑 → 𝐸 < (1 / 3))

**Assertion**
Ref	Expression
stoweidlem11	⊢ (𝜑 → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) < ((𝑗 + (1 / 3)) · 𝐸))

Distinct variable groups: 𝑖,𝑗 𝑡,𝑖,𝐸 𝑖,𝑁,𝑡 𝜑,𝑖 𝑡,𝑇 𝑡,𝑋 Allowed substitution hints: 𝜑(𝑡,𝑗) 𝑇(𝑖,𝑗) 𝐸(𝑗) 𝑁(𝑗) 𝑋(𝑖,𝑗)

**Proof of Theorem stoweidlem11**
Step	Hyp	Ref	Expression
1		stoweidlem11.2	. . 3 ⊢ (𝜑 → 𝑡 ∈ 𝑇)
2		sumex 15661	. . 3 ⊢ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ V
3		eqid 2730	. . . 4 ⊢ (𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡))) = (𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))
4	3	fvmpt2 6982	. . 3 ⊢ ((𝑡 ∈ 𝑇 ∧ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ V) → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) = Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))
5	1, 2, 4	sylancl 586	. 2 ⊢ (𝜑 → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) = Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))
6		fzfid 13945	. . . 4 ⊢ (𝜑 → (0...𝑁) ∈ Fin)
7		stoweidlem11.7	. . . . . . 7 ⊢ (𝜑 → 𝐸 ∈ ℝ⁺)
8	7	rpred 13002	. . . . . 6 ⊢ (𝜑 → 𝐸 ∈ ℝ)
9	8	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → 𝐸 ∈ ℝ)
10		stoweidlem11.4	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝑋‘𝑖):𝑇⟶ℝ)
11	1	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → 𝑡 ∈ 𝑇)
12	10, 11	ffvelcdmd 7060	. . . . 5 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ∈ ℝ)
13	9, 12	remulcld 11211	. . . 4 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
14	6, 13	fsumrecl 15707	. . 3 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
15		stoweidlem11.3	. . . . . . 7 ⊢ (𝜑 → 𝑗 ∈ (1...𝑁))
16	15	elfzelzd 13493	. . . . . 6 ⊢ (𝜑 → 𝑗 ∈ ℤ)
17	16	zred 12645	. . . . 5 ⊢ (𝜑 → 𝑗 ∈ ℝ)
18	8, 17	remulcld 11211	. . . 4 ⊢ (𝜑 → (𝐸 · 𝑗) ∈ ℝ)
19		stoweidlem11.1	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
20	19	nnred 12208	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℝ)
21	20, 17	resubcld 11613	. . . . . 6 ⊢ (𝜑 → (𝑁 − 𝑗) ∈ ℝ)
22		1red 11182	. . . . . 6 ⊢ (𝜑 → 1 ∈ ℝ)
23	21, 22	readdcld 11210	. . . . 5 ⊢ (𝜑 → ((𝑁 − 𝑗) + 1) ∈ ℝ)
24	8, 19	nndivred 12247	. . . . . 6 ⊢ (𝜑 → (𝐸 / 𝑁) ∈ ℝ)
25	8, 24	remulcld 11211	. . . . 5 ⊢ (𝜑 → (𝐸 · (𝐸 / 𝑁)) ∈ ℝ)
26	23, 25	remulcld 11211	. . . 4 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))) ∈ ℝ)
27	18, 26	readdcld 11210	. . 3 ⊢ (𝜑 → ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ∈ ℝ)
28		3re 12273	. . . . . . 7 ⊢ 3 ∈ ℝ
29	28	a1i 11	. . . . . 6 ⊢ (𝜑 → 3 ∈ ℝ)
30		3ne0 12299	. . . . . . 7 ⊢ 3 ≠ 0
31	30	a1i 11	. . . . . 6 ⊢ (𝜑 → 3 ≠ 0)
32	29, 31	rereccld 12016	. . . . 5 ⊢ (𝜑 → (1 / 3) ∈ ℝ)
33	17, 32	readdcld 11210	. . . 4 ⊢ (𝜑 → (𝑗 + (1 / 3)) ∈ ℝ)
34	33, 8	remulcld 11211	. . 3 ⊢ (𝜑 → ((𝑗 + (1 / 3)) · 𝐸) ∈ ℝ)
35		fzfid 13945	. . . . . 6 ⊢ (𝜑 → (0...(𝑗 − 1)) ∈ Fin)
36	8	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 𝐸 ∈ ℝ)
37		elfzelz 13492	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (1...𝑁) → 𝑗 ∈ ℤ)
38		peano2zm 12583	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ ℤ → (𝑗 − 1) ∈ ℤ)
39	15, 37, 38	3syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 − 1) ∈ ℤ)
40	19	nnzd 12563	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑁 ∈ ℤ)
41	17, 22	resubcld 11613	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑗 − 1) ∈ ℝ)
42	17	lem1d 12123	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑗 − 1) ≤ 𝑗)
43		elfzuz3 13489	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ (1...𝑁) → 𝑁 ∈ (ℤ_≥‘𝑗))
44		eluzle 12813	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘𝑗) → 𝑗 ≤ 𝑁)
45	15, 43, 44	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑗 ≤ 𝑁)
46	41, 17, 20, 42, 45	letrd 11338	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 − 1) ≤ 𝑁)
47		eluz2 12806	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘(𝑗 − 1)) ↔ ((𝑗 − 1) ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝑗 − 1) ≤ 𝑁))
48	39, 40, 46, 47	syl3anbrc 1344	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘(𝑗 − 1)))
49		fzss2 13532	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘(𝑗 − 1)) → (0...(𝑗 − 1)) ⊆ (0...𝑁))
50	48, 49	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (0...(𝑗 − 1)) ⊆ (0...𝑁))
51	50	sselda 3949	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 𝑖 ∈ (0...𝑁))
52	51, 12	syldan 591	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → ((𝑋‘𝑖)‘𝑡) ∈ ℝ)
53	36, 52	remulcld 11211	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
54	35, 53	fsumrecl 15707	. . . . 5 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
55	54, 26	readdcld 11210	. . . 4 ⊢ (𝜑 → (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ∈ ℝ)
56	17	ltm1d 12122	. . . . . . 7 ⊢ (𝜑 → (𝑗 − 1) < 𝑗)
57		fzdisj 13519	. . . . . . 7 ⊢ ((𝑗 − 1) < 𝑗 → ((0...(𝑗 − 1)) ∩ (𝑗...𝑁)) = ∅)
58	56, 57	syl 17	. . . . . 6 ⊢ (𝜑 → ((0...(𝑗 − 1)) ∩ (𝑗...𝑁)) = ∅)
59		fzssp1 13535	. . . . . . . . . 10 ⊢ (0...(𝑁 − 1)) ⊆ (0...((𝑁 − 1) + 1))
60	19	nncnd 12209	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℂ)
61		1cnd 11176	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℂ)
62	60, 61	npcand 11544	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
63	62	oveq2d 7406	. . . . . . . . . 10 ⊢ (𝜑 → (0...((𝑁 − 1) + 1)) = (0...𝑁))
64	59, 63	sseqtrid 3992	. . . . . . . . 9 ⊢ (𝜑 → (0...(𝑁 − 1)) ⊆ (0...𝑁))
65		1zzd 12571	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℤ)
66		fzsubel 13528	. . . . . . . . . . . 12 ⊢ (((1 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑗 ∈ ℤ ∧ 1 ∈ ℤ)) → (𝑗 ∈ (1...𝑁) ↔ (𝑗 − 1) ∈ ((1 − 1)...(𝑁 − 1))))
67	65, 40, 16, 65, 66	syl22anc 838	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 ∈ (1...𝑁) ↔ (𝑗 − 1) ∈ ((1 − 1)...(𝑁 − 1))))
68	15, 67	mpbid 232	. . . . . . . . . 10 ⊢ (𝜑 → (𝑗 − 1) ∈ ((1 − 1)...(𝑁 − 1)))
69		1m1e0 12265	. . . . . . . . . . 11 ⊢ (1 − 1) = 0
70	69	oveq1i 7400	. . . . . . . . . 10 ⊢ ((1 − 1)...(𝑁 − 1)) = (0...(𝑁 − 1))
71	68, 70	eleqtrdi 2839	. . . . . . . . 9 ⊢ (𝜑 → (𝑗 − 1) ∈ (0...(𝑁 − 1)))
72	64, 71	sseldd 3950	. . . . . . . 8 ⊢ (𝜑 → (𝑗 − 1) ∈ (0...𝑁))
73		fzsplit 13518	. . . . . . . 8 ⊢ ((𝑗 − 1) ∈ (0...𝑁) → (0...𝑁) = ((0...(𝑗 − 1)) ∪ (((𝑗 − 1) + 1)...𝑁)))
74	72, 73	syl 17	. . . . . . 7 ⊢ (𝜑 → (0...𝑁) = ((0...(𝑗 − 1)) ∪ (((𝑗 − 1) + 1)...𝑁)))
75	16	zcnd 12646	. . . . . . . . . 10 ⊢ (𝜑 → 𝑗 ∈ ℂ)
76	75, 61	npcand 11544	. . . . . . . . 9 ⊢ (𝜑 → ((𝑗 − 1) + 1) = 𝑗)
77	76	oveq1d 7405	. . . . . . . 8 ⊢ (𝜑 → (((𝑗 − 1) + 1)...𝑁) = (𝑗...𝑁))
78	77	uneq2d 4134	. . . . . . 7 ⊢ (𝜑 → ((0...(𝑗 − 1)) ∪ (((𝑗 − 1) + 1)...𝑁)) = ((0...(𝑗 − 1)) ∪ (𝑗...𝑁)))
79	74, 78	eqtrd 2765	. . . . . 6 ⊢ (𝜑 → (0...𝑁) = ((0...(𝑗 − 1)) ∪ (𝑗...𝑁)))
80	7	rpcnd 13004	. . . . . . . 8 ⊢ (𝜑 → 𝐸 ∈ ℂ)
81	80	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → 𝐸 ∈ ℂ)
82	12	recnd 11209	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ∈ ℂ)
83	81, 82	mulcld 11201	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℂ)
84	58, 79, 6, 83	fsumsplit 15714	. . . . 5 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) = (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡))))
85		fzfid 13945	. . . . . . 7 ⊢ (𝜑 → (𝑗...𝑁) ∈ Fin)
86	8	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝐸 ∈ ℝ)
87		0zd 12548	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 ∈ ℤ)
88		0red 11184	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ∈ ℝ)
89		0le1 11708	. . . . . . . . . . . . . . 15 ⊢ 0 ≤ 1
90	89	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ≤ 1)
91		elfzuz 13488	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ (1...𝑁) → 𝑗 ∈ (ℤ_≥‘1))
92	15, 91	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑗 ∈ (ℤ_≥‘1))
93		eluz2 12806	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 ∈ (ℤ_≥‘1) ↔ (1 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 1 ≤ 𝑗))
94	92, 93	sylib 218	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (1 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 1 ≤ 𝑗))
95	94	simp3d 1144	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ≤ 𝑗)
96	88, 22, 17, 90, 95	letrd 11338	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 ≤ 𝑗)
97		eluz2 12806	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ (ℤ_≥‘0) ↔ (0 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 0 ≤ 𝑗))
98	87, 16, 96, 97	syl3anbrc 1344	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑗 ∈ (ℤ_≥‘0))
99		fzss1 13531	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (ℤ_≥‘0) → (𝑗...𝑁) ⊆ (0...𝑁))
100	98, 99	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗...𝑁) ⊆ (0...𝑁))
101	100	sselda 3949	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝑖 ∈ (0...𝑁))
102	101, 10	syldan 591	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝑋‘𝑖):𝑇⟶ℝ)
103	1	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝑡 ∈ 𝑇)
104	102, 103	ffvelcdmd 7060	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → ((𝑋‘𝑖)‘𝑡) ∈ ℝ)
105	86, 104	remulcld 11211	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
106	85, 105	fsumrecl 15707	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
107		eluzfz2 13500	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘𝑗) → 𝑁 ∈ (𝑗...𝑁))
108		ne0i 4307	. . . . . . . . 9 ⊢ (𝑁 ∈ (𝑗...𝑁) → (𝑗...𝑁) ≠ ∅)
109	15, 43, 107, 108	4syl 19	. . . . . . . 8 ⊢ (𝜑 → (𝑗...𝑁) ≠ ∅)
110	19	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝑁 ∈ ℕ)
111	86, 110	nndivred 12247	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 / 𝑁) ∈ ℝ)
112	86, 111	remulcld 11211	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 · (𝐸 / 𝑁)) ∈ ℝ)
113		stoweidlem11.6	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → ((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁))
114	7	rpgt0d 13005	. . . . . . . . . . 11 ⊢ (𝜑 → 0 < 𝐸)
115	114	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 0 < 𝐸)
116		ltmul2 12040	. . . . . . . . . 10 ⊢ ((((𝑋‘𝑖)‘𝑡) ∈ ℝ ∧ (𝐸 / 𝑁) ∈ ℝ ∧ (𝐸 ∈ ℝ ∧ 0 < 𝐸)) → (((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁) ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) < (𝐸 · (𝐸 / 𝑁))))
117	104, 111, 86, 115, 116	syl112anc 1376	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁) ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) < (𝐸 · (𝐸 / 𝑁))))
118	113, 117	mpbid 232	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) < (𝐸 · (𝐸 / 𝑁)))
119	85, 109, 105, 112, 118	fsumlt 15773	. . . . . . 7 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)))
120	19	nnne0d 12243	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑁 ≠ 0)
121	80, 60, 120	divcld 11965	. . . . . . . . . 10 ⊢ (𝜑 → (𝐸 / 𝑁) ∈ ℂ)
122	80, 121	mulcld 11201	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 · (𝐸 / 𝑁)) ∈ ℂ)
123		fsumconst 15763	. . . . . . . . 9 ⊢ (((𝑗...𝑁) ∈ Fin ∧ (𝐸 · (𝐸 / 𝑁)) ∈ ℂ) → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)) = ((♯‘(𝑗...𝑁)) · (𝐸 · (𝐸 / 𝑁))))
124	85, 122, 123	syl2anc 584	. . . . . . . 8 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)) = ((♯‘(𝑗...𝑁)) · (𝐸 · (𝐸 / 𝑁))))
125		hashfz 14399	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘𝑗) → (♯‘(𝑗...𝑁)) = ((𝑁 − 𝑗) + 1))
126	15, 43, 125	3syl 18	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(𝑗...𝑁)) = ((𝑁 − 𝑗) + 1))
127	126	oveq1d 7405	. . . . . . . 8 ⊢ (𝜑 → ((♯‘(𝑗...𝑁)) · (𝐸 · (𝐸 / 𝑁))) = (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
128	124, 127	eqtrd 2765	. . . . . . 7 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)) = (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
129	119, 128	breqtrd 5136	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
130	106, 26, 54, 129	ltadd2dd 11340	. . . . 5 ⊢ (𝜑 → (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡))) < (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
131	84, 130	eqbrtrd 5132	. . . 4 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
132		stoweidlem11.5	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ≤ 1)
133	51, 132	syldan 591	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → ((𝑋‘𝑖)‘𝑡) ≤ 1)
134		1red 11182	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 1 ∈ ℝ)
135	114	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 0 < 𝐸)
136		lemul2 12042	. . . . . . . . . 10 ⊢ ((((𝑋‘𝑖)‘𝑡) ∈ ℝ ∧ 1 ∈ ℝ ∧ (𝐸 ∈ ℝ ∧ 0 < 𝐸)) → (((𝑋‘𝑖)‘𝑡) ≤ 1 ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ (𝐸 · 1)))
137	52, 134, 36, 135, 136	syl112anc 1376	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (((𝑋‘𝑖)‘𝑡) ≤ 1 ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ (𝐸 · 1)))
138	133, 137	mpbid 232	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ (𝐸 · 1))
139	80	mulridd 11198	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 · 1) = 𝐸)
140	139	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · 1) = 𝐸)
141	138, 140	breqtrd 5136	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ 𝐸)
142	35, 53, 36, 141	fsumle 15772	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ Σ𝑖 ∈ (0...(𝑗 − 1))𝐸)
143		fsumconst 15763	. . . . . . . 8 ⊢ (((0...(𝑗 − 1)) ∈ Fin ∧ 𝐸 ∈ ℂ) → Σ𝑖 ∈ (0...(𝑗 − 1))𝐸 = ((♯‘(0...(𝑗 − 1))) · 𝐸))
144	35, 80, 143	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))𝐸 = ((♯‘(0...(𝑗 − 1))) · 𝐸))
145		0z 12547	. . . . . . . . . . 11 ⊢ 0 ∈ ℤ
146		1e0p1 12698	. . . . . . . . . . . . 13 ⊢ 1 = (0 + 1)
147	146	fveq2i 6864	. . . . . . . . . . . 12 ⊢ (ℤ_≥‘1) = (ℤ_≥‘(0 + 1))
148	92, 147	eleqtrdi 2839	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑗 ∈ (ℤ_≥‘(0 + 1)))
149		eluzp1m1 12826	. . . . . . . . . . 11 ⊢ ((0 ∈ ℤ ∧ 𝑗 ∈ (ℤ_≥‘(0 + 1))) → (𝑗 − 1) ∈ (ℤ_≥‘0))
150	145, 148, 149	sylancr 587	. . . . . . . . . 10 ⊢ (𝜑 → (𝑗 − 1) ∈ (ℤ_≥‘0))
151		hashfz 14399	. . . . . . . . . 10 ⊢ ((𝑗 − 1) ∈ (ℤ_≥‘0) → (♯‘(0...(𝑗 − 1))) = (((𝑗 − 1) − 0) + 1))
152	150, 151	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(0...(𝑗 − 1))) = (((𝑗 − 1) − 0) + 1))
153	75, 61	subcld 11540	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 − 1) ∈ ℂ)
154	153	subid1d 11529	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑗 − 1) − 0) = (𝑗 − 1))
155	154	oveq1d 7405	. . . . . . . . 9 ⊢ (𝜑 → (((𝑗 − 1) − 0) + 1) = ((𝑗 − 1) + 1))
156	152, 155, 76	3eqtrd 2769	. . . . . . . 8 ⊢ (𝜑 → (♯‘(0...(𝑗 − 1))) = 𝑗)
157	156	oveq1d 7405	. . . . . . 7 ⊢ (𝜑 → ((♯‘(0...(𝑗 − 1))) · 𝐸) = (𝑗 · 𝐸))
158	75, 80	mulcomd 11202	. . . . . . 7 ⊢ (𝜑 → (𝑗 · 𝐸) = (𝐸 · 𝑗))
159	144, 157, 158	3eqtrd 2769	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))𝐸 = (𝐸 · 𝑗))
160	142, 159	breqtrd 5136	. . . . 5 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ (𝐸 · 𝑗))
161	54, 18, 26, 160	leadd1dd 11799	. . . 4 ⊢ (𝜑 → (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ≤ ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
162	14, 55, 27, 131, 161	ltletrd 11341	. . 3 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
163	8, 8	remulcld 11211	. . . . 5 ⊢ (𝜑 → (𝐸 · 𝐸) ∈ ℝ)
164	18, 163	readdcld 11210	. . . 4 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) ∈ ℝ)
165	60, 75	subcld 11540	. . . . . . . 8 ⊢ (𝜑 → (𝑁 − 𝑗) ∈ ℂ)
166	165, 61	addcld 11200	. . . . . . 7 ⊢ (𝜑 → ((𝑁 − 𝑗) + 1) ∈ ℂ)
167	80, 166, 121	mul12d 11390	. . . . . 6 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) = (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
168	167	oveq2d 7406	. . . . 5 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)))) = ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
169	23, 24	remulcld 11211	. . . . . . 7 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) ∈ ℝ)
170	8, 169	remulcld 11211	. . . . . 6 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) ∈ ℝ)
171	166, 80, 60, 120	div12d 12001	. . . . . . . 8 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) = (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)))
172	22, 17	resubcld 11613	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 − 𝑗) ∈ ℝ)
173		elfzle1 13495	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 ∈ (1...𝑁) → 1 ≤ 𝑗)
174	15, 173	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 1 ≤ 𝑗)
175	22, 17	suble0d 11776	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((1 − 𝑗) ≤ 0 ↔ 1 ≤ 𝑗))
176	174, 175	mpbird 257	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 − 𝑗) ≤ 0)
177	172, 88, 20, 176	leadd2dd 11800	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + (1 − 𝑗)) ≤ (𝑁 + 0))
178	60, 61, 75	addsub12d 11563	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑁 + (1 − 𝑗)) = (1 + (𝑁 − 𝑗)))
179	61, 165	addcomd 11383	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 + (𝑁 − 𝑗)) = ((𝑁 − 𝑗) + 1))
180	178, 179	eqtrd 2765	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + (1 − 𝑗)) = ((𝑁 − 𝑗) + 1))
181	60	addridd 11381	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + 0) = 𝑁)
182	177, 180, 181	3brtr3d 5141	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑁 − 𝑗) + 1) ≤ 𝑁)
183	19	nngt0d 12242	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 < 𝑁)
184		lediv1 12055	. . . . . . . . . . . . 13 ⊢ ((((𝑁 − 𝑗) + 1) ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ (𝑁 ∈ ℝ ∧ 0 < 𝑁)) → (((𝑁 − 𝑗) + 1) ≤ 𝑁 ↔ (((𝑁 − 𝑗) + 1) / 𝑁) ≤ (𝑁 / 𝑁)))
185	23, 20, 20, 183, 184	syl112anc 1376	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) ≤ 𝑁 ↔ (((𝑁 − 𝑗) + 1) / 𝑁) ≤ (𝑁 / 𝑁)))
186	182, 185	mpbid 232	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) / 𝑁) ≤ (𝑁 / 𝑁))
187	60, 120	dividd 11963	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑁 / 𝑁) = 1)
188	186, 187	breqtrd 5136	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) / 𝑁) ≤ 1)
189	23, 19	nndivred 12247	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) / 𝑁) ∈ ℝ)
190	189, 22, 7	lemul2d 13046	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝑁 − 𝑗) + 1) / 𝑁) ≤ 1 ↔ (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)) ≤ (𝐸 · 1)))
191	188, 190	mpbid 232	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)) ≤ (𝐸 · 1))
192	191, 139	breqtrd 5136	. . . . . . . 8 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)) ≤ 𝐸)
193	171, 192	eqbrtrd 5132	. . . . . . 7 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) ≤ 𝐸)
194	169, 8, 7	lemul2d 13046	. . . . . . 7 ⊢ (𝜑 → ((((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) ≤ 𝐸 ↔ (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) ≤ (𝐸 · 𝐸)))
195	193, 194	mpbid 232	. . . . . 6 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) ≤ (𝐸 · 𝐸))
196	170, 163, 18, 195	leadd2dd 11800	. . . . 5 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)))) ≤ ((𝐸 · 𝑗) + (𝐸 · 𝐸)))
197	168, 196	eqbrtrrd 5134	. . . 4 ⊢ (𝜑 → ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ≤ ((𝐸 · 𝑗) + (𝐸 · 𝐸)))
198	80, 75	mulcomd 11202	. . . . . . 7 ⊢ (𝜑 → (𝐸 · 𝑗) = (𝑗 · 𝐸))
199	198	oveq1d 7405	. . . . . 6 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) = ((𝑗 · 𝐸) + (𝐸 · 𝐸)))
200	75, 80, 80	adddird 11206	. . . . . 6 ⊢ (𝜑 → ((𝑗 + 𝐸) · 𝐸) = ((𝑗 · 𝐸) + (𝐸 · 𝐸)))
201	199, 200	eqtr4d 2768	. . . . 5 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) = ((𝑗 + 𝐸) · 𝐸))
202	17, 8	readdcld 11210	. . . . . 6 ⊢ (𝜑 → (𝑗 + 𝐸) ∈ ℝ)
203		stoweidlem11.8	. . . . . . 7 ⊢ (𝜑 → 𝐸 < (1 / 3))
204	8, 32, 17, 203	ltadd2dd 11340	. . . . . 6 ⊢ (𝜑 → (𝑗 + 𝐸) < (𝑗 + (1 / 3)))
205	202, 33, 7, 204	ltmul1dd 13057	. . . . 5 ⊢ (𝜑 → ((𝑗 + 𝐸) · 𝐸) < ((𝑗 + (1 / 3)) · 𝐸))
206	201, 205	eqbrtrd 5132	. . . 4 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) < ((𝑗 + (1 / 3)) · 𝐸))
207	27, 164, 34, 197, 206	lelttrd 11339	. . 3 ⊢ (𝜑 → ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) < ((𝑗 + (1 / 3)) · 𝐸))
208	14, 27, 34, 162, 207	lttrd 11342	. 2 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < ((𝑗 + (1 / 3)) · 𝐸))
209	5, 208	eqbrtrd 5132	1 ⊢ (𝜑 → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) < ((𝑗 + (1 / 3)) · 𝐸))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 ≠ wne 2926 Vcvv 3450 ∪ cun 3915 ∩ cin 3916 ⊆ wss 3917 ∅c0 4299 class class class wbr 5110 ↦ cmpt 5191 ⟶wf 6510 ‘cfv 6514 (class class class)co 7390 Fincfn 8921 ℂcc 11073 ℝcr 11074 0cc0 11075 1c1 11076 + caddc 11078 · cmul 11080 < clt 11215 ≤ cle 11216 − cmin 11412 / cdiv 11842 ℕcn 12193 3c3 12249 ℤcz 12536 ℤ_≥cuz 12800 ℝ⁺crp 12958 ...cfz 13475 ♯chash 14302 Σcsu 15659

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 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2702 ax-rep 5237 ax-sep 5254 ax-nul 5264 ax-pow 5323 ax-pr 5390 ax-un 7714 ax-inf2 9601 ax-cnex 11131 ax-resscn 11132 ax-1cn 11133 ax-icn 11134 ax-addcl 11135 ax-addrcl 11136 ax-mulcl 11137 ax-mulrcl 11138 ax-mulcom 11139 ax-addass 11140 ax-mulass 11141 ax-distr 11142 ax-i2m1 11143 ax-1ne0 11144 ax-1rid 11145 ax-rnegex 11146 ax-rrecex 11147 ax-cnre 11148 ax-pre-lttri 11149 ax-pre-lttrn 11150 ax-pre-ltadd 11151 ax-pre-mulgt0 11152 ax-pre-sup 11153

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2534 df-eu 2563 df-clab 2709 df-cleq 2722 df-clel 2804 df-nfc 2879 df-ne 2927 df-nel 3031 df-ral 3046 df-rex 3055 df-rmo 3356 df-reu 3357 df-rab 3409 df-v 3452 df-sbc 3757 df-csb 3866 df-dif 3920 df-un 3922 df-in 3924 df-ss 3934 df-pss 3937 df-nul 4300 df-if 4492 df-pw 4568 df-sn 4593 df-pr 4595 df-op 4599 df-uni 4875 df-int 4914 df-iun 4960 df-br 5111 df-opab 5173 df-mpt 5192 df-tr 5218 df-id 5536 df-eprel 5541 df-po 5549 df-so 5550 df-fr 5594 df-se 5595 df-we 5596 df-xp 5647 df-rel 5648 df-cnv 5649 df-co 5650 df-dm 5651 df-rn 5652 df-res 5653 df-ima 5654 df-pred 6277 df-ord 6338 df-on 6339 df-lim 6340 df-suc 6341 df-iota 6467 df-fun 6516 df-fn 6517 df-f 6518 df-f1 6519 df-fo 6520 df-f1o 6521 df-fv 6522 df-isom 6523 df-riota 7347 df-ov 7393 df-oprab 7394 df-mpo 7395 df-om 7846 df-1st 7971 df-2nd 7972 df-frecs 8263 df-wrecs 8294 df-recs 8343 df-rdg 8381 df-1o 8437 df-er 8674 df-en 8922 df-dom 8923 df-sdom 8924 df-fin 8925 df-sup 9400 df-oi 9470 df-card 9899 df-pnf 11217 df-mnf 11218 df-xr 11219 df-ltxr 11220 df-le 11221 df-sub 11414 df-neg 11415 df-div 11843 df-nn 12194 df-2 12256 df-3 12257 df-n0 12450 df-z 12537 df-uz 12801 df-rp 12959 df-ico 13319 df-fz 13476 df-fzo 13623 df-seq 13974 df-exp 14034 df-hash 14303 df-cj 15072 df-re 15073 df-im 15074 df-sqrt 15208 df-abs 15209 df-clim 15461 df-sum 15660

This theorem is referenced by: stoweidlem34 46039

W3C validator