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 46119

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 15595	. . 3 ⊢ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ V
3		eqid 2731	. . . 4 ⊢ (𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡))) = (𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))
4	3	fvmpt2 6940	. . 3 ⊢ ((𝑡 ∈ 𝑇 ∧ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ V) → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) = Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))
5	1, 2, 4	sylancl 586	. 2 ⊢ (𝜑 → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) = Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))
6		fzfid 13880	. . . 4 ⊢ (𝜑 → (0...𝑁) ∈ Fin)
7		stoweidlem11.7	. . . . . . 7 ⊢ (𝜑 → 𝐸 ∈ ℝ⁺)
8	7	rpred 12934	. . . . . 6 ⊢ (𝜑 → 𝐸 ∈ ℝ)
9	8	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → 𝐸 ∈ ℝ)
10		stoweidlem11.4	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝑋‘𝑖):𝑇⟶ℝ)
11	1	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → 𝑡 ∈ 𝑇)
12	10, 11	ffvelcdmd 7018	. . . . 5 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ∈ ℝ)
13	9, 12	remulcld 11142	. . . 4 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
14	6, 13	fsumrecl 15641	. . 3 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
15		stoweidlem11.3	. . . . . . 7 ⊢ (𝜑 → 𝑗 ∈ (1...𝑁))
16	15	elfzelzd 13425	. . . . . 6 ⊢ (𝜑 → 𝑗 ∈ ℤ)
17	16	zred 12577	. . . . 5 ⊢ (𝜑 → 𝑗 ∈ ℝ)
18	8, 17	remulcld 11142	. . . 4 ⊢ (𝜑 → (𝐸 · 𝑗) ∈ ℝ)
19		stoweidlem11.1	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
20	19	nnred 12140	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℝ)
21	20, 17	resubcld 11545	. . . . . 6 ⊢ (𝜑 → (𝑁 − 𝑗) ∈ ℝ)
22		1red 11113	. . . . . 6 ⊢ (𝜑 → 1 ∈ ℝ)
23	21, 22	readdcld 11141	. . . . 5 ⊢ (𝜑 → ((𝑁 − 𝑗) + 1) ∈ ℝ)
24	8, 19	nndivred 12179	. . . . . 6 ⊢ (𝜑 → (𝐸 / 𝑁) ∈ ℝ)
25	8, 24	remulcld 11142	. . . . 5 ⊢ (𝜑 → (𝐸 · (𝐸 / 𝑁)) ∈ ℝ)
26	23, 25	remulcld 11142	. . . 4 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))) ∈ ℝ)
27	18, 26	readdcld 11141	. . 3 ⊢ (𝜑 → ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ∈ ℝ)
28		3re 12205	. . . . . . 7 ⊢ 3 ∈ ℝ
29	28	a1i 11	. . . . . 6 ⊢ (𝜑 → 3 ∈ ℝ)
30		3ne0 12231	. . . . . . 7 ⊢ 3 ≠ 0
31	30	a1i 11	. . . . . 6 ⊢ (𝜑 → 3 ≠ 0)
32	29, 31	rereccld 11948	. . . . 5 ⊢ (𝜑 → (1 / 3) ∈ ℝ)
33	17, 32	readdcld 11141	. . . 4 ⊢ (𝜑 → (𝑗 + (1 / 3)) ∈ ℝ)
34	33, 8	remulcld 11142	. . 3 ⊢ (𝜑 → ((𝑗 + (1 / 3)) · 𝐸) ∈ ℝ)
35		fzfid 13880	. . . . . 6 ⊢ (𝜑 → (0...(𝑗 − 1)) ∈ Fin)
36	8	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 𝐸 ∈ ℝ)
37		elfzelz 13424	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (1...𝑁) → 𝑗 ∈ ℤ)
38		peano2zm 12515	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ ℤ → (𝑗 − 1) ∈ ℤ)
39	15, 37, 38	3syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 − 1) ∈ ℤ)
40	19	nnzd 12495	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑁 ∈ ℤ)
41	17, 22	resubcld 11545	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑗 − 1) ∈ ℝ)
42	17	lem1d 12055	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑗 − 1) ≤ 𝑗)
43		elfzuz3 13421	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ (1...𝑁) → 𝑁 ∈ (ℤ_≥‘𝑗))
44		eluzle 12745	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘𝑗) → 𝑗 ≤ 𝑁)
45	15, 43, 44	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑗 ≤ 𝑁)
46	41, 17, 20, 42, 45	letrd 11270	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 − 1) ≤ 𝑁)
47		eluz2 12738	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘(𝑗 − 1)) ↔ ((𝑗 − 1) ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝑗 − 1) ≤ 𝑁))
48	39, 40, 46, 47	syl3anbrc 1344	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘(𝑗 − 1)))
49		fzss2 13464	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘(𝑗 − 1)) → (0...(𝑗 − 1)) ⊆ (0...𝑁))
50	48, 49	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (0...(𝑗 − 1)) ⊆ (0...𝑁))
51	50	sselda 3929	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 𝑖 ∈ (0...𝑁))
52	51, 12	syldan 591	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → ((𝑋‘𝑖)‘𝑡) ∈ ℝ)
53	36, 52	remulcld 11142	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
54	35, 53	fsumrecl 15641	. . . . 5 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
55	54, 26	readdcld 11141	. . . 4 ⊢ (𝜑 → (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ∈ ℝ)
56	17	ltm1d 12054	. . . . . . 7 ⊢ (𝜑 → (𝑗 − 1) < 𝑗)
57		fzdisj 13451	. . . . . . 7 ⊢ ((𝑗 − 1) < 𝑗 → ((0...(𝑗 − 1)) ∩ (𝑗...𝑁)) = ∅)
58	56, 57	syl 17	. . . . . 6 ⊢ (𝜑 → ((0...(𝑗 − 1)) ∩ (𝑗...𝑁)) = ∅)
59		fzssp1 13467	. . . . . . . . . 10 ⊢ (0...(𝑁 − 1)) ⊆ (0...((𝑁 − 1) + 1))
60	19	nncnd 12141	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℂ)
61		1cnd 11107	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℂ)
62	60, 61	npcand 11476	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
63	62	oveq2d 7362	. . . . . . . . . 10 ⊢ (𝜑 → (0...((𝑁 − 1) + 1)) = (0...𝑁))
64	59, 63	sseqtrid 3972	. . . . . . . . 9 ⊢ (𝜑 → (0...(𝑁 − 1)) ⊆ (0...𝑁))
65		1zzd 12503	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℤ)
66		fzsubel 13460	. . . . . . . . . . . 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 12197	. . . . . . . . . . 11 ⊢ (1 − 1) = 0
70	69	oveq1i 7356	. . . . . . . . . 10 ⊢ ((1 − 1)...(𝑁 − 1)) = (0...(𝑁 − 1))
71	68, 70	eleqtrdi 2841	. . . . . . . . 9 ⊢ (𝜑 → (𝑗 − 1) ∈ (0...(𝑁 − 1)))
72	64, 71	sseldd 3930	. . . . . . . 8 ⊢ (𝜑 → (𝑗 − 1) ∈ (0...𝑁))
73		fzsplit 13450	. . . . . . . 8 ⊢ ((𝑗 − 1) ∈ (0...𝑁) → (0...𝑁) = ((0...(𝑗 − 1)) ∪ (((𝑗 − 1) + 1)...𝑁)))
74	72, 73	syl 17	. . . . . . 7 ⊢ (𝜑 → (0...𝑁) = ((0...(𝑗 − 1)) ∪ (((𝑗 − 1) + 1)...𝑁)))
75	16	zcnd 12578	. . . . . . . . . 10 ⊢ (𝜑 → 𝑗 ∈ ℂ)
76	75, 61	npcand 11476	. . . . . . . . 9 ⊢ (𝜑 → ((𝑗 − 1) + 1) = 𝑗)
77	76	oveq1d 7361	. . . . . . . 8 ⊢ (𝜑 → (((𝑗 − 1) + 1)...𝑁) = (𝑗...𝑁))
78	77	uneq2d 4115	. . . . . . 7 ⊢ (𝜑 → ((0...(𝑗 − 1)) ∪ (((𝑗 − 1) + 1)...𝑁)) = ((0...(𝑗 − 1)) ∪ (𝑗...𝑁)))
79	74, 78	eqtrd 2766	. . . . . 6 ⊢ (𝜑 → (0...𝑁) = ((0...(𝑗 − 1)) ∪ (𝑗...𝑁)))
80	7	rpcnd 12936	. . . . . . . 8 ⊢ (𝜑 → 𝐸 ∈ ℂ)
81	80	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → 𝐸 ∈ ℂ)
82	12	recnd 11140	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ∈ ℂ)
83	81, 82	mulcld 11132	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℂ)
84	58, 79, 6, 83	fsumsplit 15648	. . . . 5 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) = (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡))))
85		fzfid 13880	. . . . . . 7 ⊢ (𝜑 → (𝑗...𝑁) ∈ Fin)
86	8	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝐸 ∈ ℝ)
87		0zd 12480	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 ∈ ℤ)
88		0red 11115	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ∈ ℝ)
89		0le1 11640	. . . . . . . . . . . . . . 15 ⊢ 0 ≤ 1
90	89	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ≤ 1)
91		elfzuz 13420	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ (1...𝑁) → 𝑗 ∈ (ℤ_≥‘1))
92	15, 91	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑗 ∈ (ℤ_≥‘1))
93		eluz2 12738	. . . . . . . . . . . . . . . 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 11270	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 ≤ 𝑗)
97		eluz2 12738	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ (ℤ_≥‘0) ↔ (0 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 0 ≤ 𝑗))
98	87, 16, 96, 97	syl3anbrc 1344	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑗 ∈ (ℤ_≥‘0))
99		fzss1 13463	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (ℤ_≥‘0) → (𝑗...𝑁) ⊆ (0...𝑁))
100	98, 99	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗...𝑁) ⊆ (0...𝑁))
101	100	sselda 3929	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝑖 ∈ (0...𝑁))
102	101, 10	syldan 591	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝑋‘𝑖):𝑇⟶ℝ)
103	1	adantr 480	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝑡 ∈ 𝑇)
104	102, 103	ffvelcdmd 7018	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → ((𝑋‘𝑖)‘𝑡) ∈ ℝ)
105	86, 104	remulcld 11142	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
106	85, 105	fsumrecl 15641	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
107		eluzfz2 13432	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘𝑗) → 𝑁 ∈ (𝑗...𝑁))
108		ne0i 4288	. . . . . . . . 9 ⊢ (𝑁 ∈ (𝑗...𝑁) → (𝑗...𝑁) ≠ ∅)
109	15, 43, 107, 108	4syl 19	. . . . . . . 8 ⊢ (𝜑 → (𝑗...𝑁) ≠ ∅)
110	19	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝑁 ∈ ℕ)
111	86, 110	nndivred 12179	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 / 𝑁) ∈ ℝ)
112	86, 111	remulcld 11142	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 · (𝐸 / 𝑁)) ∈ ℝ)
113		stoweidlem11.6	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → ((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁))
114	7	rpgt0d 12937	. . . . . . . . . . 11 ⊢ (𝜑 → 0 < 𝐸)
115	114	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 0 < 𝐸)
116		ltmul2 11972	. . . . . . . . . 10 ⊢ ((((𝑋‘𝑖)‘𝑡) ∈ ℝ ∧ (𝐸 / 𝑁) ∈ ℝ ∧ (𝐸 ∈ ℝ ∧ 0 < 𝐸)) → (((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁) ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) < (𝐸 · (𝐸 / 𝑁))))
117	104, 111, 86, 115, 116	syl112anc 1376	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁) ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) < (𝐸 · (𝐸 / 𝑁))))
118	113, 117	mpbid 232	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) < (𝐸 · (𝐸 / 𝑁)))
119	85, 109, 105, 112, 118	fsumlt 15707	. . . . . . 7 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)))
120	19	nnne0d 12175	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑁 ≠ 0)
121	80, 60, 120	divcld 11897	. . . . . . . . . 10 ⊢ (𝜑 → (𝐸 / 𝑁) ∈ ℂ)
122	80, 121	mulcld 11132	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 · (𝐸 / 𝑁)) ∈ ℂ)
123		fsumconst 15697	. . . . . . . . 9 ⊢ (((𝑗...𝑁) ∈ Fin ∧ (𝐸 · (𝐸 / 𝑁)) ∈ ℂ) → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)) = ((♯‘(𝑗...𝑁)) · (𝐸 · (𝐸 / 𝑁))))
124	85, 122, 123	syl2anc 584	. . . . . . . 8 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)) = ((♯‘(𝑗...𝑁)) · (𝐸 · (𝐸 / 𝑁))))
125		hashfz 14334	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘𝑗) → (♯‘(𝑗...𝑁)) = ((𝑁 − 𝑗) + 1))
126	15, 43, 125	3syl 18	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(𝑗...𝑁)) = ((𝑁 − 𝑗) + 1))
127	126	oveq1d 7361	. . . . . . . 8 ⊢ (𝜑 → ((♯‘(𝑗...𝑁)) · (𝐸 · (𝐸 / 𝑁))) = (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
128	124, 127	eqtrd 2766	. . . . . . 7 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)) = (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
129	119, 128	breqtrd 5115	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
130	106, 26, 54, 129	ltadd2dd 11272	. . . . 5 ⊢ (𝜑 → (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡))) < (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
131	84, 130	eqbrtrd 5111	. . . 4 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
132		stoweidlem11.5	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ≤ 1)
133	51, 132	syldan 591	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → ((𝑋‘𝑖)‘𝑡) ≤ 1)
134		1red 11113	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 1 ∈ ℝ)
135	114	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 0 < 𝐸)
136		lemul2 11974	. . . . . . . . . 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 11129	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 · 1) = 𝐸)
140	139	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · 1) = 𝐸)
141	138, 140	breqtrd 5115	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ 𝐸)
142	35, 53, 36, 141	fsumle 15706	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ Σ𝑖 ∈ (0...(𝑗 − 1))𝐸)
143		fsumconst 15697	. . . . . . . 8 ⊢ (((0...(𝑗 − 1)) ∈ Fin ∧ 𝐸 ∈ ℂ) → Σ𝑖 ∈ (0...(𝑗 − 1))𝐸 = ((♯‘(0...(𝑗 − 1))) · 𝐸))
144	35, 80, 143	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))𝐸 = ((♯‘(0...(𝑗 − 1))) · 𝐸))
145		0z 12479	. . . . . . . . . . 11 ⊢ 0 ∈ ℤ
146		1e0p1 12630	. . . . . . . . . . . . 13 ⊢ 1 = (0 + 1)
147	146	fveq2i 6825	. . . . . . . . . . . 12 ⊢ (ℤ_≥‘1) = (ℤ_≥‘(0 + 1))
148	92, 147	eleqtrdi 2841	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑗 ∈ (ℤ_≥‘(0 + 1)))
149		eluzp1m1 12758	. . . . . . . . . . 11 ⊢ ((0 ∈ ℤ ∧ 𝑗 ∈ (ℤ_≥‘(0 + 1))) → (𝑗 − 1) ∈ (ℤ_≥‘0))
150	145, 148, 149	sylancr 587	. . . . . . . . . 10 ⊢ (𝜑 → (𝑗 − 1) ∈ (ℤ_≥‘0))
151		hashfz 14334	. . . . . . . . . 10 ⊢ ((𝑗 − 1) ∈ (ℤ_≥‘0) → (♯‘(0...(𝑗 − 1))) = (((𝑗 − 1) − 0) + 1))
152	150, 151	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(0...(𝑗 − 1))) = (((𝑗 − 1) − 0) + 1))
153	75, 61	subcld 11472	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 − 1) ∈ ℂ)
154	153	subid1d 11461	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑗 − 1) − 0) = (𝑗 − 1))
155	154	oveq1d 7361	. . . . . . . . 9 ⊢ (𝜑 → (((𝑗 − 1) − 0) + 1) = ((𝑗 − 1) + 1))
156	152, 155, 76	3eqtrd 2770	. . . . . . . 8 ⊢ (𝜑 → (♯‘(0...(𝑗 − 1))) = 𝑗)
157	156	oveq1d 7361	. . . . . . 7 ⊢ (𝜑 → ((♯‘(0...(𝑗 − 1))) · 𝐸) = (𝑗 · 𝐸))
158	75, 80	mulcomd 11133	. . . . . . 7 ⊢ (𝜑 → (𝑗 · 𝐸) = (𝐸 · 𝑗))
159	144, 157, 158	3eqtrd 2770	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))𝐸 = (𝐸 · 𝑗))
160	142, 159	breqtrd 5115	. . . . 5 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ (𝐸 · 𝑗))
161	54, 18, 26, 160	leadd1dd 11731	. . . 4 ⊢ (𝜑 → (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ≤ ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
162	14, 55, 27, 131, 161	ltletrd 11273	. . 3 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
163	8, 8	remulcld 11142	. . . . 5 ⊢ (𝜑 → (𝐸 · 𝐸) ∈ ℝ)
164	18, 163	readdcld 11141	. . . 4 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) ∈ ℝ)
165	60, 75	subcld 11472	. . . . . . . 8 ⊢ (𝜑 → (𝑁 − 𝑗) ∈ ℂ)
166	165, 61	addcld 11131	. . . . . . 7 ⊢ (𝜑 → ((𝑁 − 𝑗) + 1) ∈ ℂ)
167	80, 166, 121	mul12d 11322	. . . . . 6 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) = (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
168	167	oveq2d 7362	. . . . 5 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)))) = ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
169	23, 24	remulcld 11142	. . . . . . 7 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) ∈ ℝ)
170	8, 169	remulcld 11142	. . . . . 6 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) ∈ ℝ)
171	166, 80, 60, 120	div12d 11933	. . . . . . . 8 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) = (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)))
172	22, 17	resubcld 11545	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 − 𝑗) ∈ ℝ)
173		elfzle1 13427	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 ∈ (1...𝑁) → 1 ≤ 𝑗)
174	15, 173	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 1 ≤ 𝑗)
175	22, 17	suble0d 11708	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((1 − 𝑗) ≤ 0 ↔ 1 ≤ 𝑗))
176	174, 175	mpbird 257	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 − 𝑗) ≤ 0)
177	172, 88, 20, 176	leadd2dd 11732	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + (1 − 𝑗)) ≤ (𝑁 + 0))
178	60, 61, 75	addsub12d 11495	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑁 + (1 − 𝑗)) = (1 + (𝑁 − 𝑗)))
179	61, 165	addcomd 11315	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 + (𝑁 − 𝑗)) = ((𝑁 − 𝑗) + 1))
180	178, 179	eqtrd 2766	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + (1 − 𝑗)) = ((𝑁 − 𝑗) + 1))
181	60	addridd 11313	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + 0) = 𝑁)
182	177, 180, 181	3brtr3d 5120	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑁 − 𝑗) + 1) ≤ 𝑁)
183	19	nngt0d 12174	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 < 𝑁)
184		lediv1 11987	. . . . . . . . . . . . 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 11895	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑁 / 𝑁) = 1)
188	186, 187	breqtrd 5115	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) / 𝑁) ≤ 1)
189	23, 19	nndivred 12179	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) / 𝑁) ∈ ℝ)
190	189, 22, 7	lemul2d 12978	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝑁 − 𝑗) + 1) / 𝑁) ≤ 1 ↔ (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)) ≤ (𝐸 · 1)))
191	188, 190	mpbid 232	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)) ≤ (𝐸 · 1))
192	191, 139	breqtrd 5115	. . . . . . . 8 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)) ≤ 𝐸)
193	171, 192	eqbrtrd 5111	. . . . . . 7 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) ≤ 𝐸)
194	169, 8, 7	lemul2d 12978	. . . . . . 7 ⊢ (𝜑 → ((((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) ≤ 𝐸 ↔ (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) ≤ (𝐸 · 𝐸)))
195	193, 194	mpbid 232	. . . . . 6 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) ≤ (𝐸 · 𝐸))
196	170, 163, 18, 195	leadd2dd 11732	. . . . 5 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)))) ≤ ((𝐸 · 𝑗) + (𝐸 · 𝐸)))
197	168, 196	eqbrtrrd 5113	. . . 4 ⊢ (𝜑 → ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ≤ ((𝐸 · 𝑗) + (𝐸 · 𝐸)))
198	80, 75	mulcomd 11133	. . . . . . 7 ⊢ (𝜑 → (𝐸 · 𝑗) = (𝑗 · 𝐸))
199	198	oveq1d 7361	. . . . . 6 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) = ((𝑗 · 𝐸) + (𝐸 · 𝐸)))
200	75, 80, 80	adddird 11137	. . . . . 6 ⊢ (𝜑 → ((𝑗 + 𝐸) · 𝐸) = ((𝑗 · 𝐸) + (𝐸 · 𝐸)))
201	199, 200	eqtr4d 2769	. . . . 5 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) = ((𝑗 + 𝐸) · 𝐸))
202	17, 8	readdcld 11141	. . . . . 6 ⊢ (𝜑 → (𝑗 + 𝐸) ∈ ℝ)
203		stoweidlem11.8	. . . . . . 7 ⊢ (𝜑 → 𝐸 < (1 / 3))
204	8, 32, 17, 203	ltadd2dd 11272	. . . . . 6 ⊢ (𝜑 → (𝑗 + 𝐸) < (𝑗 + (1 / 3)))
205	202, 33, 7, 204	ltmul1dd 12989	. . . . 5 ⊢ (𝜑 → ((𝑗 + 𝐸) · 𝐸) < ((𝑗 + (1 / 3)) · 𝐸))
206	201, 205	eqbrtrd 5111	. . . 4 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) < ((𝑗 + (1 / 3)) · 𝐸))
207	27, 164, 34, 197, 206	lelttrd 11271	. . 3 ⊢ (𝜑 → ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) < ((𝑗 + (1 / 3)) · 𝐸))
208	14, 27, 34, 162, 207	lttrd 11274	. 2 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < ((𝑗 + (1 / 3)) · 𝐸))
209	5, 208	eqbrtrd 5111	1 ⊢ (𝜑 → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) < ((𝑗 + (1 / 3)) · 𝐸))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1086 = wceq 1541 ∈ wcel 2111 ≠ wne 2928 Vcvv 3436 ∪ cun 3895 ∩ cin 3896 ⊆ wss 3897 ∅c0 4280 class class class wbr 5089 ↦ cmpt 5170 ⟶wf 6477 ‘cfv 6481 (class class class)co 7346 Fincfn 8869 ℂcc 11004 ℝcr 11005 0cc0 11006 1c1 11007 + caddc 11009 · cmul 11011 < clt 11146 ≤ cle 11147 − cmin 11344 / cdiv 11774 ℕcn 12125 3c3 12181 ℤcz 12468 ℤ_≥cuz 12732 ℝ⁺crp 12890 ...cfz 13407 ♯chash 14237 Σcsu 15593

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2113 ax-9 2121 ax-10 2144 ax-11 2160 ax-12 2180 ax-ext 2703 ax-rep 5215 ax-sep 5232 ax-nul 5242 ax-pow 5301 ax-pr 5368 ax-un 7668 ax-inf2 9531 ax-cnex 11062 ax-resscn 11063 ax-1cn 11064 ax-icn 11065 ax-addcl 11066 ax-addrcl 11067 ax-mulcl 11068 ax-mulrcl 11069 ax-mulcom 11070 ax-addass 11071 ax-mulass 11072 ax-distr 11073 ax-i2m1 11074 ax-1ne0 11075 ax-1rid 11076 ax-rnegex 11077 ax-rrecex 11078 ax-cnre 11079 ax-pre-lttri 11080 ax-pre-lttrn 11081 ax-pre-ltadd 11082 ax-pre-mulgt0 11083 ax-pre-sup 11084

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2535 df-eu 2564 df-clab 2710 df-cleq 2723 df-clel 2806 df-nfc 2881 df-ne 2929 df-nel 3033 df-ral 3048 df-rex 3057 df-rmo 3346 df-reu 3347 df-rab 3396 df-v 3438 df-sbc 3737 df-csb 3846 df-dif 3900 df-un 3902 df-in 3904 df-ss 3914 df-pss 3917 df-nul 4281 df-if 4473 df-pw 4549 df-sn 4574 df-pr 4576 df-op 4580 df-uni 4857 df-int 4896 df-iun 4941 df-br 5090 df-opab 5152 df-mpt 5171 df-tr 5197 df-id 5509 df-eprel 5514 df-po 5522 df-so 5523 df-fr 5567 df-se 5568 df-we 5569 df-xp 5620 df-rel 5621 df-cnv 5622 df-co 5623 df-dm 5624 df-rn 5625 df-res 5626 df-ima 5627 df-pred 6248 df-ord 6309 df-on 6310 df-lim 6311 df-suc 6312 df-iota 6437 df-fun 6483 df-fn 6484 df-f 6485 df-f1 6486 df-fo 6487 df-f1o 6488 df-fv 6489 df-isom 6490 df-riota 7303 df-ov 7349 df-oprab 7350 df-mpo 7351 df-om 7797 df-1st 7921 df-2nd 7922 df-frecs 8211 df-wrecs 8242 df-recs 8291 df-rdg 8329 df-1o 8385 df-er 8622 df-en 8870 df-dom 8871 df-sdom 8872 df-fin 8873 df-sup 9326 df-oi 9396 df-card 9832 df-pnf 11148 df-mnf 11149 df-xr 11150 df-ltxr 11151 df-le 11152 df-sub 11346 df-neg 11347 df-div 11775 df-nn 12126 df-2 12188 df-3 12189 df-n0 12382 df-z 12469 df-uz 12733 df-rp 12891 df-ico 13251 df-fz 13408 df-fzo 13555 df-seq 13909 df-exp 13969 df-hash 14238 df-cj 15006 df-re 15007 df-im 15008 df-sqrt 15142 df-abs 15143 df-clim 15395 df-sum 15594

This theorem is referenced by: stoweidlem34 46142

W3C validator