Metamath Proof Explorer


Theorem vitalilem3

Description: Lemma for vitali . (Contributed by Mario Carneiro, 16-Jun-2014)

Ref Expression
Hypotheses vitali.1 ⊢ ∼ ˙ = x y | x ∈ 0 1 ∧ y ∈ 0 1 ∧ x − y ∈ ℚ
vitali.2 ⊢ S = 0 1 / ∼ ˙
vitali.3 ⊢ φ → F Fn S
vitali.4 ⊢ φ → ∀ z ∈ S z ≠ ∅ → F ⁡ z ∈ z
vitali.5 ⊢ φ → G : ℕ ⟶ 1-1 onto ℚ ∩ − 1 1
vitali.6 ⊢ T = n ∈ ℕ ⟼ s ∈ ℝ | s − G ⁡ n ∈ ran ⁡ F
vitali.7 ⊢ φ → ¬ ran ⁡ F ∈ 𝒫 ℝ ∖ dom ⁡ vol
Assertion vitalilem3 ⊢ φ → Disj m ∈ ℕ T ⁡ m

Proof

Step Hyp Ref Expression
1 vitali.1 ⊢ ∼ ˙ = x y | x ∈ 0 1 ∧ y ∈ 0 1 ∧ x − y ∈ ℚ
2 vitali.2 ⊢ S = 0 1 / ∼ ˙
3 vitali.3 ⊢ φ → F Fn S
4 vitali.4 ⊢ φ → ∀ z ∈ S z ≠ ∅ → F ⁡ z ∈ z
5 vitali.5 ⊢ φ → G : ℕ ⟶ 1-1 onto ℚ ∩ − 1 1
6 vitali.6 ⊢ T = n ∈ ℕ ⟼ s ∈ ℝ | s − G ⁡ n ∈ ran ⁡ F
7 vitali.7 ⊢ φ → ¬ ran ⁡ F ∈ 𝒫 ℝ ∖ dom ⁡ vol
8 simprlr ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w ∈ T ⁡ m
9 simprll ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → m ∈ ℕ
10 fveq2 ⊢ n = m → G ⁡ n = G ⁡ m
11 10 oveq2d ⊢ n = m → s − G ⁡ n = s − G ⁡ m
12 11 eleq1d ⊢ n = m → s − G ⁡ n ∈ ran ⁡ F ↔ s − G ⁡ m ∈ ran ⁡ F
13 12 rabbidv ⊢ n = m → s ∈ ℝ | s − G ⁡ n ∈ ran ⁡ F = s ∈ ℝ | s − G ⁡ m ∈ ran ⁡ F
14 reex ⊢ ℝ ∈ V
15 14 rabex ⊢ s ∈ ℝ | s − G ⁡ m ∈ ran ⁡ F ∈ V
16 13 6 15 fvmpt ⊢ m ∈ ℕ → T ⁡ m = s ∈ ℝ | s − G ⁡ m ∈ ran ⁡ F
17 9 16 syl ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → T ⁡ m = s ∈ ℝ | s − G ⁡ m ∈ ran ⁡ F
18 8 17 eleqtrd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w ∈ s ∈ ℝ | s − G ⁡ m ∈ ran ⁡ F
19 oveq1 ⊢ s = w → s − G ⁡ m = w − G ⁡ m
20 19 eleq1d ⊢ s = w → s − G ⁡ m ∈ ran ⁡ F ↔ w − G ⁡ m ∈ ran ⁡ F
21 20 elrab ⊢ w ∈ s ∈ ℝ | s − G ⁡ m ∈ ran ⁡ F ↔ w ∈ ℝ ∧ w − G ⁡ m ∈ ran ⁡ F
22 18 21 sylib ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w ∈ ℝ ∧ w − G ⁡ m ∈ ran ⁡ F
23 22 simpld ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w ∈ ℝ
24 23 recnd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w ∈ ℂ
25 f1of ⊢ G : ℕ ⟶ 1-1 onto ℚ ∩ − 1 1 → G : ℕ ⟶ ℚ ∩ − 1 1
26 5 25 syl ⊢ φ → G : ℕ ⟶ ℚ ∩ − 1 1
27 inss1 ⊢ ℚ ∩ − 1 1 ⊆ ℚ
28 fss ⊢ G : ℕ ⟶ ℚ ∩ − 1 1 ∧ ℚ ∩ − 1 1 ⊆ ℚ → G : ℕ ⟶ ℚ
29 26 27 28 sylancl ⊢ φ → G : ℕ ⟶ ℚ
30 29 adantr ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G : ℕ ⟶ ℚ
31 30 9 ffvelcdmd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G ⁡ m ∈ ℚ
32 qcn ⊢ G ⁡ m ∈ ℚ → G ⁡ m ∈ ℂ
33 31 32 syl ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G ⁡ m ∈ ℂ
34 simprrl ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → k ∈ ℕ
35 30 34 ffvelcdmd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G ⁡ k ∈ ℚ
36 qcn ⊢ G ⁡ k ∈ ℚ → G ⁡ k ∈ ℂ
37 35 36 syl ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G ⁡ k ∈ ℂ
38 1 vitalilem1 ⊢ ∼ ˙ Er 0 1
39 38 a1i ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → ∼ ˙ Er 0 1
40 1 2 3 4 5 6 7 vitalilem2 ⊢ φ → ran ⁡ F ⊆ 0 1 ∧ 0 1 ⊆ ⋃ m ∈ ℕ T ⁡ m ∧ ⋃ m ∈ ℕ T ⁡ m ⊆ − 1 2
41 40 simp1d ⊢ φ → ran ⁡ F ⊆ 0 1
42 41 adantr ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → ran ⁡ F ⊆ 0 1
43 22 simprd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w − G ⁡ m ∈ ran ⁡ F
44 42 43 sseldd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w − G ⁡ m ∈ 0 1
45 simprrr ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w ∈ T ⁡ k
46 fveq2 ⊢ n = k → G ⁡ n = G ⁡ k
47 46 oveq2d ⊢ n = k → s − G ⁡ n = s − G ⁡ k
48 47 eleq1d ⊢ n = k → s − G ⁡ n ∈ ran ⁡ F ↔ s − G ⁡ k ∈ ran ⁡ F
49 48 rabbidv ⊢ n = k → s ∈ ℝ | s − G ⁡ n ∈ ran ⁡ F = s ∈ ℝ | s − G ⁡ k ∈ ran ⁡ F
50 14 rabex ⊢ s ∈ ℝ | s − G ⁡ k ∈ ran ⁡ F ∈ V
51 49 6 50 fvmpt ⊢ k ∈ ℕ → T ⁡ k = s ∈ ℝ | s − G ⁡ k ∈ ran ⁡ F
52 34 51 syl ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → T ⁡ k = s ∈ ℝ | s − G ⁡ k ∈ ran ⁡ F
53 45 52 eleqtrd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w ∈ s ∈ ℝ | s − G ⁡ k ∈ ran ⁡ F
54 oveq1 ⊢ s = w → s − G ⁡ k = w − G ⁡ k
55 54 eleq1d ⊢ s = w → s − G ⁡ k ∈ ran ⁡ F ↔ w − G ⁡ k ∈ ran ⁡ F
56 55 elrab ⊢ w ∈ s ∈ ℝ | s − G ⁡ k ∈ ran ⁡ F ↔ w ∈ ℝ ∧ w − G ⁡ k ∈ ran ⁡ F
57 53 56 sylib ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w ∈ ℝ ∧ w − G ⁡ k ∈ ran ⁡ F
58 57 simprd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w − G ⁡ k ∈ ran ⁡ F
59 42 58 sseldd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w − G ⁡ k ∈ 0 1
60 24 33 37 nnncan1d ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w - G ⁡ m - w − G ⁡ k = G ⁡ k − G ⁡ m
61 qsubcl ⊢ G ⁡ k ∈ ℚ ∧ G ⁡ m ∈ ℚ → G ⁡ k − G ⁡ m ∈ ℚ
62 35 31 61 syl2anc ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G ⁡ k − G ⁡ m ∈ ℚ
63 60 62 eqeltrd ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w - G ⁡ m - w − G ⁡ k ∈ ℚ
64 oveq12 ⊢ x = w − G ⁡ m ∧ y = w − G ⁡ k → x − y = w - G ⁡ m - w − G ⁡ k
65 64 eleq1d ⊢ x = w − G ⁡ m ∧ y = w − G ⁡ k → x − y ∈ ℚ ↔ w - G ⁡ m - w − G ⁡ k ∈ ℚ
66 65 1 brab2a ⊢ w − G ⁡ m ∼ ˙ w − G ⁡ k ↔ w − G ⁡ m ∈ 0 1 ∧ w − G ⁡ k ∈ 0 1 ∧ w - G ⁡ m - w − G ⁡ k ∈ ℚ
67 44 59 63 66 syl21anbrc ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w − G ⁡ m ∼ ˙ w − G ⁡ k
68 39 67 erthi ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w − G ⁡ m ∼ ˙ = w − G ⁡ k ∼ ˙
69 68 fveq2d ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → F ⁡ w − G ⁡ m ∼ ˙ = F ⁡ w − G ⁡ k ∼ ˙
70 eceq1 ⊢ z = w − G ⁡ m → z ∼ ˙ = w − G ⁡ m ∼ ˙
71 70 fveq2d ⊢ z = w − G ⁡ m → F ⁡ z ∼ ˙ = F ⁡ w − G ⁡ m ∼ ˙
72 id ⊢ z = w − G ⁡ m → z = w − G ⁡ m
73 71 72 eqeq12d ⊢ z = w − G ⁡ m → F ⁡ z ∼ ˙ = z ↔ F ⁡ w − G ⁡ m ∼ ˙ = w − G ⁡ m
74 fveq2 ⊢ v ∼ ˙ = w → F ⁡ v ∼ ˙ = F ⁡ w
75 74 eceq1d ⊢ v ∼ ˙ = w → F ⁡ v ∼ ˙ ∼ ˙ = F ⁡ w ∼ ˙
76 75 fveq2d ⊢ v ∼ ˙ = w → F ⁡ F ⁡ v ∼ ˙ ∼ ˙ = F ⁡ F ⁡ w ∼ ˙
77 76 74 eqeq12d ⊢ v ∼ ˙ = w → F ⁡ F ⁡ v ∼ ˙ ∼ ˙ = F ⁡ v ∼ ˙ ↔ F ⁡ F ⁡ w ∼ ˙ = F ⁡ w
78 38 a1i ⊢ φ ∧ v ∈ 0 1 → ∼ ˙ Er 0 1
79 erdm ⊢ ∼ ˙ Er 0 1 → dom ⁡ ∼ ˙ = 0 1
80 38 79 ax-mp ⊢ dom ⁡ ∼ ˙ = 0 1
81 80 eleq2i ⊢ v ∈ dom ⁡ ∼ ˙ ↔ v ∈ 0 1
82 ecdmn0 ⊢ v ∈ dom ⁡ ∼ ˙ ↔ v ∼ ˙ ≠ ∅
83 81 82 bitr3i ⊢ v ∈ 0 1 ↔ v ∼ ˙ ≠ ∅
84 83 bilani ⊢ φ ∧ v ∈ 0 1 → v ∼ ˙ ≠ ∅
85 neeq1 ⊢ z = v ∼ ˙ → z ≠ ∅ ↔ v ∼ ˙ ≠ ∅
86 fveq2 ⊢ z = v ∼ ˙ → F ⁡ z = F ⁡ v ∼ ˙
87 id ⊢ z = v ∼ ˙ → z = v ∼ ˙
88 86 87 eleq12d ⊢ z = v ∼ ˙ → F ⁡ z ∈ z ↔ F ⁡ v ∼ ˙ ∈ v ∼ ˙
89 85 88 imbi12d ⊢ z = v ∼ ˙ → z ≠ ∅ → F ⁡ z ∈ z ↔ v ∼ ˙ ≠ ∅ → F ⁡ v ∼ ˙ ∈ v ∼ ˙
90 4 adantr ⊢ φ ∧ v ∈ 0 1 → ∀ z ∈ S z ≠ ∅ → F ⁡ z ∈ z
91 ovex ⊢ 0 1 ∈ V
92 erex ⊢ ∼ ˙ Er 0 1 → 0 1 ∈ V → ∼ ˙ ∈ V
93 38 91 92 mp2 ⊢ ∼ ˙ ∈ V
94 93 ecelqsi ⊢ v ∈ 0 1 → v ∼ ˙ ∈ 0 1 / ∼ ˙
95 94 2 eleqtrrdi ⊢ v ∈ 0 1 → v ∼ ˙ ∈ S
96 95 adantl ⊢ φ ∧ v ∈ 0 1 → v ∼ ˙ ∈ S
97 89 90 96 rspcdva ⊢ φ ∧ v ∈ 0 1 → v ∼ ˙ ≠ ∅ → F ⁡ v ∼ ˙ ∈ v ∼ ˙
98 84 97 mpd ⊢ φ ∧ v ∈ 0 1 → F ⁡ v ∼ ˙ ∈ v ∼ ˙
99 fvex ⊢ F ⁡ v ∼ ˙ ∈ V
100 vex ⊢ v ∈ V
101 99 100 elec ⊢ F ⁡ v ∼ ˙ ∈ v ∼ ˙ ↔ v ∼ ˙ F ⁡ v ∼ ˙
102 98 101 sylib ⊢ φ ∧ v ∈ 0 1 → v ∼ ˙ F ⁡ v ∼ ˙
103 78 102 erthi ⊢ φ ∧ v ∈ 0 1 → v ∼ ˙ = F ⁡ v ∼ ˙ ∼ ˙
104 103 eqcomd ⊢ φ ∧ v ∈ 0 1 → F ⁡ v ∼ ˙ ∼ ˙ = v ∼ ˙
105 104 fveq2d ⊢ φ ∧ v ∈ 0 1 → F ⁡ F ⁡ v ∼ ˙ ∼ ˙ = F ⁡ v ∼ ˙
106 2 77 105 ectocld ⊢ φ ∧ w ∈ S → F ⁡ F ⁡ w ∼ ˙ = F ⁡ w
107 106 ralrimiva ⊢ φ → ∀ w ∈ S F ⁡ F ⁡ w ∼ ˙ = F ⁡ w
108 eceq1 ⊢ z = F ⁡ w → z ∼ ˙ = F ⁡ w ∼ ˙
109 108 fveq2d ⊢ z = F ⁡ w → F ⁡ z ∼ ˙ = F ⁡ F ⁡ w ∼ ˙
110 id ⊢ z = F ⁡ w → z = F ⁡ w
111 109 110 eqeq12d ⊢ z = F ⁡ w → F ⁡ z ∼ ˙ = z ↔ F ⁡ F ⁡ w ∼ ˙ = F ⁡ w
112 111 ralrn ⊢ F Fn S → ∀ z ∈ ran ⁡ F F ⁡ z ∼ ˙ = z ↔ ∀ w ∈ S F ⁡ F ⁡ w ∼ ˙ = F ⁡ w
113 3 112 syl ⊢ φ → ∀ z ∈ ran ⁡ F F ⁡ z ∼ ˙ = z ↔ ∀ w ∈ S F ⁡ F ⁡ w ∼ ˙ = F ⁡ w
114 107 113 mpbird ⊢ φ → ∀ z ∈ ran ⁡ F F ⁡ z ∼ ˙ = z
115 114 adantr ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → ∀ z ∈ ran ⁡ F F ⁡ z ∼ ˙ = z
116 73 115 43 rspcdva ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → F ⁡ w − G ⁡ m ∼ ˙ = w − G ⁡ m
117 eceq1 ⊢ z = w − G ⁡ k → z ∼ ˙ = w − G ⁡ k ∼ ˙
118 117 fveq2d ⊢ z = w − G ⁡ k → F ⁡ z ∼ ˙ = F ⁡ w − G ⁡ k ∼ ˙
119 id ⊢ z = w − G ⁡ k → z = w − G ⁡ k
120 118 119 eqeq12d ⊢ z = w − G ⁡ k → F ⁡ z ∼ ˙ = z ↔ F ⁡ w − G ⁡ k ∼ ˙ = w − G ⁡ k
121 120 115 58 rspcdva ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → F ⁡ w − G ⁡ k ∼ ˙ = w − G ⁡ k
122 69 116 121 3eqtr3d ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → w − G ⁡ m = w − G ⁡ k
123 24 33 37 122 subcand ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G ⁡ m = G ⁡ k
124 5 adantr ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G : ℕ ⟶ 1-1 onto ℚ ∩ − 1 1
125 f1of1 ⊢ G : ℕ ⟶ 1-1 onto ℚ ∩ − 1 1 → G : ℕ ⟶ 1-1 ℚ ∩ − 1 1
126 124 125 syl ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G : ℕ ⟶ 1-1 ℚ ∩ − 1 1
127 f1fveq ⊢ G : ℕ ⟶ 1-1 ℚ ∩ − 1 1 ∧ m ∈ ℕ ∧ k ∈ ℕ → G ⁡ m = G ⁡ k ↔ m = k
128 126 9 34 127 syl12anc ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → G ⁡ m = G ⁡ k ↔ m = k
129 123 128 mpbid ⊢ φ ∧ m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → m = k
130 129 ex ⊢ φ → m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → m = k
131 130 alrimivv ⊢ φ → ∀ m ∀ k m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → m = k
132 eleq1w ⊢ m = k → m ∈ ℕ ↔ k ∈ ℕ
133 fveq2 ⊢ m = k → T ⁡ m = T ⁡ k
134 133 eleq2d ⊢ m = k → w ∈ T ⁡ m ↔ w ∈ T ⁡ k
135 132 134 anbi12d ⊢ m = k → m ∈ ℕ ∧ w ∈ T ⁡ m ↔ k ∈ ℕ ∧ w ∈ T ⁡ k
136 135 mo4 ⊢ ∃* m m ∈ ℕ ∧ w ∈ T ⁡ m ↔ ∀ m ∀ k m ∈ ℕ ∧ w ∈ T ⁡ m ∧ k ∈ ℕ ∧ w ∈ T ⁡ k → m = k
137 131 136 sylibr ⊢ φ → ∃* m m ∈ ℕ ∧ w ∈ T ⁡ m
138 137 alrimiv ⊢ φ → ∀ w ∃* m m ∈ ℕ ∧ w ∈ T ⁡ m
139 dfdisj2 ⊢ Disj m ∈ ℕ T ⁡ m ↔ ∀ w ∃* m m ∈ ℕ ∧ w ∈ T ⁡ m
140 138 139 sylibr ⊢ φ → Disj m ∈ ℕ T ⁡ m