Theorem stoweidlem21 42313

Description: Once the Stone Weierstrass theorem has been proven for approximating nonnegative functions, then this lemma is used to extend the result to functions with (possibly) negative values. (Contributed by Glauco Siliprandi, 20-Apr-2017.)

Hypotheses

Ref	Expression
stoweidlem21.1	⊢ Ⅎ𝑡𝐺
stoweidlem21.2	⊢ Ⅎ𝑡𝐻
stoweidlem21.3	⊢ Ⅎ𝑡𝑆
stoweidlem21.4	⊢ Ⅎ𝑡𝜑
stoweidlem21.5	⊢ 𝐺 = (𝑡 ∈ 𝑇 ↦ ((𝐻‘𝑡) + 𝑆))
stoweidlem21.6	⊢ (𝜑 → 𝐹:𝑇⟶ℝ)
stoweidlem21.7	⊢ (𝜑 → 𝑆 ∈ ℝ)
stoweidlem21.8	⊢ ((𝜑 ∧ 𝑓 ∈ 𝐴 ∧ 𝑔 ∈ 𝐴) → (𝑡 ∈ 𝑇 ↦ ((𝑓‘𝑡) + (𝑔‘𝑡))) ∈ 𝐴)
stoweidlem21.9	⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑡 ∈ 𝑇 ↦ 𝑥) ∈ 𝐴)
stoweidlem21.10	⊢ (𝜑 → ∀𝑓 ∈ 𝐴 𝑓:𝑇⟶ℝ)
stoweidlem21.11	⊢ (𝜑 → 𝐻 ∈ 𝐴)
stoweidlem21.12	⊢ (𝜑 → ∀𝑡 ∈ 𝑇 (abs‘((𝐻‘𝑡) − ((𝐹‘𝑡) − 𝑆))) < 𝐸)

Assertion

Ref	Expression
stoweidlem21	⊢ (𝜑 → ∃𝑓 ∈ 𝐴 ∀𝑡 ∈ 𝑇 (abs‘((𝑓‘𝑡) − (𝐹‘𝑡))) < 𝐸)

Distinct variable groups:   𝑓,𝑔,𝑡,𝑇   𝐴,𝑓,𝑔   𝑓,𝐸,𝑔   𝑓,𝐹,𝑔   𝑓,𝐺,𝑔   𝑓,𝐻,𝑔   𝜑,𝑓,𝑔   𝑆,𝑔   𝑥,𝑡,𝑇   𝑥,𝐴   𝑥,𝑆   𝜑,𝑥

Allowed substitution hints:   𝜑(𝑡)   𝐴(𝑡)   𝑆(𝑡,𝑓)   𝐸(𝑥,𝑡)   𝐹(𝑥,𝑡)   𝐺(𝑥,𝑡)   𝐻(𝑥,𝑡)

Proof of Theorem stoweidlem21

