Theorem smfresal 47603

Description: Given a sigma-measurable function, the subsets of ℝ whose preimage is in the sigma-algebra induced by the function's domain, form a sigma-algebra. First part of the proof of Proposition 121E (f) of [Fremlin1] p. 38 . (Contributed by Glauco Siliprandi, 26-Jun-2021.)

Hypotheses

Ref	Expression
smfresal.s	⊢ (𝜑 → 𝑆 ∈ SAlg)
smfresal.f	⊢ (𝜑 → 𝐹 ∈ (SMblFn‘𝑆))
smfresal.d	⊢ 𝐷 = dom 𝐹
smfresal.t	⊢ 𝑇 = {𝑒 ∈ 𝒫 ℝ ∣ (◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷)}

Assertion

Ref	Expression
smfresal	⊢ (𝜑 → 𝑇 ∈ SAlg)

Distinct variable groups:   𝐷,𝑒   𝑒,𝐹   𝑆,𝑒   𝜑,𝑒

Allowed substitution hint:   𝑇(𝑒)

Proof of Theorem smfresal

Dummy variables 𝑛 𝑥 𝑔 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		smfresal.t	. . . 4 ⊢ 𝑇 = {𝑒 ∈ 𝒫 ℝ ∣ (◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷)}
2		reex 11218	. . . . 5 ⊢ ℝ ∈ V
3	2	pwex 5349	. . . 4 ⊢ 𝒫 ℝ ∈ V
4	1, 3	rabex2 5309	. . 3 ⊢ 𝑇 ∈ V
5	4	a1i 11	. 2 ⊢ (𝜑 → 𝑇 ∈ V)
6		0elpw 5324	. . . . 5 ⊢ ∅ ∈ 𝒫 ℝ
7	6	a1i 11	. . . 4 ⊢ (𝜑 → ∅ ∈ 𝒫 ℝ)
8		ima0 6077	. . . . . 6 ⊢ (◡𝐹 “ ∅) = ∅
9	8	a1i 11	. . . . 5 ⊢ (𝜑 → (◡𝐹 “ ∅) = ∅)
10		smfresal.s	. . . . . . 7 ⊢ (𝜑 → 𝑆 ∈ SAlg)
11	10	uniexd 7747	. . . . . . . 8 ⊢ (𝜑 → ∪ 𝑆 ∈ V)
12		smfresal.f	. . . . . . . . 9 ⊢ (𝜑 → 𝐹 ∈ (SMblFn‘𝑆))
13		smfresal.d	. . . . . . . . 9 ⊢ 𝐷 = dom 𝐹
14	10, 12, 13	smfdmss 47548	. . . . . . . 8 ⊢ (𝜑 → 𝐷 ⊆ ∪ 𝑆)
15	11, 14	ssexd 5293	. . . . . . 7 ⊢ (𝜑 → 𝐷 ∈ V)
16		eqid 2762	. . . . . . 7 ⊢ (𝑆 ↾t 𝐷) = (𝑆 ↾t 𝐷)
17	10, 15, 16	subsalsal 47174	. . . . . 6 ⊢ (𝜑 → (𝑆 ↾t 𝐷) ∈ SAlg)
18	17	0sald 47165	. . . . 5 ⊢ (𝜑 → ∅ ∈ (𝑆 ↾t 𝐷))
19	9, 18	eqeltrd 2862	. . . 4 ⊢ (𝜑 → (◡𝐹 “ ∅) ∈ (𝑆 ↾t 𝐷))
20	7, 19	jca 521	. . 3 ⊢ (𝜑 → (∅ ∈ 𝒫 ℝ ∧ (◡𝐹 “ ∅) ∈ (𝑆 ↾t 𝐷)))
21		imaeq2 6056	. . . . 5 ⊢ (𝑒 = ∅ → (◡𝐹 “ 𝑒) = (◡𝐹 “ ∅))
22	21	eleq1d 2847	. . . 4 ⊢ (𝑒 = ∅ → ((◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷) ↔ (◡𝐹 “ ∅) ∈ (𝑆 ↾t 𝐷)))
23	22, 1	elrab2 3652	. . 3 ⊢ (∅ ∈ 𝑇 ↔ (∅ ∈ 𝒫 ℝ ∧ (◡𝐹 “ ∅) ∈ (𝑆 ↾t 𝐷)))
24	20, 23	sylibr 237	. 2 ⊢ (𝜑 → ∅ ∈ 𝑇)
25		eqid 2762	. 2 ⊢ ∪ 𝑇 = ∪ 𝑇
26		nfv 1947	. . . . . . 7 ⊢ Ⅎ𝑦𝜑
27		nfcv 2924	. . . . . . . . . . . 12 ⊢ Ⅎ𝑒𝑦
28		nfrab1 3434	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑒{𝑒 ∈ 𝒫 ℝ ∣ (◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷)}
29	1, 28	nfcxfr 2922	. . . . . . . . . . . 12 ⊢ Ⅎ𝑒𝑇
30	27, 29	eluni2f 45922	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ∪ 𝑇 ↔ ∃𝑒 ∈ 𝑇 𝑦 ∈ 𝑒)
31	30	bilani 510	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ∪ 𝑇) → ∃𝑒 ∈ 𝑇 𝑦 ∈ 𝑒)
32		nfv 1947	. . . . . . . . . . . 12 ⊢ Ⅎ𝑒𝜑
33	29	nfuni 4877	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑒∪ 𝑇
34	27, 33	nfel 2938	. . . . . . . . . . . 12 ⊢ Ⅎ𝑒 𝑦 ∈ ∪ 𝑇
35	32, 34	nfan 1932	. . . . . . . . . . 11 ⊢ Ⅎ𝑒(𝜑 ∧ 𝑦 ∈ ∪ 𝑇)
36	27	nfel1 2940	. . . . . . . . . . 11 ⊢ Ⅎ𝑒 𝑦 ∈ ℝ
37	1	eleq2i 2854	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑒 ∈ 𝑇 ↔ 𝑒 ∈ {𝑒 ∈ 𝒫 ℝ ∣ (◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷)})
38	37	biimpi 219	. . . . . . . . . . . . . . . . 17 ⊢ (𝑒 ∈ 𝑇 → 𝑒 ∈ {𝑒 ∈ 𝒫 ℝ ∣ (◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷)})
39		rabidim1 3436	. . . . . . . . . . . . . . . . 17 ⊢ (𝑒 ∈ {𝑒 ∈ 𝒫 ℝ ∣ (◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷)} → 𝑒 ∈ 𝒫 ℝ)
40	38, 39	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝑒 ∈ 𝑇 → 𝑒 ∈ 𝒫 ℝ)
41		elpwi 4567	. . . . . . . . . . . . . . . 16 ⊢ (𝑒 ∈ 𝒫 ℝ → 𝑒 ⊆ ℝ)
42	40, 41	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝑒 ∈ 𝑇 → 𝑒 ⊆ ℝ)
43	42	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝑒 ∈ 𝑇 ∧ 𝑦 ∈ 𝑒) → 𝑒 ⊆ ℝ)
44		simpr 490	. . . . . . . . . . . . . 14 ⊢ ((𝑒 ∈ 𝑇 ∧ 𝑦 ∈ 𝑒) → 𝑦 ∈ 𝑒)
45	43, 44	sseldd 3935	. . . . . . . . . . . . 13 ⊢ ((𝑒 ∈ 𝑇 ∧ 𝑦 ∈ 𝑒) → 𝑦 ∈ ℝ)
46	45	ex 418	. . . . . . . . . . . 12 ⊢ (𝑒 ∈ 𝑇 → (𝑦 ∈ 𝑒 → 𝑦 ∈ ℝ))
47	46	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ ∪ 𝑇) → (𝑒 ∈ 𝑇 → (𝑦 ∈ 𝑒 → 𝑦 ∈ ℝ)))
48	35, 36, 47	rexlimd 3271	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ∪ 𝑇) → (∃𝑒 ∈ 𝑇 𝑦 ∈ 𝑒 → 𝑦 ∈ ℝ))
49	31, 48	mpd 16	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ∪ 𝑇) → 𝑦 ∈ ℝ)
50	49	ex 418	. . . . . . . 8 ⊢ (𝜑 → (𝑦 ∈ ∪ 𝑇 → 𝑦 ∈ ℝ))
51		ovexd 7451	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑦 − 1)(,)(𝑦 + 1)) ∈ V)
52		ioossre 13462	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 − 1)(,)(𝑦 + 1)) ⊆ ℝ
53	52	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑦 − 1)(,)(𝑦 + 1)) ⊆ ℝ)
54	51, 53	elpwd 4566	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑦 − 1)(,)(𝑦 + 1)) ∈ 𝒫 ℝ)
55	54	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → ((𝑦 − 1)(,)(𝑦 + 1)) ∈ 𝒫 ℝ)
56	10, 12, 13	smff 47547	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝐹:𝐷⟶ℝ)
57	56	ffnd 6707	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐹 Fn 𝐷)
58		fncnvima2 7057	. . . . . . . . . . . . . . . 16 ⊢ (𝐹 Fn 𝐷 → (◡𝐹 “ ((𝑦 − 1)(,)(𝑦 + 1))) = {𝑥 ∈ 𝐷 ∣ (𝐹‘𝑥) ∈ ((𝑦 − 1)(,)(𝑦 + 1))})
59	57, 58	syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (◡𝐹 “ ((𝑦 − 1)(,)(𝑦 + 1))) = {𝑥 ∈ 𝐷 ∣ (𝐹‘𝑥) ∈ ((𝑦 − 1)(,)(𝑦 + 1))})
60	59	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (◡𝐹 “ ((𝑦 − 1)(,)(𝑦 + 1))) = {𝑥 ∈ 𝐷 ∣ (𝐹‘𝑥) ∈ ((𝑦 − 1)(,)(𝑦 + 1))})
61		nfv 1947	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑥(𝜑 ∧ 𝑦 ∈ ℝ)
62	10	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑆 ∈ SAlg)
63	15	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝐷 ∈ V)
64	56	adantr 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐷) → 𝐹:𝐷⟶ℝ)
65		simpr 490	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐷) → 𝑥 ∈ 𝐷)
66	64, 65	ffvelcdmd 7081	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐷) → (𝐹‘𝑥) ∈ ℝ)
67	66	adantlr 728	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐷) → (𝐹‘𝑥) ∈ ℝ)
68	56	feqmptd 6950	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ 𝐷 ↦ (𝐹‘𝑥)))
69	68	eqcomd 2768	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝑥 ∈ 𝐷 ↦ (𝐹‘𝑥)) = 𝐹)
70	69, 12	eqeltrd 2862	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑥 ∈ 𝐷 ↦ (𝐹‘𝑥)) ∈ (SMblFn‘𝑆))
71	70	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑥 ∈ 𝐷 ↦ (𝐹‘𝑥)) ∈ (SMblFn‘𝑆))
72		peano2rem 11552	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ → (𝑦 − 1) ∈ ℝ)
73	72	rexrd 11286	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ → (𝑦 − 1) ∈ ℝ*)
74	73	adantl 487	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 − 1) ∈ ℝ*)
75		peano2re 11410	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ → (𝑦 + 1) ∈ ℝ)
76	75	rexrd 11286	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ → (𝑦 + 1) ∈ ℝ*)
77	76	adantl 487	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 + 1) ∈ ℝ*)
78	61, 62, 63, 67, 71, 74, 77	smfpimioompt 47601	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → {𝑥 ∈ 𝐷 ∣ (𝐹‘𝑥) ∈ ((𝑦 − 1)(,)(𝑦 + 1))} ∈ (𝑆 ↾t 𝐷))
79	60, 78	eqeltrd 2862	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (◡𝐹 “ ((𝑦 − 1)(,)(𝑦 + 1))) ∈ (𝑆 ↾t 𝐷))
80	55, 79	jca 521	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (((𝑦 − 1)(,)(𝑦 + 1)) ∈ 𝒫 ℝ ∧ (◡𝐹 “ ((𝑦 − 1)(,)(𝑦 + 1))) ∈ (𝑆 ↾t 𝐷)))
81		imaeq2 6056	. . . . . . . . . . . . . 14 ⊢ (𝑒 = ((𝑦 − 1)(,)(𝑦 + 1)) → (◡𝐹 “ 𝑒) = (◡𝐹 “ ((𝑦 − 1)(,)(𝑦 + 1))))
82	81	eleq1d 2847	. . . . . . . . . . . . 13 ⊢ (𝑒 = ((𝑦 − 1)(,)(𝑦 + 1)) → ((◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷) ↔ (◡𝐹 “ ((𝑦 − 1)(,)(𝑦 + 1))) ∈ (𝑆 ↾t 𝐷)))
83	82, 1	elrab2 3652	. . . . . . . . . . . 12 ⊢ (((𝑦 − 1)(,)(𝑦 + 1)) ∈ 𝑇 ↔ (((𝑦 − 1)(,)(𝑦 + 1)) ∈ 𝒫 ℝ ∧ (◡𝐹 “ ((𝑦 − 1)(,)(𝑦 + 1))) ∈ (𝑆 ↾t 𝐷)))
84	80, 83	sylibr 237	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → ((𝑦 − 1)(,)(𝑦 + 1)) ∈ 𝑇)
85		id 23	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ℝ)
86		ltm1 12084	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℝ → (𝑦 − 1) < 𝑦)
87		ltp1 12082	. . . . . . . . . . . . 13 ⊢ (𝑦 ∈ ℝ → 𝑦 < (𝑦 + 1))
88	73, 76, 85, 86, 87	eliood 46315	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ((𝑦 − 1)(,)(𝑦 + 1)))
89	88	adantl 487	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ((𝑦 − 1)(,)(𝑦 + 1)))
90		nfv 1947	. . . . . . . . . . . 12 ⊢ Ⅎ𝑒 𝑦 ∈ ((𝑦 − 1)(,)(𝑦 + 1))
91		nfcv 2924	. . . . . . . . . . . 12 ⊢ Ⅎ𝑒((𝑦 − 1)(,)(𝑦 + 1))
92		eleq2 2851	. . . . . . . . . . . 12 ⊢ (𝑒 = ((𝑦 − 1)(,)(𝑦 + 1)) → (𝑦 ∈ 𝑒 ↔ 𝑦 ∈ ((𝑦 − 1)(,)(𝑦 + 1))))
93	90, 91, 29, 92	rspcef 45893	. . . . . . . . . . 11 ⊢ ((((𝑦 − 1)(,)(𝑦 + 1)) ∈ 𝑇 ∧ 𝑦 ∈ ((𝑦 − 1)(,)(𝑦 + 1))) → ∃𝑒 ∈ 𝑇 𝑦 ∈ 𝑒)
94	84, 89, 93	syl2anc 596	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → ∃𝑒 ∈ 𝑇 𝑦 ∈ 𝑒)
95	94, 30	sylibr 237	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ∪ 𝑇)
96	95	ex 418	. . . . . . . 8 ⊢ (𝜑 → (𝑦 ∈ ℝ → 𝑦 ∈ ∪ 𝑇))
97	50, 96	impbid 215	. . . . . . 7 ⊢ (𝜑 → (𝑦 ∈ ∪ 𝑇 ↔ 𝑦 ∈ ℝ))
98	26, 97	alrimi 2251	. . . . . 6 ⊢ (𝜑 → ∀𝑦(𝑦 ∈ ∪ 𝑇 ↔ 𝑦 ∈ ℝ))
99		dfcleq 2755	. . . . . 6 ⊢ (∪ 𝑇 = ℝ ↔ ∀𝑦(𝑦 ∈ ∪ 𝑇 ↔ 𝑦 ∈ ℝ))
100	98, 99	sylibr 237	. . . . 5 ⊢ (𝜑 → ∪ 𝑇 = ℝ)
101	100	difeq1d 4076	. . . 4 ⊢ (𝜑 → (∪ 𝑇 ∖ 𝑥) = (ℝ ∖ 𝑥))
102	101	adantr 486	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → (∪ 𝑇 ∖ 𝑥) = (ℝ ∖ 𝑥))
103		difss 4086	. . . . . . 7 ⊢ (ℝ ∖ 𝑥) ⊆ ℝ
104	2, 103	ssexi 5291	. . . . . . . 8 ⊢ (ℝ ∖ 𝑥) ∈ V
105		elpwg 4563	. . . . . . . 8 ⊢ ((ℝ ∖ 𝑥) ∈ V → ((ℝ ∖ 𝑥) ∈ 𝒫 ℝ ↔ (ℝ ∖ 𝑥) ⊆ ℝ))
106	104, 105	ax-mp 5	. . . . . . 7 ⊢ ((ℝ ∖ 𝑥) ∈ 𝒫 ℝ ↔ (ℝ ∖ 𝑥) ⊆ ℝ)
107	103, 106	mpbir 234	. . . . . 6 ⊢ (ℝ ∖ 𝑥) ∈ 𝒫 ℝ
108	107	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → (ℝ ∖ 𝑥) ∈ 𝒫 ℝ)
109	56	ffund 6711	. . . . . . . . 9 ⊢ (𝜑 → Fun 𝐹)
110		difpreima 7061	. . . . . . . . 9 ⊢ (Fun 𝐹 → (◡𝐹 “ (ℝ ∖ 𝑥)) = ((◡𝐹 “ ℝ) ∖ (◡𝐹 “ 𝑥)))
111	109, 110	syl 18	. . . . . . . 8 ⊢ (𝜑 → (◡𝐹 “ (ℝ ∖ 𝑥)) = ((◡𝐹 “ ℝ) ∖ (◡𝐹 “ 𝑥)))
112		fimacnv 6729	. . . . . . . . . . 11 ⊢ (𝐹:𝐷⟶ℝ → (◡𝐹 “ ℝ) = 𝐷)
113	56, 112	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → (◡𝐹 “ ℝ) = 𝐷)
114	10, 14	restuni4 45940	. . . . . . . . . 10 ⊢ (𝜑 → ∪ (𝑆 ↾t 𝐷) = 𝐷)
115	113, 114	eqtr4d 2800	. . . . . . . . 9 ⊢ (𝜑 → (◡𝐹 “ ℝ) = ∪ (𝑆 ↾t 𝐷))
116	115	difeq1d 4076	. . . . . . . 8 ⊢ (𝜑 → ((◡𝐹 “ ℝ) ∖ (◡𝐹 “ 𝑥)) = (∪ (𝑆 ↾t 𝐷) ∖ (◡𝐹 “ 𝑥)))
117	111, 116	eqtrd 2797	. . . . . . 7 ⊢ (𝜑 → (◡𝐹 “ (ℝ ∖ 𝑥)) = (∪ (𝑆 ↾t 𝐷) ∖ (◡𝐹 “ 𝑥)))
118	117	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → (◡𝐹 “ (ℝ ∖ 𝑥)) = (∪ (𝑆 ↾t 𝐷) ∖ (◡𝐹 “ 𝑥)))
119	17	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → (𝑆 ↾t 𝐷) ∈ SAlg)
120		imaeq2 6056	. . . . . . . . . . . 12 ⊢ (𝑒 = 𝑥 → (◡𝐹 “ 𝑒) = (◡𝐹 “ 𝑥))
121	120	eleq1d 2847	. . . . . . . . . . 11 ⊢ (𝑒 = 𝑥 → ((◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷) ↔ (◡𝐹 “ 𝑥) ∈ (𝑆 ↾t 𝐷)))
122	121, 1	elrab2 3652	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝑇 ↔ (𝑥 ∈ 𝒫 ℝ ∧ (◡𝐹 “ 𝑥) ∈ (𝑆 ↾t 𝐷)))
123	122	biimpi 219	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑇 → (𝑥 ∈ 𝒫 ℝ ∧ (◡𝐹 “ 𝑥) ∈ (𝑆 ↾t 𝐷)))
124	123	simprd 501	. . . . . . . 8 ⊢ (𝑥 ∈ 𝑇 → (◡𝐹 “ 𝑥) ∈ (𝑆 ↾t 𝐷))
125	124	adantl 487	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → (◡𝐹 “ 𝑥) ∈ (𝑆 ↾t 𝐷))
126	119, 125	saldifcld 47162	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → (∪ (𝑆 ↾t 𝐷) ∖ (◡𝐹 “ 𝑥)) ∈ (𝑆 ↾t 𝐷))
127	118, 126	eqeltrd 2862	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → (◡𝐹 “ (ℝ ∖ 𝑥)) ∈ (𝑆 ↾t 𝐷))
128	108, 127	jca 521	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → ((ℝ ∖ 𝑥) ∈ 𝒫 ℝ ∧ (◡𝐹 “ (ℝ ∖ 𝑥)) ∈ (𝑆 ↾t 𝐷)))
129		imaeq2 6056	. . . . . 6 ⊢ (𝑒 = (ℝ ∖ 𝑥) → (◡𝐹 “ 𝑒) = (◡𝐹 “ (ℝ ∖ 𝑥)))
130	129	eleq1d 2847	. . . . 5 ⊢ (𝑒 = (ℝ ∖ 𝑥) → ((◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷) ↔ (◡𝐹 “ (ℝ ∖ 𝑥)) ∈ (𝑆 ↾t 𝐷)))
131	130, 1	elrab2 3652	. . . 4 ⊢ ((ℝ ∖ 𝑥) ∈ 𝑇 ↔ ((ℝ ∖ 𝑥) ∈ 𝒫 ℝ ∧ (◡𝐹 “ (ℝ ∖ 𝑥)) ∈ (𝑆 ↾t 𝐷)))
132	128, 131	sylibr 237	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → (ℝ ∖ 𝑥) ∈ 𝑇)
133	102, 132	eqeltrd 2862	. 2 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑇) → (∪ 𝑇 ∖ 𝑥) ∈ 𝑇)
134		nnex 12266	. . . . . . . 8 ⊢ ℕ ∈ V
135		fvex 6895	. . . . . . . 8 ⊢ (𝑔‘𝑛) ∈ V
136	134, 135	iunex 7968	. . . . . . 7 ⊢ ∪ 𝑛 ∈ ℕ (𝑔‘𝑛) ∈ V
137	136	a1i 11	. . . . . 6 ⊢ (𝑔:ℕ⟶𝑇 → ∪ 𝑛 ∈ ℕ (𝑔‘𝑛) ∈ V)
138		ffvelcdm 7077	. . . . . . . 8 ⊢ ((𝑔:ℕ⟶𝑇 ∧ 𝑛 ∈ ℕ) → (𝑔‘𝑛) ∈ 𝑇)
139	1	eleq2i 2854	. . . . . . . . 9 ⊢ ((𝑔‘𝑛) ∈ 𝑇 ↔ (𝑔‘𝑛) ∈ {𝑒 ∈ 𝒫 ℝ ∣ (◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷)})
140	139	biimpi 219	. . . . . . . 8 ⊢ ((𝑔‘𝑛) ∈ 𝑇 → (𝑔‘𝑛) ∈ {𝑒 ∈ 𝒫 ℝ ∣ (◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷)})
141		elrabi 3644	. . . . . . . 8 ⊢ ((𝑔‘𝑛) ∈ {𝑒 ∈ 𝒫 ℝ ∣ (◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷)} → (𝑔‘𝑛) ∈ 𝒫 ℝ)
142		elpwi 4567	. . . . . . . 8 ⊢ ((𝑔‘𝑛) ∈ 𝒫 ℝ → (𝑔‘𝑛) ⊆ ℝ)
143	138, 140, 141, 142	4syl 20	. . . . . . 7 ⊢ ((𝑔:ℕ⟶𝑇 ∧ 𝑛 ∈ ℕ) → (𝑔‘𝑛) ⊆ ℝ)
144	143	iunssd 5013	. . . . . 6 ⊢ (𝑔:ℕ⟶𝑇 → ∪ 𝑛 ∈ ℕ (𝑔‘𝑛) ⊆ ℝ)
145	137, 144	elpwd 4566	. . . . 5 ⊢ (𝑔:ℕ⟶𝑇 → ∪ 𝑛 ∈ ℕ (𝑔‘𝑛) ∈ 𝒫 ℝ)
146	145	adantl 487	. . . 4 ⊢ ((𝜑 ∧ 𝑔:ℕ⟶𝑇) → ∪ 𝑛 ∈ ℕ (𝑔‘𝑛) ∈ 𝒫 ℝ)
147		imaiun 7245	. . . . . 6 ⊢ (◡𝐹 “ ∪ 𝑛 ∈ ℕ (𝑔‘𝑛)) = ∪ 𝑛 ∈ ℕ (◡𝐹 “ (𝑔‘𝑛))
148	147	a1i 11	. . . . 5 ⊢ ((𝜑 ∧ 𝑔:ℕ⟶𝑇) → (◡𝐹 “ ∪ 𝑛 ∈ ℕ (𝑔‘𝑛)) = ∪ 𝑛 ∈ ℕ (◡𝐹 “ (𝑔‘𝑛)))
149	17	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔:ℕ⟶𝑇) → (𝑆 ↾t 𝐷) ∈ SAlg)
150		nnct 14047	. . . . . . 7 ⊢ ℕ ≼ ω
151	150	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑔:ℕ⟶𝑇) → ℕ ≼ ω)
152		imaeq2 6056	. . . . . . . . . . . 12 ⊢ (𝑒 = (𝑔‘𝑛) → (◡𝐹 “ 𝑒) = (◡𝐹 “ (𝑔‘𝑛)))
153	152	eleq1d 2847	. . . . . . . . . . 11 ⊢ (𝑒 = (𝑔‘𝑛) → ((◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷) ↔ (◡𝐹 “ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷)))
154	153, 1	elrab2 3652	. . . . . . . . . 10 ⊢ ((𝑔‘𝑛) ∈ 𝑇 ↔ ((𝑔‘𝑛) ∈ 𝒫 ℝ ∧ (◡𝐹 “ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷)))
155	154	biimpi 219	. . . . . . . . 9 ⊢ ((𝑔‘𝑛) ∈ 𝑇 → ((𝑔‘𝑛) ∈ 𝒫 ℝ ∧ (◡𝐹 “ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷)))
156	155	simprd 501	. . . . . . . 8 ⊢ ((𝑔‘𝑛) ∈ 𝑇 → (◡𝐹 “ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷))
157	138, 156	syl 18	. . . . . . 7 ⊢ ((𝑔:ℕ⟶𝑇 ∧ 𝑛 ∈ ℕ) → (◡𝐹 “ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷))
158	157	adantll 727	. . . . . 6 ⊢ (((𝜑 ∧ 𝑔:ℕ⟶𝑇) ∧ 𝑛 ∈ ℕ) → (◡𝐹 “ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷))
159	149, 151, 158	saliuncl 47138	. . . . 5 ⊢ ((𝜑 ∧ 𝑔:ℕ⟶𝑇) → ∪ 𝑛 ∈ ℕ (◡𝐹 “ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷))
160	148, 159	eqeltrd 2862	. . . 4 ⊢ ((𝜑 ∧ 𝑔:ℕ⟶𝑇) → (◡𝐹 “ ∪ 𝑛 ∈ ℕ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷))
161	146, 160	jca 521	. . 3 ⊢ ((𝜑 ∧ 𝑔:ℕ⟶𝑇) → (∪ 𝑛 ∈ ℕ (𝑔‘𝑛) ∈ 𝒫 ℝ ∧ (◡𝐹 “ ∪ 𝑛 ∈ ℕ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷)))
162		imaeq2 6056	. . . . 5 ⊢ (𝑒 = ∪ 𝑛 ∈ ℕ (𝑔‘𝑛) → (◡𝐹 “ 𝑒) = (◡𝐹 “ ∪ 𝑛 ∈ ℕ (𝑔‘𝑛)))
163	162	eleq1d 2847	. . . 4 ⊢ (𝑒 = ∪ 𝑛 ∈ ℕ (𝑔‘𝑛) → ((◡𝐹 “ 𝑒) ∈ (𝑆 ↾t 𝐷) ↔ (◡𝐹 “ ∪ 𝑛 ∈ ℕ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷)))
164	163, 1	elrab2 3652	. . 3 ⊢ (∪ 𝑛 ∈ ℕ (𝑔‘𝑛) ∈ 𝑇 ↔ (∪ 𝑛 ∈ ℕ (𝑔‘𝑛) ∈ 𝒫 ℝ ∧ (◡𝐹 “ ∪ 𝑛 ∈ ℕ (𝑔‘𝑛)) ∈ (𝑆 ↾t 𝐷)))
165	161, 164	sylibr 237	. 2 ⊢ ((𝜑 ∧ 𝑔:ℕ⟶𝑇) → ∪ 𝑛 ∈ ℕ (𝑔‘𝑛) ∈ 𝑇)
166	5, 24, 25, 133, 165	issalnnd 47160	1 ⊢ (𝜑 → 𝑇 ∈ SAlg)

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401  ∀wal 1568   = wceq 1570   ∈ wcel 2145  ∃wrex 3088  {crab 3414  Vcvv 3453   ∖ cdif 3899   ⊆ wss 3902  ∅c0 4282  𝒫 cpw 4560  ∪ cuni 4870  ∪ ciun 4954   class class class wbr 5107   ↦ cmpt 5190  ^◡ccnv 5658  dom cdm 5659   “ cima 5662  Fun wfun 6531   Fn wfn 6532  ⟶wf 6533  ‘cfv 6537  (class class class)co 7416  ωcom 7865   ≼ cdom 8953  ℝcr 11126  1c1 11128   + caddc 11130  ℝ^*cxr 11269   − cmin 11468  ℕcn 12260  (,)cioo 13400   ↾_t crest 17509  SAlgcsalg 47123  SMblFncsmblfn 47510

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pow 5334  ax-pr 5402  ax-un 7739  ax-inf2 9623  ax-cc 10440  ax-ac2 10468  ax-cnex 11183  ax-resscn 11184  ax-1cn 11185  ax-icn 11186  ax-addcl 11187  ax-addrcl 11188  ax-mulcl 11189  ax-mulrcl 11190  ax-mulcom 11191  ax-addass 11192  ax-mulass 11193  ax-distr 11194  ax-i2m1 11195  ax-1ne0 11196  ax-1rid 11197  ax-rnegex 11198  ax-rrecex 11199  ax-cnre 11200  ax-pre-lttri 11201  ax-pre-lttrn 11202  ax-pre-ltadd 11203  ax-pre-mulgt0 11204  ax-pre-sup 11205

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-nel 3064  df-ral 3079  df-rex 3089  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4871  df-int 4911  df-iun 4956  df-iin 4957  df-br 5108  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-se 5613  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7373  df-ov 7419  df-oprab 7420  df-mpo 7421  df-om 7866  df-1st 7989  df-2nd 7990  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-1o 8458  df-2o 8459  df-er 8699  df-map 8831  df-pm 8832  df-en 8956  df-dom 8957  df-sdom 8958  df-fin 8959  df-sup 9415  df-inf 9416  df-card 9947  df-acn 9950  df-ac 10122  df-pnf 11272  df-mnf 11273  df-xr 11274  df-ltxr 11275  df-le 11276  df-sub 11470  df-neg 11471  df-div 11899  df-nn 12261  df-n0 12532  df-z 12619  df-uz 12891  df-q 13001  df-rp 13045  df-ioo 13404  df-ico 13406  df-fl 13855  df-rest 17511  df-salg 47124  df-smblfn 47511

This theorem is used by:  smfpimbor1lem1  47613  smfpimbor1lem2  47614