Metamath Proof Explorer


Theorem sssmf

Description: The restriction of a sigma-measurable function, is sigma-measurable. (Contributed by Glauco Siliprandi, 26-Jun-2021)

Ref Expression
Hypotheses sssmf.s ⊢ φ → S ∈ SAlg
sssmf.f ⊢ φ → F ∈ SMblFn ⁡ S
Assertion sssmf ⊢ φ → F ↾ B ∈ SMblFn ⁡ S

Proof

Step Hyp Ref Expression
1 sssmf.s ⊢ φ → S ∈ SAlg
2 sssmf.f ⊢ φ → F ∈ SMblFn ⁡ S
3 nfv ⊢ Ⅎ a φ
4 inss2 ⊢ B ∩ dom ⁡ F ⊆ dom ⁡ F
5 eqid ⊢ dom ⁡ F = dom ⁡ F
6 1 2 5 smfdmss ⊢ φ → dom ⁡ F ⊆ ⋃ S
7 4 6 sstrid ⊢ φ → B ∩ dom ⁡ F ⊆ ⋃ S
8 resindm ⊢ F ↾ B ∩ dom ⁡ F = F ↾ B
9 8 a1i ⊢ φ → F ↾ B ∩ dom ⁡ F = F ↾ B
10 1 2 5 smff ⊢ φ → F : dom ⁡ F ⟶ ℝ
11 4 a1i ⊢ φ → B ∩ dom ⁡ F ⊆ dom ⁡ F
12 10 11 fssresd ⊢ φ → F ↾ B ∩ dom ⁡ F : B ∩ dom ⁡ F ⟶ ℝ
13 9 12 feq1dd ⊢ φ → F ↾ B : B ∩ dom ⁡ F ⟶ ℝ
14 1 adantr ⊢ φ ∧ a ∈ ℝ → S ∈ SAlg
15 2 adantr ⊢ φ ∧ a ∈ ℝ → F ∈ SMblFn ⁡ S
16 simpr ⊢ φ ∧ a ∈ ℝ → a ∈ ℝ
17 14 15 5 16 smfpreimalt ⊢ φ ∧ a ∈ ℝ → x ∈ dom ⁡ F | F ⁡ x < a ∈ S ↾ 𝑡 dom ⁡ F
18 2 dmexd ⊢ φ → dom ⁡ F ∈ V
19 elrest ⊢ S ∈ SAlg ∧ dom ⁡ F ∈ V → x ∈ dom ⁡ F | F ⁡ x < a ∈ S ↾ 𝑡 dom ⁡ F ↔ ∃ w ∈ S x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F
20 1 18 19 syl2anc ⊢ φ → x ∈ dom ⁡ F | F ⁡ x < a ∈ S ↾ 𝑡 dom ⁡ F ↔ ∃ w ∈ S x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F
21 20 adantr ⊢ φ ∧ a ∈ ℝ → x ∈ dom ⁡ F | F ⁡ x < a ∈ S ↾ 𝑡 dom ⁡ F ↔ ∃ w ∈ S x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F
22 17 21 mpbid ⊢ φ ∧ a ∈ ℝ → ∃ w ∈ S x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F
23 elinel1 ⊢ x ∈ B ∩ dom ⁡ F → x ∈ B
24 23 fvresd ⊢ x ∈ B ∩ dom ⁡ F → F ↾ B ⁡ x = F ⁡ x
25 24 breq1d ⊢ x ∈ B ∩ dom ⁡ F → F ↾ B ⁡ x < a ↔ F ⁡ x < a
26 25 rabbiia ⊢ x ∈ B ∩ dom ⁡ F | F ↾ B ⁡ x < a = x ∈ B ∩ dom ⁡ F | F ⁡ x < a
27 rabss2 ⊢ B ∩ dom ⁡ F ⊆ dom ⁡ F → x ∈ B ∩ dom ⁡ F | F ⁡ x < a ⊆ x ∈ dom ⁡ F | F ⁡ x < a
28 4 27 ax-mp ⊢ x ∈ B ∩ dom ⁡ F | F ⁡ x < a ⊆ x ∈ dom ⁡ F | F ⁡ x < a
29 id ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F
30 inss1 ⊢ w ∩ dom ⁡ F ⊆ w
31 29 30 eqsstrdi ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ dom ⁡ F | F ⁡ x < a ⊆ w
32 28 31 sstrid ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F | F ⁡ x < a ⊆ w
33 ssrab2 ⊢ x ∈ B ∩ dom ⁡ F | F ⁡ x < a ⊆ B ∩ dom ⁡ F
34 33 a1i ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F | F ⁡ x < a ⊆ B ∩ dom ⁡ F
35 32 34 ssind ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F | F ⁡ x < a ⊆ w ∩ B ∩ dom ⁡ F
36 nfrab1 ⊢ Ⅎ _ x x ∈ dom ⁡ F | F ⁡ x < a
37 36 nfeq1 ⊢ Ⅎ x x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F
38 nfcv ⊢ Ⅎ _ x w ∩ B ∩ dom ⁡ F
39 nfrab1 ⊢ Ⅎ _ x x ∈ B ∩ dom ⁡ F | F ⁡ x < a
40 elinel2 ⊢ x ∈ w ∩ B ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F
41 40 adantl ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F ∧ x ∈ w ∩ B ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F
42 elinel1 ⊢ x ∈ w ∩ B ∩ dom ⁡ F → x ∈ w
43 40 elin2d ⊢ x ∈ w ∩ B ∩ dom ⁡ F → x ∈ dom ⁡ F
44 42 43 elind ⊢ x ∈ w ∩ B ∩ dom ⁡ F → x ∈ w ∩ dom ⁡ F
45 44 adantl ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F ∧ x ∈ w ∩ B ∩ dom ⁡ F → x ∈ w ∩ dom ⁡ F
46 29 eqcomd ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → w ∩ dom ⁡ F = x ∈ dom ⁡ F | F ⁡ x < a
47 46 adantr ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F ∧ x ∈ w ∩ B ∩ dom ⁡ F → w ∩ dom ⁡ F = x ∈ dom ⁡ F | F ⁡ x < a
48 45 47 eleqtrd ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F ∧ x ∈ w ∩ B ∩ dom ⁡ F → x ∈ x ∈ dom ⁡ F | F ⁡ x < a
49 rabidim2 ⊢ x ∈ x ∈ dom ⁡ F | F ⁡ x < a → F ⁡ x < a
50 48 49 syl ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F ∧ x ∈ w ∩ B ∩ dom ⁡ F → F ⁡ x < a
51 41 50 rabidd ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F ∧ x ∈ w ∩ B ∩ dom ⁡ F → x ∈ x ∈ B ∩ dom ⁡ F | F ⁡ x < a
52 37 38 39 51 ssdf2 ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → w ∩ B ∩ dom ⁡ F ⊆ x ∈ B ∩ dom ⁡ F | F ⁡ x < a
53 35 52 eqssd ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F | F ⁡ x < a = w ∩ B ∩ dom ⁡ F
54 26 53 eqtrid ⊢ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F | F ↾ B ⁡ x < a = w ∩ B ∩ dom ⁡ F
55 54 3ad2ant3 ⊢ φ ∧ a ∈ ℝ ∧ w ∈ S ∧ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F | F ↾ B ⁡ x < a = w ∩ B ∩ dom ⁡ F
56 14 3ad2ant1 ⊢ φ ∧ a ∈ ℝ ∧ w ∈ S ∧ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → S ∈ SAlg
57 simp1l ⊢ φ ∧ a ∈ ℝ ∧ w ∈ S ∧ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → φ
58 18 11 ssexd ⊢ φ → B ∩ dom ⁡ F ∈ V
59 57 58 syl ⊢ φ ∧ a ∈ ℝ ∧ w ∈ S ∧ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → B ∩ dom ⁡ F ∈ V
60 simp2 ⊢ φ ∧ a ∈ ℝ ∧ w ∈ S ∧ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → w ∈ S
61 eqid ⊢ w ∩ B ∩ dom ⁡ F = w ∩ B ∩ dom ⁡ F
62 56 59 60 61 elrestd ⊢ φ ∧ a ∈ ℝ ∧ w ∈ S ∧ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → w ∩ B ∩ dom ⁡ F ∈ S ↾ 𝑡 B ∩ dom ⁡ F
63 55 62 eqeltrd ⊢ φ ∧ a ∈ ℝ ∧ w ∈ S ∧ x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F | F ↾ B ⁡ x < a ∈ S ↾ 𝑡 B ∩ dom ⁡ F
64 63 rexlimdv3a ⊢ φ ∧ a ∈ ℝ → ∃ w ∈ S x ∈ dom ⁡ F | F ⁡ x < a = w ∩ dom ⁡ F → x ∈ B ∩ dom ⁡ F | F ↾ B ⁡ x < a ∈ S ↾ 𝑡 B ∩ dom ⁡ F
65 22 64 mpd ⊢ φ ∧ a ∈ ℝ → x ∈ B ∩ dom ⁡ F | F ↾ B ⁡ x < a ∈ S ↾ 𝑡 B ∩ dom ⁡ F
66 3 1 7 13 65 issmfd ⊢ φ → F ↾ B ∈ SMblFn ⁡ S