Dummy variable 𝑠 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		stoweidlem21.5	. . . 4 ⊢ 𝐺 = (𝑡 ∈ 𝑇 ↦ ((𝐻‘𝑡) + 𝑆))
2		stoweidlem21.4	. . . . 5 ⊢ Ⅎ𝑡𝜑
3		stoweidlem21.7	. . . . . . . 8 ⊢ (𝜑 → 𝑆 ∈ ℝ)
4		fvconst2g 6966	. . . . . . . 8 ⊢ ((𝑆 ∈ ℝ ∧ 𝑡 ∈ 𝑇) → ((𝑇 × {𝑆})‘𝑡) = 𝑆)
5	3, 4	sylan 582	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → ((𝑇 × {𝑆})‘𝑡) = 𝑆)
6	5	eqcomd 2829	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → 𝑆 = ((𝑇 × {𝑆})‘𝑡))
7	6	oveq2d 7174	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → ((𝐻‘𝑡) + 𝑆) = ((𝐻‘𝑡) + ((𝑇 × {𝑆})‘𝑡)))
8	2, 7	mpteq2da 5162	. . . 4 ⊢ (𝜑 → (𝑡 ∈ 𝑇 ↦ ((𝐻‘𝑡) + 𝑆)) = (𝑡 ∈ 𝑇 ↦ ((𝐻‘𝑡) + ((𝑇 × {𝑆})‘𝑡))))
9	1, 8	syl5eq 2870	. . 3 ⊢ (𝜑 → 𝐺 = (𝑡 ∈ 𝑇 ↦ ((𝐻‘𝑡) + ((𝑇 × {𝑆})‘𝑡))))
10		stoweidlem21.11	. . . 4 ⊢ (𝜑 → 𝐻 ∈ 𝐴)
11		fconstmpt 5616	. . . . . 6 ⊢ (𝑇 × {𝑆}) = (𝑠 ∈ 𝑇 ↦ 𝑆)
12		stoweidlem21.3	. . . . . . 7 ⊢ Ⅎ𝑡𝑆
13		nfcv 2979	. . . . . . 7 ⊢ Ⅎ𝑠𝑆
14		eqidd 2824	. . . . . . 7 ⊢ (𝑠 = 𝑡 → 𝑆 = 𝑆)
15	12, 13, 14	cbvmpt 5169	. . . . . 6 ⊢ (𝑠 ∈ 𝑇 ↦ 𝑆) = (𝑡 ∈ 𝑇 ↦ 𝑆)
16	11, 15	eqtri 2846	. . . . 5 ⊢ (𝑇 × {𝑆}) = (𝑡 ∈ 𝑇 ↦ 𝑆)
17	12	nfeq2 2997	. . . . . . . . . 10 ⊢ Ⅎ𝑡 𝑥 = 𝑆
18		simpl 485	. . . . . . . . . 10 ⊢ ((𝑥 = 𝑆 ∧ 𝑡 ∈ 𝑇) → 𝑥 = 𝑆)
19	17, 18	mpteq2da 5162	. . . . . . . . 9 ⊢ (𝑥 = 𝑆 → (𝑡 ∈ 𝑇 ↦ 𝑥) = (𝑡 ∈ 𝑇 ↦ 𝑆))
20	19	eleq1d 2899	. . . . . . . 8 ⊢ (𝑥 = 𝑆 → ((𝑡 ∈ 𝑇 ↦ 𝑥) ∈ 𝐴 ↔ (𝑡 ∈ 𝑇 ↦ 𝑆) ∈ 𝐴))
21	20	imbi2d 343	. . . . . . 7 ⊢ (𝑥 = 𝑆 → ((𝜑 → (𝑡 ∈ 𝑇 ↦ 𝑥) ∈ 𝐴) ↔ (𝜑 → (𝑡 ∈ 𝑇 ↦ 𝑆) ∈ 𝐴)))
22		stoweidlem21.9	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑡 ∈ 𝑇 ↦ 𝑥) ∈ 𝐴)
23	22	expcom 416	. . . . . . 7 ⊢ (𝑥 ∈ ℝ → (𝜑 → (𝑡 ∈ 𝑇 ↦ 𝑥) ∈ 𝐴))
24	21, 23	vtoclga 3576	. . . . . 6 ⊢ (𝑆 ∈ ℝ → (𝜑 → (𝑡 ∈ 𝑇 ↦ 𝑆) ∈ 𝐴))
25	3, 24	mpcom 38	. . . . 5 ⊢ (𝜑 → (𝑡 ∈ 𝑇 ↦ 𝑆) ∈ 𝐴)
26	16, 25	eqeltrid 2919	. . . 4 ⊢ (𝜑 → (𝑇 × {𝑆}) ∈ 𝐴)
27		stoweidlem21.8	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ 𝐴 ∧ 𝑔 ∈ 𝐴) → (𝑡 ∈ 𝑇 ↦ ((𝑓‘𝑡) + (𝑔‘𝑡))) ∈ 𝐴)
28		stoweidlem21.2	. . . . 5 ⊢ Ⅎ𝑡𝐻
29		nfcv 2979	. . . . . 6 ⊢ Ⅎ𝑡𝑇
30	12	nfsn 4645	. . . . . 6 ⊢ Ⅎ𝑡{𝑆}
31	29, 30	nfxp 5590	. . . . 5 ⊢ Ⅎ𝑡(𝑇 × {𝑆})
32	27, 28, 31	stoweidlem8 42300	. . . 4 ⊢ ((𝜑 ∧ 𝐻 ∈ 𝐴 ∧ (𝑇 × {𝑆}) ∈ 𝐴) → (𝑡 ∈ 𝑇 ↦ ((𝐻‘𝑡) + ((𝑇 × {𝑆})‘𝑡))) ∈ 𝐴)
33	10, 26, 32	mpd3an23 1459	. . 3 ⊢ (𝜑 → (𝑡 ∈ 𝑇 ↦ ((𝐻‘𝑡) + ((𝑇 × {𝑆})‘𝑡))) ∈ 𝐴)
34	9, 33	eqeltrd 2915	. 2 ⊢ (𝜑 → 𝐺 ∈ 𝐴)
35		simpr 487	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → 𝑡 ∈ 𝑇)
36		stoweidlem21.10	. . . . . . . . . . . 12 ⊢ (𝜑 → ∀𝑓 ∈ 𝐴 𝑓:𝑇⟶ℝ)
37		feq1 6497	. . . . . . . . . . . . 13 ⊢ (𝑓 = 𝐻 → (𝑓:𝑇⟶ℝ ↔ 𝐻:𝑇⟶ℝ))
38	37	rspccva 3624	. . . . . . . . . . . 12 ⊢ ((∀𝑓 ∈ 𝐴 𝑓:𝑇⟶ℝ ∧ 𝐻 ∈ 𝐴) → 𝐻:𝑇⟶ℝ)
39	36, 10, 38	syl2anc 586	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐻:𝑇⟶ℝ)
40	39	ffvelrnda 6853	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (𝐻‘𝑡) ∈ ℝ)
41	3	adantr 483	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → 𝑆 ∈ ℝ)
42	40, 41	readdcld 10672	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → ((𝐻‘𝑡) + 𝑆) ∈ ℝ)
43	1	fvmpt2 6781	. . . . . . . . 9 ⊢ ((𝑡 ∈ 𝑇 ∧ ((𝐻‘𝑡) + 𝑆) ∈ ℝ) → (𝐺‘𝑡) = ((𝐻‘𝑡) + 𝑆))
44	35, 42, 43	syl2anc 586	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (𝐺‘𝑡) = ((𝐻‘𝑡) + 𝑆))
45	44	oveq1d 7173	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → ((𝐺‘𝑡) − (𝐹‘𝑡)) = (((𝐻‘𝑡) + 𝑆) − (𝐹‘𝑡)))
46	40	recnd 10671	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (𝐻‘𝑡) ∈ ℂ)
47		stoweidlem21.6	. . . . . . . . . 10 ⊢ (𝜑 → 𝐹:𝑇⟶ℝ)
48	47	ffvelrnda 6853	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (𝐹‘𝑡) ∈ ℝ)
49	48	recnd 10671	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (𝐹‘𝑡) ∈ ℂ)
50	3	recnd 10671	. . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ ℂ)
51	50	adantr 483	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → 𝑆 ∈ ℂ)
52	46, 49, 51	subsub3d 11029	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → ((𝐻‘𝑡) − ((𝐹‘𝑡) − 𝑆)) = (((𝐻‘𝑡) + 𝑆) − (𝐹‘𝑡)))
53	45, 52	eqtr4d 2861	. . . . . 6 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → ((𝐺‘𝑡) − (𝐹‘𝑡)) = ((𝐻‘𝑡) − ((𝐹‘𝑡) − 𝑆)))
54	53	fveq2d 6676	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (abs‘((𝐺‘𝑡) − (𝐹‘𝑡))) = (abs‘((𝐻‘𝑡) − ((𝐹‘𝑡) − 𝑆))))
55		stoweidlem21.12	. . . . . 6 ⊢ (𝜑 → ∀𝑡 ∈ 𝑇 (abs‘((𝐻‘𝑡) − ((𝐹‘𝑡) − 𝑆))) < 𝐸)
56	55	r19.21bi 3210	. . . . 5 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (abs‘((𝐻‘𝑡) − ((𝐹‘𝑡) − 𝑆))) < 𝐸)
57	54, 56	eqbrtrd 5090	. . . 4 ⊢ ((𝜑 ∧ 𝑡 ∈ 𝑇) → (abs‘((𝐺‘𝑡) − (𝐹‘𝑡))) < 𝐸)
58	57	ex 415	. . 3 ⊢ (𝜑 → (𝑡 ∈ 𝑇 → (abs‘((𝐺‘𝑡) − (𝐹‘𝑡))) < 𝐸))
59	2, 58	ralrimi 3218	. 2 ⊢ (𝜑 → ∀𝑡 ∈ 𝑇 (abs‘((𝐺‘𝑡) − (𝐹‘𝑡))) < 𝐸)
60		stoweidlem21.1	. . . . 5 ⊢ Ⅎ𝑡𝐺
61	60	nfeq2 2997	. . . 4 ⊢ Ⅎ𝑡 𝑓 = 𝐺
62		fveq1 6671	. . . . . . 7 ⊢ (𝑓 = 𝐺 → (𝑓‘𝑡) = (𝐺‘𝑡))
63	62	oveq1d 7173	. . . . . 6 ⊢ (𝑓 = 𝐺 → ((𝑓‘𝑡) − (𝐹‘𝑡)) = ((𝐺‘𝑡) − (𝐹‘𝑡)))
64	63	fveq2d 6676	. . . . 5 ⊢ (𝑓 = 𝐺 → (abs‘((𝑓‘𝑡) − (𝐹‘𝑡))) = (abs‘((𝐺‘𝑡) − (𝐹‘𝑡))))
65	64	breq1d 5078	. . . 4 ⊢ (𝑓 = 𝐺 → ((abs‘((𝑓‘𝑡) − (𝐹‘𝑡))) < 𝐸 ↔ (abs‘((𝐺‘𝑡) − (𝐹‘𝑡))) < 𝐸))
66	61, 65	ralbid 3233	. . 3 ⊢ (𝑓 = 𝐺 → (∀𝑡 ∈ 𝑇 (abs‘((𝑓‘𝑡) − (𝐹‘𝑡))) < 𝐸 ↔ ∀𝑡 ∈ 𝑇 (abs‘((𝐺‘𝑡) − (𝐹‘𝑡))) < 𝐸))
67	66	rspcev 3625	. 2 ⊢ ((𝐺 ∈ 𝐴 ∧ ∀𝑡 ∈ 𝑇 (abs‘((𝐺‘𝑡) − (𝐹‘𝑡))) < 𝐸) → ∃𝑓 ∈ 𝐴 ∀𝑡 ∈ 𝑇 (abs‘((𝑓‘𝑡) − (𝐹‘𝑡))) < 𝐸)
68	34, 59, 67	syl2anc 586	1 ⊢ (𝜑 → ∃𝑓 ∈ 𝐴 ∀𝑡 ∈ 𝑇 (abs‘((𝑓‘𝑡) − (𝐹‘𝑡))) < 𝐸)

