Metamath Proof Explorer


Theorem ovolval4lem2

Description: The value of the Lebesgue outer measure for subsets of the reals. Similar to ovolval3 , but here f is may represent unordered interval bounds. (Contributed by Glauco Siliprandi, 3-Mar-2021)

Ref Expression
Hypotheses ovolval4lem2.a ⊢ φ → A ⊆ ℝ
ovolval4lem2.m ⊢ M = y ∈ ℝ * | ∃ f ∈ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f
ovolval4lem2.g ⊢ G = n ∈ ℕ ⟼ 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n
Assertion ovolval4lem2 ⊢ φ → vol * ⁡ A = inf M ℝ * <

Proof

Step Hyp Ref Expression
1 ovolval4lem2.a ⊢ φ → A ⊆ ℝ
2 ovolval4lem2.m ⊢ M = y ∈ ℝ * | ∃ f ∈ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f
3 ovolval4lem2.g ⊢ G = n ∈ ℕ ⟼ 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n
4 iftrue ⊢ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n = 2 nd ⁡ f ⁡ n
5 4 opeq2d ⊢ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n = 1 st ⁡ f ⁡ n 2 nd ⁡ f ⁡ n
6 5 adantl ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ ∧ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n = 1 st ⁡ f ⁡ n 2 nd ⁡ f ⁡ n
7 df-br ⊢ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n ↔ 1 st ⁡ f ⁡ n 2 nd ⁡ f ⁡ n ∈ ≤
8 7 bilani ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ ∧ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → 1 st ⁡ f ⁡ n 2 nd ⁡ f ⁡ n ∈ ≤
9 6 8 eqeltrd ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ ∧ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ≤
10 iffalse ⊢ ¬ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n = 1 st ⁡ f ⁡ n
11 10 opeq2d ⊢ ¬ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n = 1 st ⁡ f ⁡ n 1 st ⁡ f ⁡ n
12 11 adantl ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ ∧ ¬ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n = 1 st ⁡ f ⁡ n 1 st ⁡ f ⁡ n
13 elmapi ⊢ f ∈ ℝ 2 ℕ → f : ℕ ⟶ ℝ 2
14 13 ffvelcdmda ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ → f ⁡ n ∈ ℝ 2
15 xp1st ⊢ f ⁡ n ∈ ℝ 2 → 1 st ⁡ f ⁡ n ∈ ℝ
16 14 15 syl ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ → 1 st ⁡ f ⁡ n ∈ ℝ
17 16 leidd ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ → 1 st ⁡ f ⁡ n ≤ 1 st ⁡ f ⁡ n
18 df-br ⊢ 1 st ⁡ f ⁡ n ≤ 1 st ⁡ f ⁡ n ↔ 1 st ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ≤
19 17 18 sylib ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ → 1 st ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ≤
20 19 adantr ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ ∧ ¬ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → 1 st ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ≤
21 12 20 eqeltrd ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ ∧ ¬ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ≤
22 9 21 pm2.61dan ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ≤
23 xp2nd ⊢ f ⁡ n ∈ ℝ 2 → 2 nd ⁡ f ⁡ n ∈ ℝ
24 14 23 syl ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ → 2 nd ⁡ f ⁡ n ∈ ℝ
25 24 16 ifcld ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ → if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ℝ
26 opelxpi ⊢ 1 st ⁡ f ⁡ n ∈ ℝ ∧ if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ℝ → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ℝ 2
27 16 25 26 syl2anc ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ℝ 2
28 22 27 elind ⊢ f ∈ ℝ 2 ℕ ∧ n ∈ ℕ → 1 st ⁡ f ⁡ n if 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n 2 nd ⁡ f ⁡ n 1 st ⁡ f ⁡ n ∈ ≤ ∩ ℝ 2
29 28 3 fmptd ⊢ f ∈ ℝ 2 ℕ → G : ℕ ⟶ ≤ ∩ ℝ 2
30 reex ⊢ ℝ ∈ V
31 30 30 xpex ⊢ ℝ 2 ∈ V
32 31 inex2 ⊢ ≤ ∩ ℝ 2 ∈ V
33 32 a1i ⊢ f ∈ ℝ 2 ℕ → ≤ ∩ ℝ 2 ∈ V
34 nnex ⊢ ℕ ∈ V
35 34 a1i ⊢ f ∈ ℝ 2 ℕ → ℕ ∈ V
36 33 35 elmapd ⊢ f ∈ ℝ 2 ℕ → G ∈ ≤ ∩ ℝ 2 ℕ ↔ G : ℕ ⟶ ≤ ∩ ℝ 2
37 29 36 mpbird ⊢ f ∈ ℝ 2 ℕ → G ∈ ≤ ∩ ℝ 2 ℕ
38 37 adantr ⊢ f ∈ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f → G ∈ ≤ ∩ ℝ 2 ℕ
39 simpr ⊢ f ∈ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ f → A ⊆ ⋃ ran ⁡ . ∘ f
40 rexpssxrxp ⊢ ℝ 2 ⊆ ℝ * × ℝ *
41 40 a1i ⊢ f ∈ ℝ 2 ℕ → ℝ 2 ⊆ ℝ * × ℝ *
42 13 41 fssd ⊢ f ∈ ℝ 2 ℕ → f : ℕ ⟶ ℝ * × ℝ *
43 2fveq3 ⊢ k = n → 1 st ⁡ f ⁡ k = 1 st ⁡ f ⁡ n
44 2fveq3 ⊢ k = n → 2 nd ⁡ f ⁡ k = 2 nd ⁡ f ⁡ n
45 43 44 breq12d ⊢ k = n → 1 st ⁡ f ⁡ k ≤ 2 nd ⁡ f ⁡ k ↔ 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n
46 45 cbvrabv ⊢ k ∈ ℕ | 1 st ⁡ f ⁡ k ≤ 2 nd ⁡ f ⁡ k = n ∈ ℕ | 1 st ⁡ f ⁡ n ≤ 2 nd ⁡ f ⁡ n
47 42 3 46 ovolval4lem1 ⊢ f ∈ ℝ 2 ℕ → ⋃ ran ⁡ . ∘ f = ⋃ ran ⁡ . ∘ G ∧ vol ∘ . ∘ f = vol ∘ . ∘ G
48 47 simpld ⊢ f ∈ ℝ 2 ℕ → ⋃ ran ⁡ . ∘ f = ⋃ ran ⁡ . ∘ G
49 48 adantr ⊢ f ∈ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ f → ⋃ ran ⁡ . ∘ f = ⋃ ran ⁡ . ∘ G
50 39 49 sseqtrd ⊢ f ∈ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ f → A ⊆ ⋃ ran ⁡ . ∘ G
51 50 adantrr ⊢ f ∈ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f → A ⊆ ⋃ ran ⁡ . ∘ G
52 simpr ⊢ f ∈ ℝ 2 ℕ ∧ y = sum^ ⁡ vol ∘ . ∘ f → y = sum^ ⁡ vol ∘ . ∘ f
53 47 simprd ⊢ f ∈ ℝ 2 ℕ → vol ∘ . ∘ f = vol ∘ . ∘ G
54 coass ⊢ vol ∘ . ∘ f = vol ∘ . ∘ f
55 54 a1i ⊢ f ∈ ℝ 2 ℕ → vol ∘ . ∘ f = vol ∘ . ∘ f
56 coass ⊢ vol ∘ . ∘ G = vol ∘ . ∘ G
57 56 a1i ⊢ f ∈ ℝ 2 ℕ → vol ∘ . ∘ G = vol ∘ . ∘ G
58 53 55 57 3eqtr4d ⊢ f ∈ ℝ 2 ℕ → vol ∘ . ∘ f = vol ∘ . ∘ G
59 58 fveq2d ⊢ f ∈ ℝ 2 ℕ → sum^ ⁡ vol ∘ . ∘ f = sum^ ⁡ vol ∘ . ∘ G
60 59 adantr ⊢ f ∈ ℝ 2 ℕ ∧ y = sum^ ⁡ vol ∘ . ∘ f → sum^ ⁡ vol ∘ . ∘ f = sum^ ⁡ vol ∘ . ∘ G
61 52 60 eqtrd ⊢ f ∈ ℝ 2 ℕ ∧ y = sum^ ⁡ vol ∘ . ∘ f → y = sum^ ⁡ vol ∘ . ∘ G
62 61 adantrl ⊢ f ∈ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f → y = sum^ ⁡ vol ∘ . ∘ G
63 51 62 jca ⊢ f ∈ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f → A ⊆ ⋃ ran ⁡ . ∘ G ∧ y = sum^ ⁡ vol ∘ . ∘ G
64 coeq2 ⊢ g = G → . ∘ g = . ∘ G
65 64 rneqd ⊢ g = G → ran ⁡ . ∘ g = ran ⁡ . ∘ G
66 65 unieqd ⊢ g = G → ⋃ ran ⁡ . ∘ g = ⋃ ran ⁡ . ∘ G
67 66 sseq2d ⊢ g = G → A ⊆ ⋃ ran ⁡ . ∘ g ↔ A ⊆ ⋃ ran ⁡ . ∘ G
68 coeq2 ⊢ g = G → vol ∘ . ∘ g = vol ∘ . ∘ G
69 68 fveq2d ⊢ g = G → sum^ ⁡ vol ∘ . ∘ g = sum^ ⁡ vol ∘ . ∘ G
70 69 eqeq2d ⊢ g = G → y = sum^ ⁡ vol ∘ . ∘ g ↔ y = sum^ ⁡ vol ∘ . ∘ G
71 67 70 anbi12d ⊢ g = G → A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g ↔ A ⊆ ⋃ ran ⁡ . ∘ G ∧ y = sum^ ⁡ vol ∘ . ∘ G
72 71 rspcev ⊢ G ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ G ∧ y = sum^ ⁡ vol ∘ . ∘ G → ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g
73 38 63 72 syl2anc ⊢ f ∈ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f → ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g
74 73 rexlimiva ⊢ ∃ f ∈ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f → ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g
75 inss2 ⊢ ≤ ∩ ℝ 2 ⊆ ℝ 2
76 mapss ⊢ ℝ 2 ∈ V ∧ ≤ ∩ ℝ 2 ⊆ ℝ 2 → ≤ ∩ ℝ 2 ℕ ⊆ ℝ 2 ℕ
77 31 75 76 mp2an ⊢ ≤ ∩ ℝ 2 ℕ ⊆ ℝ 2 ℕ
78 77 sseli ⊢ g ∈ ≤ ∩ ℝ 2 ℕ → g ∈ ℝ 2 ℕ
79 78 adantr ⊢ g ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g → g ∈ ℝ 2 ℕ
80 simpr ⊢ g ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g → A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g
81 coeq2 ⊢ f = g → . ∘ f = . ∘ g
82 81 rneqd ⊢ f = g → ran ⁡ . ∘ f = ran ⁡ . ∘ g
83 82 unieqd ⊢ f = g → ⋃ ran ⁡ . ∘ f = ⋃ ran ⁡ . ∘ g
84 83 sseq2d ⊢ f = g → A ⊆ ⋃ ran ⁡ . ∘ f ↔ A ⊆ ⋃ ran ⁡ . ∘ g
85 coeq2 ⊢ f = g → vol ∘ . ∘ f = vol ∘ . ∘ g
86 85 fveq2d ⊢ f = g → sum^ ⁡ vol ∘ . ∘ f = sum^ ⁡ vol ∘ . ∘ g
87 86 eqeq2d ⊢ f = g → y = sum^ ⁡ vol ∘ . ∘ f ↔ y = sum^ ⁡ vol ∘ . ∘ g
88 84 87 anbi12d ⊢ f = g → A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f ↔ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g
89 88 rspcev ⊢ g ∈ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g → ∃ f ∈ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f
90 79 80 89 syl2anc ⊢ g ∈ ≤ ∩ ℝ 2 ℕ ∧ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g → ∃ f ∈ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f
91 90 rexlimiva ⊢ ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g → ∃ f ∈ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f
92 74 91 impbii ⊢ ∃ f ∈ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f ↔ ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g
93 92 rabbii ⊢ y ∈ ℝ * | ∃ f ∈ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ f ∧ y = sum^ ⁡ vol ∘ . ∘ f = y ∈ ℝ * | ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g
94 2 93 eqtri ⊢ M = y ∈ ℝ * | ∃ g ∈ ≤ ∩ ℝ 2 ℕ A ⊆ ⋃ ran ⁡ . ∘ g ∧ y = sum^ ⁡ vol ∘ . ∘ g
95 1 94 ovolval3 ⊢ φ → vol * ⁡ A = inf M ℝ * <