stoweidlem28 - Mathbox for Glauco Siliprandi

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

Theorem stoweidlem28 41172

Description: There exists a δ as in Lemma 1 [BrosowskiDeutsh] p. 90: 0 < delta < 1 and p >= delta on 𝑇 ∖ 𝑈. Here 𝑑 is used to represent δ in the paper. (Contributed by Glauco Siliprandi, 20-Apr-2017.)

**Hypotheses**
Ref	Expression
stoweidlem28.1	⊢ Ⅎ𝑡𝑈
stoweidlem28.2	⊢ Ⅎ𝑡𝜑
stoweidlem28.3	⊢ 𝐾 = (topGen‘ran (,))
stoweidlem28.4	⊢ 𝑇 = ∪ 𝐽
stoweidlem28.5	⊢ (𝜑 → 𝐽 ∈ Comp)
stoweidlem28.6	⊢ (𝜑 → 𝑃 ∈ (𝐽 Cn 𝐾))
stoweidlem28.7	⊢ (𝜑 → ∀𝑡 ∈ (𝑇 ∖ 𝑈)0 < (𝑃‘𝑡))
stoweidlem28.8	⊢ (𝜑 → 𝑈 ∈ 𝐽)

**Assertion**
Ref	Expression
stoweidlem28	⊢ (𝜑 → ∃𝑑(𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)))

Distinct variable groups: 𝑡,𝑑,𝑃 𝑇,𝑑,𝑡 𝑈,𝑑 𝑡,𝐽 Allowed substitution hints: 𝜑(𝑡,𝑑) 𝑈(𝑡) 𝐽(𝑑) 𝐾(𝑡,𝑑)