Syntax hints:   → wi 4   ∧ wa 398   ∧ w3a 1083   = wceq 1537  Ⅎwnf 1784   ∈ wcel 2114  Ⅎwnfc 2963  ∀wral 3140  ∃wrex 3141  {csn 4569   class class class wbr 5068   ↦ cmpt 5148   × cxp 5555  ⟶wf 6353  ‘cfv 6357  (class class class)co 7158  ℂcc 10537  ℝcr 10538   + caddc 10542   < clt 10677   − cmin 10872  abscabs 14595

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 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463  ax-resscn 10596  ax-1cn 10597  ax-icn 10598  ax-addcl 10599  ax-addrcl 10600  ax-mulcl 10601  ax-mulrcl 10602  ax-mulcom 10603  ax-addass 10604  ax-mulass 10605  ax-distr 10606  ax-i2m1 10607  ax-1ne0 10608  ax-1rid 10609  ax-rnegex 10610  ax-rrecex 10611  ax-cnre 10612  ax-pre-lttri 10613  ax-pre-lttrn 10614  ax-pre-ltadd 10615

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-nel 3126  df-ral 3145  df-rex 3146  df-reu 3147  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-op 4576  df-uni 4841  df-br 5069  df-opab 5131  df-mpt 5149  df-id 5462  df-po 5476  df-so 5477  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-riota 7116  df-ov 7161  df-oprab 7162  df-mpo 7163  df-er 8291  df-en 8512  df-dom 8513  df-sdom 8514  df-pnf 10679  df-mnf 10680  df-ltxr 10682  df-sub 10874

This theorem is referenced by:  stoweidlem62  42354