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 45025

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 15638	. . 3 ⊢ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ V
3		eqid 2730	. . . 4 ⊢ (𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡))) = (𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))
4	3	fvmpt2 7008	. . 3 ⊢ ((𝑡 ∈ 𝑇 ∧ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ V) → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) = Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))
5	1, 2, 4	sylancl 584	. 2 ⊢ (𝜑 → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) = Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))
6		fzfid 13942	. . . 4 ⊢ (𝜑 → (0...𝑁) ∈ Fin)
7		stoweidlem11.7	. . . . . . 7 ⊢ (𝜑 → 𝐸 ∈ ℝ⁺)
8	7	rpred 13020	. . . . . 6 ⊢ (𝜑 → 𝐸 ∈ ℝ)
9	8	adantr 479	. . . . 5 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → 𝐸 ∈ ℝ)
10		stoweidlem11.4	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝑋‘𝑖):𝑇⟶ℝ)
11	1	adantr 479	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → 𝑡 ∈ 𝑇)
12	10, 11	ffvelcdmd 7086	. . . . 5 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ∈ ℝ)
13	9, 12	remulcld 11248	. . . 4 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
14	6, 13	fsumrecl 15684	. . 3 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
15		stoweidlem11.3	. . . . . . 7 ⊢ (𝜑 → 𝑗 ∈ (1...𝑁))
16	15	elfzelzd 13506	. . . . . 6 ⊢ (𝜑 → 𝑗 ∈ ℤ)
17	16	zred 12670	. . . . 5 ⊢ (𝜑 → 𝑗 ∈ ℝ)
18	8, 17	remulcld 11248	. . . 4 ⊢ (𝜑 → (𝐸 · 𝑗) ∈ ℝ)
19		stoweidlem11.1	. . . . . . . 8 ⊢ (𝜑 → 𝑁 ∈ ℕ)
20	19	nnred 12231	. . . . . . 7 ⊢ (𝜑 → 𝑁 ∈ ℝ)
21	20, 17	resubcld 11646	. . . . . 6 ⊢ (𝜑 → (𝑁 − 𝑗) ∈ ℝ)
22		1red 11219	. . . . . 6 ⊢ (𝜑 → 1 ∈ ℝ)
23	21, 22	readdcld 11247	. . . . 5 ⊢ (𝜑 → ((𝑁 − 𝑗) + 1) ∈ ℝ)
24	8, 19	nndivred 12270	. . . . . 6 ⊢ (𝜑 → (𝐸 / 𝑁) ∈ ℝ)
25	8, 24	remulcld 11248	. . . . 5 ⊢ (𝜑 → (𝐸 · (𝐸 / 𝑁)) ∈ ℝ)
26	23, 25	remulcld 11248	. . . 4 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))) ∈ ℝ)
27	18, 26	readdcld 11247	. . 3 ⊢ (𝜑 → ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ∈ ℝ)
28		3re 12296	. . . . . . 7 ⊢ 3 ∈ ℝ
29	28	a1i 11	. . . . . 6 ⊢ (𝜑 → 3 ∈ ℝ)
30		3ne0 12322	. . . . . . 7 ⊢ 3 ≠ 0
31	30	a1i 11	. . . . . 6 ⊢ (𝜑 → 3 ≠ 0)
32	29, 31	rereccld 12045	. . . . 5 ⊢ (𝜑 → (1 / 3) ∈ ℝ)
33	17, 32	readdcld 11247	. . . 4 ⊢ (𝜑 → (𝑗 + (1 / 3)) ∈ ℝ)
34	33, 8	remulcld 11248	. . 3 ⊢ (𝜑 → ((𝑗 + (1 / 3)) · 𝐸) ∈ ℝ)
35		fzfid 13942	. . . . . 6 ⊢ (𝜑 → (0...(𝑗 − 1)) ∈ Fin)
36	8	adantr 479	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 𝐸 ∈ ℝ)
37		elfzelz 13505	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (1...𝑁) → 𝑗 ∈ ℤ)
38		peano2zm 12609	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ ℤ → (𝑗 − 1) ∈ ℤ)
39	15, 37, 38	3syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 − 1) ∈ ℤ)
40	19	nnzd 12589	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑁 ∈ ℤ)
41	17, 22	resubcld 11646	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑗 − 1) ∈ ℝ)
42	17	lem1d 12151	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑗 − 1) ≤ 𝑗)
43		elfzuz3 13502	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ (1...𝑁) → 𝑁 ∈ (ℤ_≥‘𝑗))
44		eluzle 12839	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ (ℤ_≥‘𝑗) → 𝑗 ≤ 𝑁)
45	15, 43, 44	3syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑗 ≤ 𝑁)
46	41, 17, 20, 42, 45	letrd 11375	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 − 1) ≤ 𝑁)
47		eluz2 12832	. . . . . . . . . . 11 ⊢ (𝑁 ∈ (ℤ_≥‘(𝑗 − 1)) ↔ ((𝑗 − 1) ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝑗 − 1) ≤ 𝑁))
48	39, 40, 46, 47	syl3anbrc 1341	. . . . . . . . . 10 ⊢ (𝜑 → 𝑁 ∈ (ℤ_≥‘(𝑗 − 1)))
49		fzss2 13545	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘(𝑗 − 1)) → (0...(𝑗 − 1)) ⊆ (0...𝑁))
50	48, 49	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (0...(𝑗 − 1)) ⊆ (0...𝑁))
51	50	sselda 3981	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 𝑖 ∈ (0...𝑁))
52	51, 12	syldan 589	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → ((𝑋‘𝑖)‘𝑡) ∈ ℝ)
53	36, 52	remulcld 11248	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
54	35, 53	fsumrecl 15684	. . . . 5 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
55	54, 26	readdcld 11247	. . . 4 ⊢ (𝜑 → (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ∈ ℝ)
56	17	ltm1d 12150	. . . . . . 7 ⊢ (𝜑 → (𝑗 − 1) < 𝑗)
57		fzdisj 13532	. . . . . . 7 ⊢ ((𝑗 − 1) < 𝑗 → ((0...(𝑗 − 1)) ∩ (𝑗...𝑁)) = ∅)
58	56, 57	syl 17	. . . . . 6 ⊢ (𝜑 → ((0...(𝑗 − 1)) ∩ (𝑗...𝑁)) = ∅)
59		fzssp1 13548	. . . . . . . . . 10 ⊢ (0...(𝑁 − 1)) ⊆ (0...((𝑁 − 1) + 1))
60	19	nncnd 12232	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑁 ∈ ℂ)
61		1cnd 11213	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℂ)
62	60, 61	npcand 11579	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑁 − 1) + 1) = 𝑁)
63	62	oveq2d 7427	. . . . . . . . . 10 ⊢ (𝜑 → (0...((𝑁 − 1) + 1)) = (0...𝑁))
64	59, 63	sseqtrid 4033	. . . . . . . . 9 ⊢ (𝜑 → (0...(𝑁 − 1)) ⊆ (0...𝑁))
65		1zzd 12597	. . . . . . . . . . . 12 ⊢ (𝜑 → 1 ∈ ℤ)
66		fzsubel 13541	. . . . . . . . . . . 12 ⊢ (((1 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑗 ∈ ℤ ∧ 1 ∈ ℤ)) → (𝑗 ∈ (1...𝑁) ↔ (𝑗 − 1) ∈ ((1 − 1)...(𝑁 − 1))))
67	65, 40, 16, 65, 66	syl22anc 835	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 ∈ (1...𝑁) ↔ (𝑗 − 1) ∈ ((1 − 1)...(𝑁 − 1))))
68	15, 67	mpbid 231	. . . . . . . . . 10 ⊢ (𝜑 → (𝑗 − 1) ∈ ((1 − 1)...(𝑁 − 1)))
69		1m1e0 12288	. . . . . . . . . . 11 ⊢ (1 − 1) = 0
70	69	oveq1i 7421	. . . . . . . . . 10 ⊢ ((1 − 1)...(𝑁 − 1)) = (0...(𝑁 − 1))
71	68, 70	eleqtrdi 2841	. . . . . . . . 9 ⊢ (𝜑 → (𝑗 − 1) ∈ (0...(𝑁 − 1)))
72	64, 71	sseldd 3982	. . . . . . . 8 ⊢ (𝜑 → (𝑗 − 1) ∈ (0...𝑁))
73		fzsplit 13531	. . . . . . . 8 ⊢ ((𝑗 − 1) ∈ (0...𝑁) → (0...𝑁) = ((0...(𝑗 − 1)) ∪ (((𝑗 − 1) + 1)...𝑁)))
74	72, 73	syl 17	. . . . . . 7 ⊢ (𝜑 → (0...𝑁) = ((0...(𝑗 − 1)) ∪ (((𝑗 − 1) + 1)...𝑁)))
75	16	zcnd 12671	. . . . . . . . . 10 ⊢ (𝜑 → 𝑗 ∈ ℂ)
76	75, 61	npcand 11579	. . . . . . . . 9 ⊢ (𝜑 → ((𝑗 − 1) + 1) = 𝑗)
77	76	oveq1d 7426	. . . . . . . 8 ⊢ (𝜑 → (((𝑗 − 1) + 1)...𝑁) = (𝑗...𝑁))
78	77	uneq2d 4162	. . . . . . 7 ⊢ (𝜑 → ((0...(𝑗 − 1)) ∪ (((𝑗 − 1) + 1)...𝑁)) = ((0...(𝑗 − 1)) ∪ (𝑗...𝑁)))
79	74, 78	eqtrd 2770	. . . . . 6 ⊢ (𝜑 → (0...𝑁) = ((0...(𝑗 − 1)) ∪ (𝑗...𝑁)))
80	7	rpcnd 13022	. . . . . . . 8 ⊢ (𝜑 → 𝐸 ∈ ℂ)
81	80	adantr 479	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → 𝐸 ∈ ℂ)
82	12	recnd 11246	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ∈ ℂ)
83	81, 82	mulcld 11238	. . . . . 6 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℂ)
84	58, 79, 6, 83	fsumsplit 15691	. . . . 5 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) = (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡))))
85		fzfid 13942	. . . . . . 7 ⊢ (𝜑 → (𝑗...𝑁) ∈ Fin)
86	8	adantr 479	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝐸 ∈ ℝ)
87		0zd 12574	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 ∈ ℤ)
88		0red 11221	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ∈ ℝ)
89		0le1 11741	. . . . . . . . . . . . . . 15 ⊢ 0 ≤ 1
90	89	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 0 ≤ 1)
91		elfzuz 13501	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ (1...𝑁) → 𝑗 ∈ (ℤ_≥‘1))
92	15, 91	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑗 ∈ (ℤ_≥‘1))
93		eluz2 12832	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 ∈ (ℤ_≥‘1) ↔ (1 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 1 ≤ 𝑗))
94	92, 93	sylib 217	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (1 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 1 ≤ 𝑗))
95	94	simp3d 1142	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 1 ≤ 𝑗)
96	88, 22, 17, 90, 95	letrd 11375	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 ≤ 𝑗)
97		eluz2 12832	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ (ℤ_≥‘0) ↔ (0 ∈ ℤ ∧ 𝑗 ∈ ℤ ∧ 0 ≤ 𝑗))
98	87, 16, 96, 97	syl3anbrc 1341	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑗 ∈ (ℤ_≥‘0))
99		fzss1 13544	. . . . . . . . . . . 12 ⊢ (𝑗 ∈ (ℤ_≥‘0) → (𝑗...𝑁) ⊆ (0...𝑁))
100	98, 99	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗...𝑁) ⊆ (0...𝑁))
101	100	sselda 3981	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝑖 ∈ (0...𝑁))
102	101, 10	syldan 589	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝑋‘𝑖):𝑇⟶ℝ)
103	1	adantr 479	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝑡 ∈ 𝑇)
104	102, 103	ffvelcdmd 7086	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → ((𝑋‘𝑖)‘𝑡) ∈ ℝ)
105	86, 104	remulcld 11248	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
106	85, 105	fsumrecl 15684	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) ∈ ℝ)
107		eluzfz2 13513	. . . . . . . . 9 ⊢ (𝑁 ∈ (ℤ_≥‘𝑗) → 𝑁 ∈ (𝑗...𝑁))
108		ne0i 4333	. . . . . . . . 9 ⊢ (𝑁 ∈ (𝑗...𝑁) → (𝑗...𝑁) ≠ ∅)
109	15, 43, 107, 108	4syl 19	. . . . . . . 8 ⊢ (𝜑 → (𝑗...𝑁) ≠ ∅)
110	19	adantr 479	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 𝑁 ∈ ℕ)
111	86, 110	nndivred 12270	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 / 𝑁) ∈ ℝ)
112	86, 111	remulcld 11248	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 · (𝐸 / 𝑁)) ∈ ℝ)
113		stoweidlem11.6	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → ((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁))
114	7	rpgt0d 13023	. . . . . . . . . . 11 ⊢ (𝜑 → 0 < 𝐸)
115	114	adantr 479	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → 0 < 𝐸)
116		ltmul2 12069	. . . . . . . . . 10 ⊢ ((((𝑋‘𝑖)‘𝑡) ∈ ℝ ∧ (𝐸 / 𝑁) ∈ ℝ ∧ (𝐸 ∈ ℝ ∧ 0 < 𝐸)) → (((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁) ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) < (𝐸 · (𝐸 / 𝑁))))
117	104, 111, 86, 115, 116	syl112anc 1372	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (((𝑋‘𝑖)‘𝑡) < (𝐸 / 𝑁) ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) < (𝐸 · (𝐸 / 𝑁))))
118	113, 117	mpbid 231	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (𝑗...𝑁)) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) < (𝐸 · (𝐸 / 𝑁)))
119	85, 109, 105, 112, 118	fsumlt 15750	. . . . . . 7 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)))
120	19	nnne0d 12266	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑁 ≠ 0)
121	80, 60, 120	divcld 11994	. . . . . . . . . 10 ⊢ (𝜑 → (𝐸 / 𝑁) ∈ ℂ)
122	80, 121	mulcld 11238	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 · (𝐸 / 𝑁)) ∈ ℂ)
123		fsumconst 15740	. . . . . . . . 9 ⊢ (((𝑗...𝑁) ∈ Fin ∧ (𝐸 · (𝐸 / 𝑁)) ∈ ℂ) → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)) = ((♯‘(𝑗...𝑁)) · (𝐸 · (𝐸 / 𝑁))))
124	85, 122, 123	syl2anc 582	. . . . . . . 8 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)) = ((♯‘(𝑗...𝑁)) · (𝐸 · (𝐸 / 𝑁))))
125		hashfz 14391	. . . . . . . . . 10 ⊢ (𝑁 ∈ (ℤ_≥‘𝑗) → (♯‘(𝑗...𝑁)) = ((𝑁 − 𝑗) + 1))
126	15, 43, 125	3syl 18	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(𝑗...𝑁)) = ((𝑁 − 𝑗) + 1))
127	126	oveq1d 7426	. . . . . . . 8 ⊢ (𝜑 → ((♯‘(𝑗...𝑁)) · (𝐸 · (𝐸 / 𝑁))) = (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
128	124, 127	eqtrd 2770	. . . . . . 7 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · (𝐸 / 𝑁)) = (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
129	119, 128	breqtrd 5173	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
130	106, 26, 54, 129	ltadd2dd 11377	. . . . 5 ⊢ (𝜑 → (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + Σ𝑖 ∈ (𝑗...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡))) < (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
131	84, 130	eqbrtrd 5169	. . . 4 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
132		stoweidlem11.5	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...𝑁)) → ((𝑋‘𝑖)‘𝑡) ≤ 1)
133	51, 132	syldan 589	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → ((𝑋‘𝑖)‘𝑡) ≤ 1)
134		1red 11219	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 1 ∈ ℝ)
135	114	adantr 479	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → 0 < 𝐸)
136		lemul2 12071	. . . . . . . . . 10 ⊢ ((((𝑋‘𝑖)‘𝑡) ∈ ℝ ∧ 1 ∈ ℝ ∧ (𝐸 ∈ ℝ ∧ 0 < 𝐸)) → (((𝑋‘𝑖)‘𝑡) ≤ 1 ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ (𝐸 · 1)))
137	52, 134, 36, 135, 136	syl112anc 1372	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (((𝑋‘𝑖)‘𝑡) ≤ 1 ↔ (𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ (𝐸 · 1)))
138	133, 137	mpbid 231	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ (𝐸 · 1))
139	80	mulridd 11235	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 · 1) = 𝐸)
140	139	adantr 479	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · 1) = 𝐸)
141	138, 140	breqtrd 5173	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑖 ∈ (0...(𝑗 − 1))) → (𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ 𝐸)
142	35, 53, 36, 141	fsumle 15749	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ Σ𝑖 ∈ (0...(𝑗 − 1))𝐸)
143		fsumconst 15740	. . . . . . . 8 ⊢ (((0...(𝑗 − 1)) ∈ Fin ∧ 𝐸 ∈ ℂ) → Σ𝑖 ∈ (0...(𝑗 − 1))𝐸 = ((♯‘(0...(𝑗 − 1))) · 𝐸))
144	35, 80, 143	syl2anc 582	. . . . . . 7 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))𝐸 = ((♯‘(0...(𝑗 − 1))) · 𝐸))
145		0z 12573	. . . . . . . . . . 11 ⊢ 0 ∈ ℤ
146		1e0p1 12723	. . . . . . . . . . . . 13 ⊢ 1 = (0 + 1)
147	146	fveq2i 6893	. . . . . . . . . . . 12 ⊢ (ℤ_≥‘1) = (ℤ_≥‘(0 + 1))
148	92, 147	eleqtrdi 2841	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑗 ∈ (ℤ_≥‘(0 + 1)))
149		eluzp1m1 12852	. . . . . . . . . . 11 ⊢ ((0 ∈ ℤ ∧ 𝑗 ∈ (ℤ_≥‘(0 + 1))) → (𝑗 − 1) ∈ (ℤ_≥‘0))
150	145, 148, 149	sylancr 585	. . . . . . . . . 10 ⊢ (𝜑 → (𝑗 − 1) ∈ (ℤ_≥‘0))
151		hashfz 14391	. . . . . . . . . 10 ⊢ ((𝑗 − 1) ∈ (ℤ_≥‘0) → (♯‘(0...(𝑗 − 1))) = (((𝑗 − 1) − 0) + 1))
152	150, 151	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (♯‘(0...(𝑗 − 1))) = (((𝑗 − 1) − 0) + 1))
153	75, 61	subcld 11575	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑗 − 1) ∈ ℂ)
154	153	subid1d 11564	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑗 − 1) − 0) = (𝑗 − 1))
155	154	oveq1d 7426	. . . . . . . . 9 ⊢ (𝜑 → (((𝑗 − 1) − 0) + 1) = ((𝑗 − 1) + 1))
156	152, 155, 76	3eqtrd 2774	. . . . . . . 8 ⊢ (𝜑 → (♯‘(0...(𝑗 − 1))) = 𝑗)
157	156	oveq1d 7426	. . . . . . 7 ⊢ (𝜑 → ((♯‘(0...(𝑗 − 1))) · 𝐸) = (𝑗 · 𝐸))
158	75, 80	mulcomd 11239	. . . . . . 7 ⊢ (𝜑 → (𝑗 · 𝐸) = (𝐸 · 𝑗))
159	144, 157, 158	3eqtrd 2774	. . . . . 6 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))𝐸 = (𝐸 · 𝑗))
160	142, 159	breqtrd 5173	. . . . 5 ⊢ (𝜑 → Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) ≤ (𝐸 · 𝑗))
161	54, 18, 26, 160	leadd1dd 11832	. . . 4 ⊢ (𝜑 → (Σ𝑖 ∈ (0...(𝑗 − 1))(𝐸 · ((𝑋‘𝑖)‘𝑡)) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ≤ ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
162	14, 55, 27, 131, 161	ltletrd 11378	. . 3 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
163	8, 8	remulcld 11248	. . . . 5 ⊢ (𝜑 → (𝐸 · 𝐸) ∈ ℝ)
164	18, 163	readdcld 11247	. . . 4 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) ∈ ℝ)
165	60, 75	subcld 11575	. . . . . . . 8 ⊢ (𝜑 → (𝑁 − 𝑗) ∈ ℂ)
166	165, 61	addcld 11237	. . . . . . 7 ⊢ (𝜑 → ((𝑁 − 𝑗) + 1) ∈ ℂ)
167	80, 166, 121	mul12d 11427	. . . . . 6 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) = (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁))))
168	167	oveq2d 7427	. . . . 5 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)))) = ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))))
169	23, 24	remulcld 11248	. . . . . . 7 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) ∈ ℝ)
170	8, 169	remulcld 11248	. . . . . 6 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) ∈ ℝ)
171	166, 80, 60, 120	div12d 12030	. . . . . . . 8 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) = (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)))
172	22, 17	resubcld 11646	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 − 𝑗) ∈ ℝ)
173		elfzle1 13508	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 ∈ (1...𝑁) → 1 ≤ 𝑗)
174	15, 173	syl 17	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 1 ≤ 𝑗)
175	22, 17	suble0d 11809	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((1 − 𝑗) ≤ 0 ↔ 1 ≤ 𝑗))
176	174, 175	mpbird 256	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 − 𝑗) ≤ 0)
177	172, 88, 20, 176	leadd2dd 11833	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + (1 − 𝑗)) ≤ (𝑁 + 0))
178	60, 61, 75	addsub12d 11598	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑁 + (1 − 𝑗)) = (1 + (𝑁 − 𝑗)))
179	61, 165	addcomd 11420	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (1 + (𝑁 − 𝑗)) = ((𝑁 − 𝑗) + 1))
180	178, 179	eqtrd 2770	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + (1 − 𝑗)) = ((𝑁 − 𝑗) + 1))
181	60	addridd 11418	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑁 + 0) = 𝑁)
182	177, 180, 181	3brtr3d 5178	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑁 − 𝑗) + 1) ≤ 𝑁)
183	19	nngt0d 12265	. . . . . . . . . . . . 13 ⊢ (𝜑 → 0 < 𝑁)
184		lediv1 12083	. . . . . . . . . . . . 13 ⊢ ((((𝑁 − 𝑗) + 1) ∈ ℝ ∧ 𝑁 ∈ ℝ ∧ (𝑁 ∈ ℝ ∧ 0 < 𝑁)) → (((𝑁 − 𝑗) + 1) ≤ 𝑁 ↔ (((𝑁 − 𝑗) + 1) / 𝑁) ≤ (𝑁 / 𝑁)))
185	23, 20, 20, 183, 184	syl112anc 1372	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) ≤ 𝑁 ↔ (((𝑁 − 𝑗) + 1) / 𝑁) ≤ (𝑁 / 𝑁)))
186	182, 185	mpbid 231	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) / 𝑁) ≤ (𝑁 / 𝑁))
187	60, 120	dividd 11992	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑁 / 𝑁) = 1)
188	186, 187	breqtrd 5173	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) / 𝑁) ≤ 1)
189	23, 19	nndivred 12270	. . . . . . . . . . 11 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) / 𝑁) ∈ ℝ)
190	189, 22, 7	lemul2d 13064	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝑁 − 𝑗) + 1) / 𝑁) ≤ 1 ↔ (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)) ≤ (𝐸 · 1)))
191	188, 190	mpbid 231	. . . . . . . . 9 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)) ≤ (𝐸 · 1))
192	191, 139	breqtrd 5173	. . . . . . . 8 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) / 𝑁)) ≤ 𝐸)
193	171, 192	eqbrtrd 5169	. . . . . . 7 ⊢ (𝜑 → (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) ≤ 𝐸)
194	169, 8, 7	lemul2d 13064	. . . . . . 7 ⊢ (𝜑 → ((((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)) ≤ 𝐸 ↔ (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) ≤ (𝐸 · 𝐸)))
195	193, 194	mpbid 231	. . . . . 6 ⊢ (𝜑 → (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁))) ≤ (𝐸 · 𝐸))
196	170, 163, 18, 195	leadd2dd 11833	. . . . 5 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · (((𝑁 − 𝑗) + 1) · (𝐸 / 𝑁)))) ≤ ((𝐸 · 𝑗) + (𝐸 · 𝐸)))
197	168, 196	eqbrtrrd 5171	. . . 4 ⊢ (𝜑 → ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) ≤ ((𝐸 · 𝑗) + (𝐸 · 𝐸)))
198	80, 75	mulcomd 11239	. . . . . . 7 ⊢ (𝜑 → (𝐸 · 𝑗) = (𝑗 · 𝐸))
199	198	oveq1d 7426	. . . . . 6 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) = ((𝑗 · 𝐸) + (𝐸 · 𝐸)))
200	75, 80, 80	adddird 11243	. . . . . 6 ⊢ (𝜑 → ((𝑗 + 𝐸) · 𝐸) = ((𝑗 · 𝐸) + (𝐸 · 𝐸)))
201	199, 200	eqtr4d 2773	. . . . 5 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) = ((𝑗 + 𝐸) · 𝐸))
202	17, 8	readdcld 11247	. . . . . 6 ⊢ (𝜑 → (𝑗 + 𝐸) ∈ ℝ)
203		stoweidlem11.8	. . . . . . 7 ⊢ (𝜑 → 𝐸 < (1 / 3))
204	8, 32, 17, 203	ltadd2dd 11377	. . . . . 6 ⊢ (𝜑 → (𝑗 + 𝐸) < (𝑗 + (1 / 3)))
205	202, 33, 7, 204	ltmul1dd 13075	. . . . 5 ⊢ (𝜑 → ((𝑗 + 𝐸) · 𝐸) < ((𝑗 + (1 / 3)) · 𝐸))
206	201, 205	eqbrtrd 5169	. . . 4 ⊢ (𝜑 → ((𝐸 · 𝑗) + (𝐸 · 𝐸)) < ((𝑗 + (1 / 3)) · 𝐸))
207	27, 164, 34, 197, 206	lelttrd 11376	. . 3 ⊢ (𝜑 → ((𝐸 · 𝑗) + (((𝑁 − 𝑗) + 1) · (𝐸 · (𝐸 / 𝑁)))) < ((𝑗 + (1 / 3)) · 𝐸))
208	14, 27, 34, 162, 207	lttrd 11379	. 2 ⊢ (𝜑 → Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)) < ((𝑗 + (1 / 3)) · 𝐸))
209	5, 208	eqbrtrd 5169	1 ⊢ (𝜑 → ((𝑡 ∈ 𝑇 ↦ Σ𝑖 ∈ (0...𝑁)(𝐸 · ((𝑋‘𝑖)‘𝑡)))‘𝑡) < ((𝑗 + (1 / 3)) · 𝐸))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 394 ∧ w3a 1085 = wceq 1539 ∈ wcel 2104 ≠ wne 2938 Vcvv 3472 ∪ cun 3945 ∩ cin 3946 ⊆ wss 3947 ∅c0 4321 class class class wbr 5147 ↦ cmpt 5230 ⟶wf 6538 ‘cfv 6542 (class class class)co 7411 Fincfn 8941 ℂcc 11110 ℝcr 11111 0cc0 11112 1c1 11113 + caddc 11115 · cmul 11117 < clt 11252 ≤ cle 11253 − cmin 11448 / cdiv 11875 ℕcn 12216 3c3 12272 ℤcz 12562 ℤ_≥cuz 12826 ℝ⁺crp 12978 ...cfz 13488 ♯chash 14294 Σcsu 15636

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 1911 ax-6 1969 ax-7 2009 ax-8 2106 ax-9 2114 ax-10 2135 ax-11 2152 ax-12 2169 ax-ext 2701 ax-rep 5284 ax-sep 5298 ax-nul 5305 ax-pow 5362 ax-pr 5426 ax-un 7727 ax-inf2 9638 ax-cnex 11168 ax-resscn 11169 ax-1cn 11170 ax-icn 11171 ax-addcl 11172 ax-addrcl 11173 ax-mulcl 11174 ax-mulrcl 11175 ax-mulcom 11176 ax-addass 11177 ax-mulass 11178 ax-distr 11179 ax-i2m1 11180 ax-1ne0 11181 ax-1rid 11182 ax-rnegex 11183 ax-rrecex 11184 ax-cnre 11185 ax-pre-lttri 11186 ax-pre-lttrn 11187 ax-pre-ltadd 11188 ax-pre-mulgt0 11189 ax-pre-sup 11190