Proof of Theorem stoweidlem28 Dummy variables 𝑐 𝑥 𝑠 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		halfre 11596	. . . . 5 ⊢ (1 / 2) ∈ ℝ
2		halfgt0 11598	. . . . 5 ⊢ 0 < (1 / 2)
3	1, 2	elrpii 12140	. . . 4 ⊢ (1 / 2) ∈ ℝ⁺
4	3	a1i 11	. . 3 ⊢ ((𝜑 ∧ (𝑇 ∖ 𝑈) = ∅) → (1 / 2) ∈ ℝ⁺)
5		halflt1 11600	. . . 4 ⊢ (1 / 2) < 1
6	5	a1i 11	. . 3 ⊢ ((𝜑 ∧ (𝑇 ∖ 𝑈) = ∅) → (1 / 2) < 1)
7		nfcv 2934	. . . . . . 7 ⊢ Ⅎ𝑡𝑇
8		stoweidlem28.1	. . . . . . 7 ⊢ Ⅎ𝑡𝑈
9	7, 8	nfdif 3954	. . . . . 6 ⊢ Ⅎ𝑡(𝑇 ∖ 𝑈)
10	9	nfeq1 2947	. . . . 5 ⊢ Ⅎ𝑡(𝑇 ∖ 𝑈) = ∅
11	10	rzalf 40109	. . . 4 ⊢ ((𝑇 ∖ 𝑈) = ∅ → ∀𝑡 ∈ (𝑇 ∖ 𝑈)(1 / 2) ≤ (𝑃‘𝑡))
12	11	adantl 475	. . 3 ⊢ ((𝜑 ∧ (𝑇 ∖ 𝑈) = ∅) → ∀𝑡 ∈ (𝑇 ∖ 𝑈)(1 / 2) ≤ (𝑃‘𝑡))
13		ovex 6954	. . . 4 ⊢ (1 / 2) ∈ V
14		eleq1 2847	. . . . 5 ⊢ (𝑑 = (1 / 2) → (𝑑 ∈ ℝ⁺ ↔ (1 / 2) ∈ ℝ⁺))
15		breq1 4889	. . . . 5 ⊢ (𝑑 = (1 / 2) → (𝑑 < 1 ↔ (1 / 2) < 1))
16		breq1 4889	. . . . . 6 ⊢ (𝑑 = (1 / 2) → (𝑑 ≤ (𝑃‘𝑡) ↔ (1 / 2) ≤ (𝑃‘𝑡)))
17	16	ralbidv 3168	. . . . 5 ⊢ (𝑑 = (1 / 2) → (∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡) ↔ ∀𝑡 ∈ (𝑇 ∖ 𝑈)(1 / 2) ≤ (𝑃‘𝑡)))
18	14, 15, 17	3anbi123d 1509	. . . 4 ⊢ (𝑑 = (1 / 2) → ((𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)) ↔ ((1 / 2) ∈ ℝ⁺ ∧ (1 / 2) < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)(1 / 2) ≤ (𝑃‘𝑡))))
19	13, 18	spcev 3502	. . 3 ⊢ (((1 / 2) ∈ ℝ⁺ ∧ (1 / 2) < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)(1 / 2) ≤ (𝑃‘𝑡)) → ∃𝑑(𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)))
20	4, 6, 12, 19	syl3anc 1439	. 2 ⊢ ((𝜑 ∧ (𝑇 ∖ 𝑈) = ∅) → ∃𝑑(𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)))
21		simplll 765	. . . 4 ⊢ ((((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → 𝜑)
22		simplr 759	. . . 4 ⊢ ((((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → 𝑥 ∈ (𝑇 ∖ 𝑈))
23		simpr 479	. . . 4 ⊢ ((((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡))
24		stoweidlem28.3	. . . . . . . . . . 11 ⊢ 𝐾 = (topGen‘ran (,))
25		stoweidlem28.4	. . . . . . . . . . 11 ⊢ 𝑇 = ∪ 𝐽
26		eqid 2778	. . . . . . . . . . 11 ⊢ (𝐽 Cn 𝐾) = (𝐽 Cn 𝐾)
27		stoweidlem28.6	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑃 ∈ (𝐽 Cn 𝐾))
28	24, 25, 26, 27	fcnre 40117	. . . . . . . . . 10 ⊢ (𝜑 → 𝑃:𝑇⟶ℝ)
29	28	adantr 474	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) → 𝑃:𝑇⟶ℝ)
30		eldifi 3955	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝑇 ∖ 𝑈) → 𝑥 ∈ 𝑇)
31	30	adantl 475	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) → 𝑥 ∈ 𝑇)
32	29, 31	ffvelrnd 6624	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) → (𝑃‘𝑥) ∈ ℝ)
33		stoweidlem28.7	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑡 ∈ (𝑇 ∖ 𝑈)0 < (𝑃‘𝑡))
34		nfcv 2934	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥(𝑇 ∖ 𝑈)
35		nfv 1957	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥0 < (𝑃‘𝑡)
36		nfv 1957	. . . . . . . . . . . 12 ⊢ Ⅎ𝑡0 < (𝑃‘𝑥)
37		fveq2 6446	. . . . . . . . . . . . 13 ⊢ (𝑡 = 𝑥 → (𝑃‘𝑡) = (𝑃‘𝑥))
38	37	breq2d 4898	. . . . . . . . . . . 12 ⊢ (𝑡 = 𝑥 → (0 < (𝑃‘𝑡) ↔ 0 < (𝑃‘𝑥)))
39	9, 34, 35, 36, 38	cbvralf 3361	. . . . . . . . . . 11 ⊢ (∀𝑡 ∈ (𝑇 ∖ 𝑈)0 < (𝑃‘𝑡) ↔ ∀𝑥 ∈ (𝑇 ∖ 𝑈)0 < (𝑃‘𝑥))
40	39	biimpi 208	. . . . . . . . . 10 ⊢ (∀𝑡 ∈ (𝑇 ∖ 𝑈)0 < (𝑃‘𝑡) → ∀𝑥 ∈ (𝑇 ∖ 𝑈)0 < (𝑃‘𝑥))
41	40	r19.21bi 3114	. . . . . . . . 9 ⊢ ((∀𝑡 ∈ (𝑇 ∖ 𝑈)0 < (𝑃‘𝑡) ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) → 0 < (𝑃‘𝑥))
42	33, 41	sylan 575	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) → 0 < (𝑃‘𝑥))
43	32, 42	elrpd 12178	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) → (𝑃‘𝑥) ∈ ℝ⁺)
44	43	3adant3 1123	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → (𝑃‘𝑥) ∈ ℝ⁺)
45		stoweidlem28.2	. . . . . . . 8 ⊢ Ⅎ𝑡𝜑
46	9	nfcri 2929	. . . . . . . 8 ⊢ Ⅎ𝑡 𝑥 ∈ (𝑇 ∖ 𝑈)
47		nfra1 3123	. . . . . . . 8 ⊢ Ⅎ𝑡∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)
48	45, 46, 47	nf3an 1948	. . . . . . 7 ⊢ Ⅎ𝑡(𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡))
49		rspa 3112	. . . . . . . . . 10 ⊢ ((∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡) ∧ 𝑡 ∈ (𝑇 ∖ 𝑈)) → ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡))
50	49	3ad2antl3 1195	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) ∧ 𝑡 ∈ (𝑇 ∖ 𝑈)) → ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡))
51		simpl2 1201	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) ∧ 𝑡 ∈ (𝑇 ∖ 𝑈)) → 𝑥 ∈ (𝑇 ∖ 𝑈))
52		fvres 6465	. . . . . . . . . 10 ⊢ (𝑥 ∈ (𝑇 ∖ 𝑈) → ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) = (𝑃‘𝑥))
53	51, 52	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) ∧ 𝑡 ∈ (𝑇 ∖ 𝑈)) → ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) = (𝑃‘𝑥))
54		fvres 6465	. . . . . . . . . 10 ⊢ (𝑡 ∈ (𝑇 ∖ 𝑈) → ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡) = (𝑃‘𝑡))
55	54	adantl 475	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) ∧ 𝑡 ∈ (𝑇 ∖ 𝑈)) → ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡) = (𝑃‘𝑡))
56	50, 53, 55	3brtr3d 4917	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) ∧ 𝑡 ∈ (𝑇 ∖ 𝑈)) → (𝑃‘𝑥) ≤ (𝑃‘𝑡))
57	56	ex 403	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → (𝑡 ∈ (𝑇 ∖ 𝑈) → (𝑃‘𝑥) ≤ (𝑃‘𝑡)))
58	48, 57	ralrimi 3139	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → ∀𝑡 ∈ (𝑇 ∖ 𝑈)(𝑃‘𝑥) ≤ (𝑃‘𝑡))
59		eleq1 2847	. . . . . . . . 9 ⊢ (𝑐 = (𝑃‘𝑥) → (𝑐 ∈ ℝ⁺ ↔ (𝑃‘𝑥) ∈ ℝ⁺))
60		breq1 4889	. . . . . . . . . 10 ⊢ (𝑐 = (𝑃‘𝑥) → (𝑐 ≤ (𝑃‘𝑡) ↔ (𝑃‘𝑥) ≤ (𝑃‘𝑡)))
61	60	ralbidv 3168	. . . . . . . . 9 ⊢ (𝑐 = (𝑃‘𝑥) → (∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡) ↔ ∀𝑡 ∈ (𝑇 ∖ 𝑈)(𝑃‘𝑥) ≤ (𝑃‘𝑡)))
62	59, 61	anbi12d 624	. . . . . . . 8 ⊢ (𝑐 = (𝑃‘𝑥) → ((𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡)) ↔ ((𝑃‘𝑥) ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)(𝑃‘𝑥) ≤ (𝑃‘𝑡))))
63	62	spcegv 3496	. . . . . . 7 ⊢ ((𝑃‘𝑥) ∈ ℝ⁺ → (((𝑃‘𝑥) ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)(𝑃‘𝑥) ≤ (𝑃‘𝑡)) → ∃𝑐(𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡))))
64	44, 63	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → (((𝑃‘𝑥) ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)(𝑃‘𝑥) ≤ (𝑃‘𝑡)) → ∃𝑐(𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡))))
65	44, 58, 64	mp2and 689	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → ∃𝑐(𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡)))
66		simpl1 1199	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) ∧ (𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡))) → 𝜑)
67		simprl 761	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) ∧ (𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡))) → 𝑐 ∈ ℝ⁺)
68		simprr 763	. . . . . 6 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) ∧ (𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡))) → ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡))
69		nfv 1957	. . . . . . . 8 ⊢ Ⅎ𝑡 𝑐 ∈ ℝ⁺
70		nfra1 3123	. . . . . . . 8 ⊢ Ⅎ𝑡∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡)
71	45, 69, 70	nf3an 1948	. . . . . . 7 ⊢ Ⅎ𝑡(𝜑 ∧ 𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡))
72		eqid 2778	. . . . . . 7 ⊢ if(𝑐 ≤ (1 / 2), 𝑐, (1 / 2)) = if(𝑐 ≤ (1 / 2), 𝑐, (1 / 2))
73	28	3ad2ant1 1124	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡)) → 𝑃:𝑇⟶ℝ)
74		difssd 3961	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡)) → (𝑇 ∖ 𝑈) ⊆ 𝑇)
75		simp2 1128	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡)) → 𝑐 ∈ ℝ⁺)
76		simp3 1129	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡)) → ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡))
77	71, 72, 73, 74, 75, 76	stoweidlem5 41149	. . . . . 6 ⊢ ((𝜑 ∧ 𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡)) → ∃𝑑(𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)))
78	66, 67, 68, 77	syl3anc 1439	. . . . 5 ⊢ (((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) ∧ (𝑐 ∈ ℝ⁺ ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑐 ≤ (𝑃‘𝑡))) → ∃𝑑(𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)))
79	65, 78	exlimddv 1978	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑇 ∖ 𝑈) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → ∃𝑑(𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)))
80	21, 22, 23, 79	syl3anc 1439	. . 3 ⊢ ((((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) ∧ 𝑥 ∈ (𝑇 ∖ 𝑈)) ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)) → ∃𝑑(𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)))
81		eqid 2778	. . . . . 6 ⊢ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈)) = ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))
82		stoweidlem28.5	. . . . . . . 8 ⊢ (𝜑 → 𝐽 ∈ Comp)
83		stoweidlem28.8	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 ∈ 𝐽)
84		cmptop 21607	. . . . . . . . . . 11 ⊢ (𝐽 ∈ Comp → 𝐽 ∈ Top)
85	82, 84	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → 𝐽 ∈ Top)
86		elssuni 4702	. . . . . . . . . . . 12 ⊢ (𝑈 ∈ 𝐽 → 𝑈 ⊆ ∪ 𝐽)
87	83, 86	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑈 ⊆ ∪ 𝐽)
88	87, 25	syl6sseqr 3871	. . . . . . . . . 10 ⊢ (𝜑 → 𝑈 ⊆ 𝑇)
89	25	isopn2 21244	. . . . . . . . . 10 ⊢ ((𝐽 ∈ Top ∧ 𝑈 ⊆ 𝑇) → (𝑈 ∈ 𝐽 ↔ (𝑇 ∖ 𝑈) ∈ (Clsd‘𝐽)))
90	85, 88, 89	syl2anc 579	. . . . . . . . 9 ⊢ (𝜑 → (𝑈 ∈ 𝐽 ↔ (𝑇 ∖ 𝑈) ∈ (Clsd‘𝐽)))
91	83, 90	mpbid 224	. . . . . . . 8 ⊢ (𝜑 → (𝑇 ∖ 𝑈) ∈ (Clsd‘𝐽))
92		cmpcld 21614	. . . . . . . 8 ⊢ ((𝐽 ∈ Comp ∧ (𝑇 ∖ 𝑈) ∈ (Clsd‘𝐽)) → (𝐽 ↾_t (𝑇 ∖ 𝑈)) ∈ Comp)
93	82, 91, 92	syl2anc 579	. . . . . . 7 ⊢ (𝜑 → (𝐽 ↾_t (𝑇 ∖ 𝑈)) ∈ Comp)
94	93	adantr 474	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → (𝐽 ↾_t (𝑇 ∖ 𝑈)) ∈ Comp)
95	27	adantr 474	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → 𝑃 ∈ (𝐽 Cn 𝐾))
96		difssd 3961	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → (𝑇 ∖ 𝑈) ⊆ 𝑇)
97	25	cnrest 21497	. . . . . . 7 ⊢ ((𝑃 ∈ (𝐽 Cn 𝐾) ∧ (𝑇 ∖ 𝑈) ⊆ 𝑇) → (𝑃 ↾ (𝑇 ∖ 𝑈)) ∈ ((𝐽 ↾_t (𝑇 ∖ 𝑈)) Cn 𝐾))
98	95, 96, 97	syl2anc 579	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → (𝑃 ↾ (𝑇 ∖ 𝑈)) ∈ ((𝐽 ↾_t (𝑇 ∖ 𝑈)) Cn 𝐾))
99		df-ne 2970	. . . . . . . 8 ⊢ ((𝑇 ∖ 𝑈) ≠ ∅ ↔ ¬ (𝑇 ∖ 𝑈) = ∅)
100		difssd 3961	. . . . . . . . . 10 ⊢ (𝜑 → (𝑇 ∖ 𝑈) ⊆ 𝑇)
101	25	restuni 21374	. . . . . . . . . 10 ⊢ ((𝐽 ∈ Top ∧ (𝑇 ∖ 𝑈) ⊆ 𝑇) → (𝑇 ∖ 𝑈) = ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈)))
102	85, 100, 101	syl2anc 579	. . . . . . . . 9 ⊢ (𝜑 → (𝑇 ∖ 𝑈) = ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈)))
103	102	neeq1d 3028	. . . . . . . 8 ⊢ (𝜑 → ((𝑇 ∖ 𝑈) ≠ ∅ ↔ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈)) ≠ ∅))
104	99, 103	syl5rbbr 278	. . . . . . 7 ⊢ (𝜑 → (∪ (𝐽 ↾_t (𝑇 ∖ 𝑈)) ≠ ∅ ↔ ¬ (𝑇 ∖ 𝑈) = ∅))
105	104	biimpar 471	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈)) ≠ ∅)
106	81, 24, 94, 98, 105	evth2 23167	. . . . 5 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → ∃𝑥 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))∀𝑠 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑠))
107		nfcv 2934	. . . . . . 7 ⊢ Ⅎ𝑠∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))
108		nfcv 2934	. . . . . . . . 9 ⊢ Ⅎ𝑡𝐽
109		nfcv 2934	. . . . . . . . 9 ⊢ Ⅎ𝑡 ↾_t
110	108, 109, 9	nfov 6952	. . . . . . . 8 ⊢ Ⅎ𝑡(𝐽 ↾_t (𝑇 ∖ 𝑈))
111	110	nfuni 4677	. . . . . . 7 ⊢ Ⅎ𝑡∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))
112		nfcv 2934	. . . . . . . . . 10 ⊢ Ⅎ𝑡𝑃
113	112, 9	nfres 5644	. . . . . . . . 9 ⊢ Ⅎ𝑡(𝑃 ↾ (𝑇 ∖ 𝑈))
114		nfcv 2934	. . . . . . . . 9 ⊢ Ⅎ𝑡𝑥
115	113, 114	nffv 6456	. . . . . . . 8 ⊢ Ⅎ𝑡((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥)
116		nfcv 2934	. . . . . . . 8 ⊢ Ⅎ𝑡 ≤
117		nfcv 2934	. . . . . . . . 9 ⊢ Ⅎ𝑡𝑠
118	113, 117	nffv 6456	. . . . . . . 8 ⊢ Ⅎ𝑡((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑠)
119	115, 116, 118	nfbr 4933	. . . . . . 7 ⊢ Ⅎ𝑡((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑠)
120		nfv 1957	. . . . . . 7 ⊢ Ⅎ𝑠((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)
121		fveq2 6446	. . . . . . . 8 ⊢ (𝑠 = 𝑡 → ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑠) = ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡))
122	121	breq2d 4898	. . . . . . 7 ⊢ (𝑠 = 𝑡 → (((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑠) ↔ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)))
123	107, 111, 119, 120, 122	cbvralf 3361	. . . . . 6 ⊢ (∀𝑠 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑠) ↔ ∀𝑡 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡))
124	123	rexbii 3224	. . . . 5 ⊢ (∃𝑥 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))∀𝑠 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑠) ↔ ∃𝑥 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))∀𝑡 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡))
125	106, 124	sylib 210	. . . 4 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → ∃𝑥 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))∀𝑡 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡))
126	9, 111	raleqf 3322	. . . . . . 7 ⊢ ((𝑇 ∖ 𝑈) = ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈)) → (∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡) ↔ ∀𝑡 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)))
127	126	rexeqbi1dv 3329	. . . . . 6 ⊢ ((𝑇 ∖ 𝑈) = ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈)) → (∃𝑥 ∈ (𝑇 ∖ 𝑈)∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡) ↔ ∃𝑥 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))∀𝑡 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)))
128	102, 127	syl 17	. . . . 5 ⊢ (𝜑 → (∃𝑥 ∈ (𝑇 ∖ 𝑈)∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡) ↔ ∃𝑥 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))∀𝑡 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)))
129	128	adantr 474	. . . 4 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → (∃𝑥 ∈ (𝑇 ∖ 𝑈)∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡) ↔ ∃𝑥 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))∀𝑡 ∈ ∪ (𝐽 ↾_t (𝑇 ∖ 𝑈))((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡)))
130	125, 129	mpbird 249	. . 3 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → ∃𝑥 ∈ (𝑇 ∖ 𝑈)∀𝑡 ∈ (𝑇 ∖ 𝑈)((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑥) ≤ ((𝑃 ↾ (𝑇 ∖ 𝑈))‘𝑡))
131	80, 130	r19.29a 3264	. 2 ⊢ ((𝜑 ∧ ¬ (𝑇 ∖ 𝑈) = ∅) → ∃𝑑(𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)))
132	20, 131	pm2.61dan 803	1 ⊢ (𝜑 → ∃𝑑(𝑑 ∈ ℝ⁺ ∧ 𝑑 < 1 ∧ ∀𝑡 ∈ (𝑇 ∖ 𝑈)𝑑 ≤ (𝑃‘𝑡)))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 198 ∧ wa 386 ∧ w3a 1071 = wceq 1601 ∃wex 1823 Ⅎwnf 1827 ∈ wcel 2107 Ⅎwnfc 2919 ≠ wne 2969 ∀wral 3090 ∃wrex 3091 ∖ cdif 3789 ⊆ wss 3792 ∅c0 4141 ifcif 4307 ∪ cuni 4671 class class class wbr 4886 ran crn 5356 ↾ cres 5357 ⟶wf 6131 ‘cfv 6135 (class class class)co 6922 ℝcr 10271 0cc0 10272 1c1 10273 < clt 10411 ≤ cle 10412 / cdiv 11032 2c2 11430 ℝ⁺crp 12137 (,)cioo 12487 ↾_t crest 16467 topGenctg 16484 Topctop 21105 Clsdccld 21228 Cn ccn 21436 Compccmp 21598

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1839 ax-4 1853 ax-5 1953 ax-6 2021 ax-7 2055 ax-8 2109 ax-9 2116 ax-10 2135 ax-11 2150 ax-12 2163 ax-13 2334 ax-ext 2754 ax-rep 5006 ax-sep 5017 ax-nul 5025 ax-pow 5077 ax-pr 5138 ax-un 7226 ax-inf2 8835 ax-cnex 10328 ax-resscn 10329 ax-1cn 10330 ax-icn 10331 ax-addcl 10332 ax-addrcl 10333 ax-mulcl 10334 ax-mulrcl 10335 ax-mulcom 10336 ax-addass 10337 ax-mulass 10338 ax-distr 10339 ax-i2m1 10340 ax-1ne0 10341 ax-1rid 10342 ax-rnegex 10343 ax-rrecex 10344 ax-cnre 10345 ax-pre-lttri 10346 ax-pre-lttrn 10347 ax-pre-ltadd 10348 ax-pre-mulgt0 10349 ax-pre-sup 10350 ax-mulf 10352

