Theorem rfcnpre4 45612

Description: If F is a continuous function with respect to the standard topology, then the preimage A of the values less than or equal to a given real B is a closed set. (Contributed by Glauco Siliprandi, 20-Apr-2017.)

Hypotheses

Ref	Expression
rfcnpre4.1	⊢ Ⅎ𝑡𝐹
rfcnpre4.2	⊢ 𝐾 = (topGen‘ran (,))
rfcnpre4.3	⊢ 𝑇 = ∪ 𝐽
rfcnpre4.4	⊢ 𝐴 = {𝑡 ∈ 𝑇 ∣ (𝐹‘𝑡) ≤ 𝐵}
rfcnpre4.5	⊢ (𝜑 → 𝐵 ∈ ℝ)
rfcnpre4.6	⊢ (𝜑 → 𝐹 ∈ (𝐽 Cn 𝐾))

Assertion

Ref	Expression
rfcnpre4	⊢ (𝜑 → 𝐴 ∈ (Clsd‘𝐽))

Distinct variable groups:   𝑡,𝐵   𝑡,𝑇

Allowed substitution hints:   𝜑(𝑡)   𝐴(𝑡)   𝐹(𝑡)   𝐽(𝑡)   𝐾(𝑡)

Proof of Theorem rfcnpre4