This theorem depends on definitions: df-bi 206 df-an 395 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2532 df-eu 2561 df-clab 2708 df-cleq 2722 df-clel 2808 df-nfc 2883 df-ne 2939 df-nel 3045 df-ral 3060 df-rex 3069 df-rmo 3374 df-reu 3375 df-rab 3431 df-v 3474 df-sbc 3777 df-csb 3893 df-dif 3950 df-un 3952 df-in 3954 df-ss 3964 df-pss 3966 df-nul 4322 df-if 4528 df-pw 4603 df-sn 4628 df-pr 4630 df-op 4634 df-uni 4908 df-int 4950 df-iun 4998 df-br 5148 df-opab 5210 df-mpt 5231 df-tr 5265 df-id 5573 df-eprel 5579 df-po 5587 df-so 5588 df-fr 5630 df-se 5631 df-we 5632 df-xp 5681 df-rel 5682 df-cnv 5683 df-co 5684 df-dm 5685 df-rn 5686 df-res 5687 df-ima 5688 df-pred 6299 df-ord 6366 df-on 6367 df-lim 6368 df-suc 6369 df-iota 6494 df-fun 6544 df-fn 6545 df-f 6546 df-f1 6547 df-fo 6548 df-f1o 6549 df-fv 6550 df-isom 6551 df-riota 7367 df-ov 7414 df-oprab 7415 df-mpo 7416 df-om 7858 df-1st 7977 df-2nd 7978 df-frecs 8268 df-wrecs 8299 df-recs 8373 df-rdg 8412 df-1o 8468 df-er 8705 df-en 8942 df-dom 8943 df-sdom 8944 df-fin 8945 df-sup 9439 df-oi 9507 df-card 9936 df-pnf 11254 df-mnf 11255 df-xr 11256 df-ltxr 11257 df-le 11258 df-sub 11450 df-neg 11451 df-div 11876 df-nn 12217 df-2 12279 df-3 12280 df-n0 12477 df-z 12563 df-uz 12827 df-rp 12979 df-ico 13334 df-fz 13489 df-fzo 13632 df-seq 13971 df-exp 14032 df-hash 14295 df-cj 15050 df-re 15051 df-im 15052 df-sqrt 15186 df-abs 15187 df-clim 15436 df-sum 15637

This theorem is referenced by: stoweidlem34 45048

W3C validator