This theorem depends on definitions: df-bi 199 df-an 387 df-or 837 df-3or 1072 df-3an 1073 df-tru 1605 df-ex 1824 df-nf 1828 df-sb 2012 df-mo 2551 df-eu 2587 df-clab 2764 df-cleq 2770 df-clel 2774 df-nfc 2921 df-ne 2970 df-nel 3076 df-ral 3095 df-rex 3096 df-reu 3097 df-rmo 3098 df-rab 3099 df-v 3400 df-sbc 3653 df-csb 3752 df-dif 3795 df-un 3797 df-in 3799 df-ss 3806 df-pss 3808 df-nul 4142 df-if 4308 df-pw 4381 df-sn 4399 df-pr 4401 df-tp 4403 df-op 4405 df-uni 4672 df-int 4711 df-iun 4755 df-iin 4756 df-br 4887 df-opab 4949 df-mpt 4966 df-tr 4988 df-id 5261 df-eprel 5266 df-po 5274 df-so 5275 df-fr 5314 df-se 5315 df-we 5316 df-xp 5361 df-rel 5362 df-cnv 5363 df-co 5364 df-dm 5365 df-rn 5366 df-res 5367 df-ima 5368 df-pred 5933 df-ord 5979 df-on 5980 df-lim 5981 df-suc 5982 df-iota 6099 df-fun 6137 df-fn 6138 df-f 6139 df-f1 6140 df-fo 6141 df-f1o 6142 df-fv 6143 df-isom 6144 df-riota 6883 df-ov 6925 df-oprab 6926 df-mpt2 6927 df-of 7174 df-om 7344 df-1st 7445 df-2nd 7446 df-supp 7577 df-wrecs 7689 df-recs 7751 df-rdg 7789 df-1o 7843 df-2o 7844 df-oadd 7847 df-er 8026 df-map 8142 df-ixp 8195 df-en 8242 df-dom 8243 df-sdom 8244 df-fin 8245 df-fsupp 8564 df-fi 8605 df-sup 8636 df-inf 8637 df-oi 8704 df-card 9098 df-cda 9325 df-pnf 10413 df-mnf 10414 df-xr 10415 df-ltxr 10416 df-le 10417 df-sub 10608 df-neg 10609 df-div 11033 df-nn 11375 df-2 11438 df-3 11439 df-4 11440 df-5 11441 df-6 11442 df-7 11443 df-8 11444 df-9 11445 df-n0 11643 df-z 11729 df-dec 11846 df-uz 11993 df-q 12096 df-rp 12138 df-xneg 12257 df-xadd 12258 df-xmul 12259 df-ioo 12491 df-icc 12494 df-fz 12644 df-fzo 12785 df-seq 13120 df-exp 13179 df-hash 13436 df-cj 14246 df-re 14247 df-im 14248 df-sqrt 14382 df-abs 14383 df-struct 16257 df-ndx 16258 df-slot 16259 df-base 16261 df-sets 16262 df-ress 16263 df-plusg 16351 df-mulr 16352 df-starv 16353 df-sca 16354 df-vsca 16355 df-ip 16356 df-tset 16357 df-ple 16358 df-ds 16360 df-unif 16361 df-hom 16362 df-cco 16363 df-rest 16469 df-topn 16470 df-0g 16488 df-gsum 16489 df-topgen 16490 df-pt 16491 df-prds 16494 df-xrs 16548 df-qtop 16553 df-imas 16554 df-xps 16556 df-mre 16632 df-mrc 16633 df-acs 16635 df-mgm 17628 df-sgrp 17670 df-mnd 17681 df-submnd 17722 df-mulg 17928 df-cntz 18133 df-cmn 18581 df-psmet 20134 df-xmet 20135 df-met 20136 df-bl 20137 df-mopn 20138 df-cnfld 20143 df-top 21106 df-topon 21123 df-topsp 21145 df-bases 21158 df-cld 21231 df-cn 21439 df-cnp 21440 df-cmp 21599 df-tx 21774 df-hmeo 21967 df-xms 22533 df-ms 22534 df-tms 22535

This theorem is referenced by: stoweidlem56 41200

W3C validator