Dummy variable 𝑠 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		rfcnpre4.2	. . . . . . . 8 ⊢ 𝐾 = (topGen‘ran (,))
2		rfcnpre4.3	. . . . . . . 8 ⊢ 𝑇 = ∪ 𝐽
3		eqid 2765	. . . . . . . 8 ⊢ (𝐽 Cn 𝐾) = (𝐽 Cn 𝐾)
4		rfcnpre4.6	. . . . . . . 8 ⊢ (𝜑 → 𝐹 ∈ (𝐽 Cn 𝐾))
5	1, 2, 3, 4	fcnre 45603	. . . . . . 7 ⊢ (𝜑 → 𝐹:𝑇⟶ℝ)
6		ffn 6695	. . . . . . 7 ⊢ (𝐹:𝑇⟶ℝ → 𝐹 Fn 𝑇)
7		elpreima 7043	. . . . . . 7 ⊢ (𝐹 Fn 𝑇 → (𝑠 ∈ (◡𝐹 “ (-∞(,]𝐵)) ↔ (𝑠 ∈ 𝑇 ∧ (𝐹‘𝑠) ∈ (-∞(,]𝐵))))
8	5, 6, 7	3syl 19	. . . . . 6 ⊢ (𝜑 → (𝑠 ∈ (◡𝐹 “ (-∞(,]𝐵)) ↔ (𝑠 ∈ 𝑇 ∧ (𝐹‘𝑠) ∈ (-∞(,]𝐵))))
9		mnfxr 11254	. . . . . . . . 9 ⊢ -∞ ∈ ℝ*
10		rfcnpre4.5	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ ℝ)
11	10	rexrd 11247	. . . . . . . . . 10 ⊢ (𝜑 → 𝐵 ∈ ℝ*)
12	11	adantr 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑇) → 𝐵 ∈ ℝ*)
13		elioc1 13405	. . . . . . . . 9 ⊢ ((-∞ ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → ((𝐹‘𝑠) ∈ (-∞(,]𝐵) ↔ ((𝐹‘𝑠) ∈ ℝ* ∧ -∞ < (𝐹‘𝑠) ∧ (𝐹‘𝑠) ≤ 𝐵)))
14	9, 12, 13	sylancr 598	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑇) → ((𝐹‘𝑠) ∈ (-∞(,]𝐵) ↔ ((𝐹‘𝑠) ∈ ℝ* ∧ -∞ < (𝐹‘𝑠) ∧ (𝐹‘𝑠) ≤ 𝐵)))
15		simpr3 1213	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝑇) ∧ ((𝐹‘𝑠) ∈ ℝ* ∧ -∞ < (𝐹‘𝑠) ∧ (𝐹‘𝑠) ≤ 𝐵)) → (𝐹‘𝑠) ≤ 𝐵)
16	5	ffvelcdmda 7069	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑇) → (𝐹‘𝑠) ∈ ℝ)
17	16	rexrd 11247	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑇) → (𝐹‘𝑠) ∈ ℝ*)
18	17	adantr 485	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝑇) ∧ (𝐹‘𝑠) ≤ 𝐵) → (𝐹‘𝑠) ∈ ℝ*)
19	16	adantr 485	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝑇) ∧ (𝐹‘𝑠) ≤ 𝐵) → (𝐹‘𝑠) ∈ ℝ)
20		mnflt 13139	. . . . . . . . . . 11 ⊢ ((𝐹‘𝑠) ∈ ℝ → -∞ < (𝐹‘𝑠))
21	19, 20	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝑇) ∧ (𝐹‘𝑠) ≤ 𝐵) → -∞ < (𝐹‘𝑠))
22		simpr 489	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝑇) ∧ (𝐹‘𝑠) ≤ 𝐵) → (𝐹‘𝑠) ≤ 𝐵)
23	18, 21, 22	3jca 1144	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑠 ∈ 𝑇) ∧ (𝐹‘𝑠) ≤ 𝐵) → ((𝐹‘𝑠) ∈ ℝ* ∧ -∞ < (𝐹‘𝑠) ∧ (𝐹‘𝑠) ≤ 𝐵))
24	15, 23	impbida 812	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑇) → (((𝐹‘𝑠) ∈ ℝ* ∧ -∞ < (𝐹‘𝑠) ∧ (𝐹‘𝑠) ≤ 𝐵) ↔ (𝐹‘𝑠) ≤ 𝐵))
25	14, 24	bitrd 282	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑠 ∈ 𝑇) → ((𝐹‘𝑠) ∈ (-∞(,]𝐵) ↔ (𝐹‘𝑠) ≤ 𝐵))
26	25	pm5.32da 589	. . . . . 6 ⊢ (𝜑 → ((𝑠 ∈ 𝑇 ∧ (𝐹‘𝑠) ∈ (-∞(,]𝐵)) ↔ (𝑠 ∈ 𝑇 ∧ (𝐹‘𝑠) ≤ 𝐵)))
27	8, 26	bitrd 282	. . . . 5 ⊢ (𝜑 → (𝑠 ∈ (◡𝐹 “ (-∞(,]𝐵)) ↔ (𝑠 ∈ 𝑇 ∧ (𝐹‘𝑠) ≤ 𝐵)))
28		nfcv 2927	. . . . . 6 ⊢ Ⅎ𝑡𝑠
29		nfcv 2927	. . . . . 6 ⊢ Ⅎ𝑡𝑇
30		rfcnpre4.1	. . . . . . . 8 ⊢ Ⅎ𝑡𝐹
31	30, 28	nffv 6881	. . . . . . 7 ⊢ Ⅎ𝑡(𝐹‘𝑠)
32		nfcv 2927	. . . . . . 7 ⊢ Ⅎ𝑡 ≤
33		nfcv 2927	. . . . . . 7 ⊢ Ⅎ𝑡𝐵
34	31, 32, 33	nfbr 5152	. . . . . 6 ⊢ Ⅎ𝑡(𝐹‘𝑠) ≤ 𝐵
35		fveq2 6871	. . . . . . 7 ⊢ (𝑡 = 𝑠 → (𝐹‘𝑡) = (𝐹‘𝑠))
36	35	breq1d 5115	. . . . . 6 ⊢ (𝑡 = 𝑠 → ((𝐹‘𝑡) ≤ 𝐵 ↔ (𝐹‘𝑠) ≤ 𝐵))
37	28, 29, 34, 36	elrabf 3650	. . . . 5 ⊢ (𝑠 ∈ {𝑡 ∈ 𝑇 ∣ (𝐹‘𝑡) ≤ 𝐵} ↔ (𝑠 ∈ 𝑇 ∧ (𝐹‘𝑠) ≤ 𝐵))
38	27, 37	bitr4di 292	. . . 4 ⊢ (𝜑 → (𝑠 ∈ (◡𝐹 “ (-∞(,]𝐵)) ↔ 𝑠 ∈ {𝑡 ∈ 𝑇 ∣ (𝐹‘𝑡) ≤ 𝐵}))
39	38	eqrdv 2763	. . 3 ⊢ (𝜑 → (◡𝐹 “ (-∞(,]𝐵)) = {𝑡 ∈ 𝑇 ∣ (𝐹‘𝑡) ≤ 𝐵})
40		rfcnpre4.4	. . 3 ⊢ 𝐴 = {𝑡 ∈ 𝑇 ∣ (𝐹‘𝑡) ≤ 𝐵}
41	39, 40	eqtr4di 2818	. 2 ⊢ (𝜑 → (◡𝐹 “ (-∞(,]𝐵)) = 𝐴)
42		iocmnfcld 24886	. . . . 5 ⊢ (𝐵 ∈ ℝ → (-∞(,]𝐵) ∈ (Clsd‘(topGen‘ran (,))))
43	10, 42	syl 18	. . . 4 ⊢ (𝜑 → (-∞(,]𝐵) ∈ (Clsd‘(topGen‘ran (,))))
44	1	fveq2i 6874	. . . 4 ⊢ (Clsd‘𝐾) = (Clsd‘(topGen‘ran (,)))
45	43, 44	eleqtrrdi 2876	. . 3 ⊢ (𝜑 → (-∞(,]𝐵) ∈ (Clsd‘𝐾))
46		cnclima 23386	. . 3 ⊢ ((𝐹 ∈ (𝐽 Cn 𝐾) ∧ (-∞(,]𝐵) ∈ (Clsd‘𝐾)) → (◡𝐹 “ (-∞(,]𝐵)) ∈ (Clsd‘𝐽))
47	4, 45, 46	syl2anc 595	. 2 ⊢ (𝜑 → (◡𝐹 “ (-∞(,]𝐵)) ∈ (Clsd‘𝐽))
48	41, 47	eqeltrrd 2866	1 ⊢ (𝜑 → 𝐴 ∈ (Clsd‘𝐽))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   ∧ w3a 1101   = wceq 1563   ∈ wcel 2145  Ⅎwnfc 2912  {crab 3417  ∪ cuni 4868   class class class wbr 5105  ^◡ccnv 5651  ran crn 5653   “ cima 5655   Fn wfn 6520  ⟶wf 6521  ‘cfv 6525  (class class class)co 7400  ℝcr 11087  -∞cmnf 11229  ℝ^*cxr 11230   < clt 11231   ≤ cle 11232  (,)cioo 13363  (,]cioc 13364  topGenctg 17480  Clsdccld 23134   Cn ccn 23342

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2737  ax-sep 5251  ax-nul 5261  ax-pow 5327  ax-pr 5395  ax-un 7722  ax-cnex 11144  ax-resscn 11145  ax-1cn 11146  ax-icn 11147  ax-addcl 11148  ax-addrcl 11149  ax-mulcl 11150  ax-mulrcl 11151  ax-mulcom 11152  ax-addass 11153  ax-mulass 11154  ax-distr 11155  ax-i2m1 11156  ax-1ne0 11157  ax-1rid 11158  ax-rnegex 11159  ax-rrecex 11160  ax-cnre 11161  ax-pre-lttri 11162  ax-pre-lttrn 11163  ax-pre-ltadd 11164  ax-pre-mulgt0 11165  ax-pre-sup 11166

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1566  df-fal 1576  df-ex 1803  df-nf 1807  df-sb 2094  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3370  df-reu 3371  df-rab 3418  df-v 3459  df-sbc 3748  df-csb 3856  df-dif 3910  df-un 3912  df-in 3914  df-ss 3924  df-pss 3927  df-nul 4289  df-if 4484  df-pw 4560  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4869  df-iun 4954  df-br 5106  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5547  df-eprel 5552  df-po 5560  df-so 5561  df-fr 5605  df-we 5607  df-xp 5658  df-rel 5659  df-cnv 5660  df-co 5661  df-dm 5662  df-rn 5663  df-res 5664  df-ima 5665  df-pred 6292  df-ord 6353  df-on 6354  df-lim 6355  df-suc 6356  df-iota 6481  df-fun 6527  df-fn 6528  df-f 6529  df-f1 6530  df-fo 6531  df-f1o 6532  df-fv 6533  df-riota 7357  df-ov 7403  df-oprab 7404  df-mpo 7405  df-om 7851  df-1st 7974  df-2nd 7975  df-frecs 8266  df-wrecs 8297  df-recs 8346  df-rdg 8385  df-er 8682  df-map 8814  df-en 8932  df-dom 8933  df-sdom 8934  df-sup 9390  df-inf 9391  df-pnf 11233  df-mnf 11234  df-xr 11235  df-ltxr 11236  df-le 11237  df-sub 11431  df-neg 11432  df-div 11860  df-nn 12225  df-n0 12496  df-z 12583  df-uz 12854  df-q 12964  df-ioo 13367  df-ioc 13368  df-topgen 17486  df-top 23012  df-topon 23029  df-bases 23064  df-cld 23137  df-cn 23345

This theorem is referenced by:  stoweidlem59  46631