Metamath Proof Explorer


Theorem ovollb2lem

Description: Lemma for ovollb2 . (Contributed by Mario Carneiro, 24-Mar-2015)

Ref Expression
Hypotheses ovollb2.1 ⊢ S = seq 1 + abs ∘ − ∘ F
ovollb2.2 ⊢ G = n ∈ ℕ ⟼ 1 st ⁡ F ⁡ n − B 2 2 n 2 nd ⁡ F ⁡ n + B 2 2 n
ovollb2.3 ⊢ T = seq 1 + abs ∘ − ∘ G
ovollb2.4 ⊢ φ → F : ℕ ⟶ ≤ ∩ ℝ 2
ovollb2.5 ⊢ φ → A ⊆ ⋃ ran ⁡ . ∘ F
ovollb2.6 ⊢ φ → B ∈ ℝ +
ovollb2.7 ⊢ φ → sup ran ⁡ S ℝ * < ∈ ℝ
Assertion ovollb2lem ⊢ φ → vol * ⁡ A ≤ sup ran ⁡ S ℝ * < + B

Proof

Step Hyp Ref Expression
1 ovollb2.1 ⊢ S = seq 1 + abs ∘ − ∘ F
2 ovollb2.2 ⊢ G = n ∈ ℕ ⟼ 1 st ⁡ F ⁡ n − B 2 2 n 2 nd ⁡ F ⁡ n + B 2 2 n
3 ovollb2.3 ⊢ T = seq 1 + abs ∘ − ∘ G
4 ovollb2.4 ⊢ φ → F : ℕ ⟶ ≤ ∩ ℝ 2
5 ovollb2.5 ⊢ φ → A ⊆ ⋃ ran ⁡ . ∘ F
6 ovollb2.6 ⊢ φ → B ∈ ℝ +
7 ovollb2.7 ⊢ φ → sup ran ⁡ S ℝ * < ∈ ℝ
8 ovolficcss ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 → ⋃ ran ⁡ . ∘ F ⊆ ℝ
9 4 8 syl ⊢ φ → ⋃ ran ⁡ . ∘ F ⊆ ℝ
10 5 9 sstrd ⊢ φ → A ⊆ ℝ
11 ovolcl ⊢ A ⊆ ℝ → vol * ⁡ A ∈ ℝ *
12 10 11 syl ⊢ φ → vol * ⁡ A ∈ ℝ *
13 ovolfcl ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n ∈ ℝ ∧ 2 nd ⁡ F ⁡ n ∈ ℝ ∧ 1 st ⁡ F ⁡ n ≤ 2 nd ⁡ F ⁡ n
14 4 13 sylan ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n ∈ ℝ ∧ 2 nd ⁡ F ⁡ n ∈ ℝ ∧ 1 st ⁡ F ⁡ n ≤ 2 nd ⁡ F ⁡ n
15 14 simp1d ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n ∈ ℝ
16 6 rphalfcld ⊢ φ → B 2 ∈ ℝ +
17 16 adantr ⊢ φ ∧ n ∈ ℕ → B 2 ∈ ℝ +
18 2nn ⊢ 2 ∈ ℕ
19 nnnn0 ⊢ n ∈ ℕ → n ∈ ℕ 0
20 19 adantl ⊢ φ ∧ n ∈ ℕ → n ∈ ℕ 0
21 nnexpcl ⊢ 2 ∈ ℕ ∧ n ∈ ℕ 0 → 2 n ∈ ℕ
22 18 20 21 sylancr ⊢ φ ∧ n ∈ ℕ → 2 n ∈ ℕ
23 22 nnrpd ⊢ φ ∧ n ∈ ℕ → 2 n ∈ ℝ +
24 17 23 rpdivcld ⊢ φ ∧ n ∈ ℕ → B 2 2 n ∈ ℝ +
25 24 rpred ⊢ φ ∧ n ∈ ℕ → B 2 2 n ∈ ℝ
26 15 25 resubcld ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n − B 2 2 n ∈ ℝ
27 14 simp2d ⊢ φ ∧ n ∈ ℕ → 2 nd ⁡ F ⁡ n ∈ ℝ
28 27 25 readdcld ⊢ φ ∧ n ∈ ℕ → 2 nd ⁡ F ⁡ n + B 2 2 n ∈ ℝ
29 15 24 ltsubrpd ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n − B 2 2 n < 1 st ⁡ F ⁡ n
30 14 simp3d ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n ≤ 2 nd ⁡ F ⁡ n
31 27 24 ltaddrpd ⊢ φ ∧ n ∈ ℕ → 2 nd ⁡ F ⁡ n < 2 nd ⁡ F ⁡ n + B 2 2 n
32 15 27 28 30 31 lelttrd ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n < 2 nd ⁡ F ⁡ n + B 2 2 n
33 26 15 28 29 32 lttrd ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n − B 2 2 n < 2 nd ⁡ F ⁡ n + B 2 2 n
34 26 28 33 ltled ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n − B 2 2 n ≤ 2 nd ⁡ F ⁡ n + B 2 2 n
35 df-br ⊢ 1 st ⁡ F ⁡ n − B 2 2 n ≤ 2 nd ⁡ F ⁡ n + B 2 2 n ↔ 1 st ⁡ F ⁡ n − B 2 2 n 2 nd ⁡ F ⁡ n + B 2 2 n ∈ ≤
36 34 35 sylib ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n − B 2 2 n 2 nd ⁡ F ⁡ n + B 2 2 n ∈ ≤
37 26 28 opelxpd ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n − B 2 2 n 2 nd ⁡ F ⁡ n + B 2 2 n ∈ ℝ 2
38 36 37 elind ⊢ φ ∧ n ∈ ℕ → 1 st ⁡ F ⁡ n − B 2 2 n 2 nd ⁡ F ⁡ n + B 2 2 n ∈ ≤ ∩ ℝ 2
39 38 2 fmptd ⊢ φ → G : ℕ ⟶ ≤ ∩ ℝ 2
40 eqid ⊢ abs ∘ − ∘ G = abs ∘ − ∘ G
41 40 3 ovolsf ⊢ G : ℕ ⟶ ≤ ∩ ℝ 2 → T : ℕ ⟶ 0 +∞
42 39 41 syl ⊢ φ → T : ℕ ⟶ 0 +∞
43 42 frnd ⊢ φ → ran ⁡ T ⊆ 0 +∞
44 icossxr ⊢ 0 +∞ ⊆ ℝ *
45 43 44 sstrdi ⊢ φ → ran ⁡ T ⊆ ℝ *
46 supxrcl ⊢ ran ⁡ T ⊆ ℝ * → sup ran ⁡ T ℝ * < ∈ ℝ *
47 45 46 syl ⊢ φ → sup ran ⁡ T ℝ * < ∈ ℝ *
48 6 rpred ⊢ φ → B ∈ ℝ
49 7 48 readdcld ⊢ φ → sup ran ⁡ S ℝ * < + B ∈ ℝ
50 49 rexrd ⊢ φ → sup ran ⁡ S ℝ * < + B ∈ ℝ *
51 2fveq3 ⊢ n = m → 1 st ⁡ F ⁡ n = 1 st ⁡ F ⁡ m
52 oveq2 ⊢ n = m → 2 n = 2 m
53 52 oveq2d ⊢ n = m → B 2 2 n = B 2 2 m
54 51 53 oveq12d ⊢ n = m → 1 st ⁡ F ⁡ n − B 2 2 n = 1 st ⁡ F ⁡ m − B 2 2 m
55 2fveq3 ⊢ n = m → 2 nd ⁡ F ⁡ n = 2 nd ⁡ F ⁡ m
56 55 53 oveq12d ⊢ n = m → 2 nd ⁡ F ⁡ n + B 2 2 n = 2 nd ⁡ F ⁡ m + B 2 2 m
57 54 56 opeq12d ⊢ n = m → 1 st ⁡ F ⁡ n − B 2 2 n 2 nd ⁡ F ⁡ n + B 2 2 n = 1 st ⁡ F ⁡ m − B 2 2 m 2 nd ⁡ F ⁡ m + B 2 2 m
58 opex ⊢ 1 st ⁡ F ⁡ m − B 2 2 m 2 nd ⁡ F ⁡ m + B 2 2 m ∈ V
59 57 2 58 fvmpt ⊢ m ∈ ℕ → G ⁡ m = 1 st ⁡ F ⁡ m − B 2 2 m 2 nd ⁡ F ⁡ m + B 2 2 m
60 59 adantl ⊢ φ ∧ m ∈ ℕ → G ⁡ m = 1 st ⁡ F ⁡ m − B 2 2 m 2 nd ⁡ F ⁡ m + B 2 2 m
61 60 fveq2d ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ G ⁡ m = 1 st ⁡ 1 st ⁡ F ⁡ m − B 2 2 m 2 nd ⁡ F ⁡ m + B 2 2 m
62 ovex ⊢ 1 st ⁡ F ⁡ m − B 2 2 m ∈ V
63 ovex ⊢ 2 nd ⁡ F ⁡ m + B 2 2 m ∈ V
64 62 63 op1st ⊢ 1 st ⁡ 1 st ⁡ F ⁡ m − B 2 2 m 2 nd ⁡ F ⁡ m + B 2 2 m = 1 st ⁡ F ⁡ m − B 2 2 m
65 61 64 eqtrdi ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ G ⁡ m = 1 st ⁡ F ⁡ m − B 2 2 m
66 ovolfcl ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 ∧ m ∈ ℕ → 1 st ⁡ F ⁡ m ∈ ℝ ∧ 2 nd ⁡ F ⁡ m ∈ ℝ ∧ 1 st ⁡ F ⁡ m ≤ 2 nd ⁡ F ⁡ m
67 4 66 sylan ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ F ⁡ m ∈ ℝ ∧ 2 nd ⁡ F ⁡ m ∈ ℝ ∧ 1 st ⁡ F ⁡ m ≤ 2 nd ⁡ F ⁡ m
68 67 simp1d ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ F ⁡ m ∈ ℝ
69 16 adantr ⊢ φ ∧ m ∈ ℕ → B 2 ∈ ℝ +
70 nnnn0 ⊢ m ∈ ℕ → m ∈ ℕ 0
71 70 adantl ⊢ φ ∧ m ∈ ℕ → m ∈ ℕ 0
72 nnexpcl ⊢ 2 ∈ ℕ ∧ m ∈ ℕ 0 → 2 m ∈ ℕ
73 18 71 72 sylancr ⊢ φ ∧ m ∈ ℕ → 2 m ∈ ℕ
74 73 nnrpd ⊢ φ ∧ m ∈ ℕ → 2 m ∈ ℝ +
75 69 74 rpdivcld ⊢ φ ∧ m ∈ ℕ → B 2 2 m ∈ ℝ +
76 68 75 ltsubrpd ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ F ⁡ m − B 2 2 m < 1 st ⁡ F ⁡ m
77 65 76 eqbrtrd ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ G ⁡ m < 1 st ⁡ F ⁡ m
78 77 adantlr ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → 1 st ⁡ G ⁡ m < 1 st ⁡ F ⁡ m
79 ovolfcl ⊢ G : ℕ ⟶ ≤ ∩ ℝ 2 ∧ m ∈ ℕ → 1 st ⁡ G ⁡ m ∈ ℝ ∧ 2 nd ⁡ G ⁡ m ∈ ℝ ∧ 1 st ⁡ G ⁡ m ≤ 2 nd ⁡ G ⁡ m
80 39 79 sylan ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ G ⁡ m ∈ ℝ ∧ 2 nd ⁡ G ⁡ m ∈ ℝ ∧ 1 st ⁡ G ⁡ m ≤ 2 nd ⁡ G ⁡ m
81 80 simp1d ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ G ⁡ m ∈ ℝ
82 81 adantlr ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → 1 st ⁡ G ⁡ m ∈ ℝ
83 68 adantlr ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → 1 st ⁡ F ⁡ m ∈ ℝ
84 10 sselda ⊢ φ ∧ z ∈ A → z ∈ ℝ
85 84 adantr ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → z ∈ ℝ
86 ltletr ⊢ 1 st ⁡ G ⁡ m ∈ ℝ ∧ 1 st ⁡ F ⁡ m ∈ ℝ ∧ z ∈ ℝ → 1 st ⁡ G ⁡ m < 1 st ⁡ F ⁡ m ∧ 1 st ⁡ F ⁡ m ≤ z → 1 st ⁡ G ⁡ m < z
87 82 83 85 86 syl3anc ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → 1 st ⁡ G ⁡ m < 1 st ⁡ F ⁡ m ∧ 1 st ⁡ F ⁡ m ≤ z → 1 st ⁡ G ⁡ m < z
88 78 87 mpand ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → 1 st ⁡ F ⁡ m ≤ z → 1 st ⁡ G ⁡ m < z
89 67 simp2d ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ F ⁡ m ∈ ℝ
90 89 75 ltaddrpd ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ F ⁡ m < 2 nd ⁡ F ⁡ m + B 2 2 m
91 60 fveq2d ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ G ⁡ m = 2 nd ⁡ 1 st ⁡ F ⁡ m − B 2 2 m 2 nd ⁡ F ⁡ m + B 2 2 m
92 62 63 op2nd ⊢ 2 nd ⁡ 1 st ⁡ F ⁡ m − B 2 2 m 2 nd ⁡ F ⁡ m + B 2 2 m = 2 nd ⁡ F ⁡ m + B 2 2 m
93 91 92 eqtrdi ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ G ⁡ m = 2 nd ⁡ F ⁡ m + B 2 2 m
94 90 93 breqtrrd ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ F ⁡ m < 2 nd ⁡ G ⁡ m
95 94 adantlr ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → 2 nd ⁡ F ⁡ m < 2 nd ⁡ G ⁡ m
96 89 adantlr ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → 2 nd ⁡ F ⁡ m ∈ ℝ
97 80 simp2d ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ G ⁡ m ∈ ℝ
98 97 adantlr ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → 2 nd ⁡ G ⁡ m ∈ ℝ
99 lelttr ⊢ z ∈ ℝ ∧ 2 nd ⁡ F ⁡ m ∈ ℝ ∧ 2 nd ⁡ G ⁡ m ∈ ℝ → z ≤ 2 nd ⁡ F ⁡ m ∧ 2 nd ⁡ F ⁡ m < 2 nd ⁡ G ⁡ m → z < 2 nd ⁡ G ⁡ m
100 85 96 98 99 syl3anc ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → z ≤ 2 nd ⁡ F ⁡ m ∧ 2 nd ⁡ F ⁡ m < 2 nd ⁡ G ⁡ m → z < 2 nd ⁡ G ⁡ m
101 95 100 mpan2d ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → z ≤ 2 nd ⁡ F ⁡ m → z < 2 nd ⁡ G ⁡ m
102 88 101 anim12d ⊢ φ ∧ z ∈ A ∧ m ∈ ℕ → 1 st ⁡ F ⁡ m ≤ z ∧ z ≤ 2 nd ⁡ F ⁡ m → 1 st ⁡ G ⁡ m < z ∧ z < 2 nd ⁡ G ⁡ m
103 102 reximdva ⊢ φ ∧ z ∈ A → ∃ m ∈ ℕ 1 st ⁡ F ⁡ m ≤ z ∧ z ≤ 2 nd ⁡ F ⁡ m → ∃ m ∈ ℕ 1 st ⁡ G ⁡ m < z ∧ z < 2 nd ⁡ G ⁡ m
104 103 ralimdva ⊢ φ → ∀ z ∈ A ∃ m ∈ ℕ 1 st ⁡ F ⁡ m ≤ z ∧ z ≤ 2 nd ⁡ F ⁡ m → ∀ z ∈ A ∃ m ∈ ℕ 1 st ⁡ G ⁡ m < z ∧ z < 2 nd ⁡ G ⁡ m
105 ovolficc ⊢ A ⊆ ℝ ∧ F : ℕ ⟶ ≤ ∩ ℝ 2 → A ⊆ ⋃ ran ⁡ . ∘ F ↔ ∀ z ∈ A ∃ m ∈ ℕ 1 st ⁡ F ⁡ m ≤ z ∧ z ≤ 2 nd ⁡ F ⁡ m
106 10 4 105 syl2anc ⊢ φ → A ⊆ ⋃ ran ⁡ . ∘ F ↔ ∀ z ∈ A ∃ m ∈ ℕ 1 st ⁡ F ⁡ m ≤ z ∧ z ≤ 2 nd ⁡ F ⁡ m
107 ovolfioo ⊢ A ⊆ ℝ ∧ G : ℕ ⟶ ≤ ∩ ℝ 2 → A ⊆ ⋃ ran ⁡ . ∘ G ↔ ∀ z ∈ A ∃ m ∈ ℕ 1 st ⁡ G ⁡ m < z ∧ z < 2 nd ⁡ G ⁡ m
108 10 39 107 syl2anc ⊢ φ → A ⊆ ⋃ ran ⁡ . ∘ G ↔ ∀ z ∈ A ∃ m ∈ ℕ 1 st ⁡ G ⁡ m < z ∧ z < 2 nd ⁡ G ⁡ m
109 104 106 108 3imtr4d ⊢ φ → A ⊆ ⋃ ran ⁡ . ∘ F → A ⊆ ⋃ ran ⁡ . ∘ G
110 5 109 mpd ⊢ φ → A ⊆ ⋃ ran ⁡ . ∘ G
111 3 ovollb ⊢ G : ℕ ⟶ ≤ ∩ ℝ 2 ∧ A ⊆ ⋃ ran ⁡ . ∘ G → vol * ⁡ A ≤ sup ran ⁡ T ℝ * <
112 39 110 111 syl2anc ⊢ φ → vol * ⁡ A ≤ sup ran ⁡ T ℝ * <
113 3 fveq1i ⊢ T ⁡ k = seq 1 + abs ∘ − ∘ G ⁡ k
114 fzfid ⊢ φ ∧ k ∈ ℕ → 1 … k ∈ Fin
115 rge0ssre ⊢ 0 +∞ ⊆ ℝ
116 eqid ⊢ abs ∘ − ∘ F = abs ∘ − ∘ F
117 116 ovolfsf ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 → abs ∘ − ∘ F : ℕ ⟶ 0 +∞
118 4 117 syl ⊢ φ → abs ∘ − ∘ F : ℕ ⟶ 0 +∞
119 118 adantr ⊢ φ ∧ k ∈ ℕ → abs ∘ − ∘ F : ℕ ⟶ 0 +∞
120 elfznn ⊢ m ∈ 1 … k → m ∈ ℕ
121 ffvelcdm ⊢ abs ∘ − ∘ F : ℕ ⟶ 0 +∞ ∧ m ∈ ℕ → abs ∘ − ∘ F ⁡ m ∈ 0 +∞
122 119 120 121 syl2an ⊢ φ ∧ k ∈ ℕ ∧ m ∈ 1 … k → abs ∘ − ∘ F ⁡ m ∈ 0 +∞
123 115 122 sselid ⊢ φ ∧ k ∈ ℕ ∧ m ∈ 1 … k → abs ∘ − ∘ F ⁡ m ∈ ℝ
124 123 recnd ⊢ φ ∧ k ∈ ℕ ∧ m ∈ 1 … k → abs ∘ − ∘ F ⁡ m ∈ ℂ
125 6 adantr ⊢ φ ∧ m ∈ ℕ → B ∈ ℝ +
126 125 74 rpdivcld ⊢ φ ∧ m ∈ ℕ → B 2 m ∈ ℝ +
127 126 rpcnd ⊢ φ ∧ m ∈ ℕ → B 2 m ∈ ℂ
128 120 127 sylan2 ⊢ φ ∧ m ∈ 1 … k → B 2 m ∈ ℂ
129 128 adantlr ⊢ φ ∧ k ∈ ℕ ∧ m ∈ 1 … k → B 2 m ∈ ℂ
130 114 124 129 fsumadd ⊢ φ ∧ k ∈ ℕ → ∑ m = 1 k abs ∘ − ∘ F ⁡ m + B 2 m = ∑ m = 1 k abs ∘ − ∘ F ⁡ m + ∑ m = 1 k B 2 m
131 40 ovolfsval ⊢ G : ℕ ⟶ ≤ ∩ ℝ 2 ∧ m ∈ ℕ → abs ∘ − ∘ G ⁡ m = 2 nd ⁡ G ⁡ m − 1 st ⁡ G ⁡ m
132 39 131 sylan ⊢ φ ∧ m ∈ ℕ → abs ∘ − ∘ G ⁡ m = 2 nd ⁡ G ⁡ m − 1 st ⁡ G ⁡ m
133 89 recnd ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ F ⁡ m ∈ ℂ
134 75 rpcnd ⊢ φ ∧ m ∈ ℕ → B 2 2 m ∈ ℂ
135 68 recnd ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ F ⁡ m ∈ ℂ
136 135 134 subcld ⊢ φ ∧ m ∈ ℕ → 1 st ⁡ F ⁡ m − B 2 2 m ∈ ℂ
137 133 134 136 addsubassd ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ F ⁡ m + B 2 2 m - 1 st ⁡ F ⁡ m − B 2 2 m = 2 nd ⁡ F ⁡ m + B 2 2 m - 1 st ⁡ F ⁡ m − B 2 2 m
138 93 65 oveq12d ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ G ⁡ m − 1 st ⁡ G ⁡ m = 2 nd ⁡ F ⁡ m + B 2 2 m - 1 st ⁡ F ⁡ m − B 2 2 m
139 133 135 127 subadd23d ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ F ⁡ m - 1 st ⁡ F ⁡ m + B 2 m = 2 nd ⁡ F ⁡ m + B 2 m - 1 st ⁡ F ⁡ m
140 116 ovolfsval ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 ∧ m ∈ ℕ → abs ∘ − ∘ F ⁡ m = 2 nd ⁡ F ⁡ m − 1 st ⁡ F ⁡ m
141 4 140 sylan ⊢ φ ∧ m ∈ ℕ → abs ∘ − ∘ F ⁡ m = 2 nd ⁡ F ⁡ m − 1 st ⁡ F ⁡ m
142 141 oveq1d ⊢ φ ∧ m ∈ ℕ → abs ∘ − ∘ F ⁡ m + B 2 m = 2 nd ⁡ F ⁡ m - 1 st ⁡ F ⁡ m + B 2 m
143 134 135 134 subsub3d ⊢ φ ∧ m ∈ ℕ → B 2 2 m − 1 st ⁡ F ⁡ m − B 2 2 m = B 2 2 m + B 2 2 m - 1 st ⁡ F ⁡ m
144 69 rpcnd ⊢ φ ∧ m ∈ ℕ → B 2 ∈ ℂ
145 73 nncnd ⊢ φ ∧ m ∈ ℕ → 2 m ∈ ℂ
146 73 nnne0d ⊢ φ ∧ m ∈ ℕ → 2 m ≠ 0
147 144 144 145 146 divdird ⊢ φ ∧ m ∈ ℕ → B 2 + B 2 2 m = B 2 2 m + B 2 2 m
148 125 rpcnd ⊢ φ ∧ m ∈ ℕ → B ∈ ℂ
149 148 2halvesd ⊢ φ ∧ m ∈ ℕ → B 2 + B 2 = B
150 149 oveq1d ⊢ φ ∧ m ∈ ℕ → B 2 + B 2 2 m = B 2 m
151 147 150 eqtr3d ⊢ φ ∧ m ∈ ℕ → B 2 2 m + B 2 2 m = B 2 m
152 151 oveq1d ⊢ φ ∧ m ∈ ℕ → B 2 2 m + B 2 2 m - 1 st ⁡ F ⁡ m = B 2 m − 1 st ⁡ F ⁡ m
153 143 152 eqtrd ⊢ φ ∧ m ∈ ℕ → B 2 2 m − 1 st ⁡ F ⁡ m − B 2 2 m = B 2 m − 1 st ⁡ F ⁡ m
154 153 oveq2d ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ F ⁡ m + B 2 2 m - 1 st ⁡ F ⁡ m − B 2 2 m = 2 nd ⁡ F ⁡ m + B 2 m - 1 st ⁡ F ⁡ m
155 139 142 154 3eqtr4d ⊢ φ ∧ m ∈ ℕ → abs ∘ − ∘ F ⁡ m + B 2 m = 2 nd ⁡ F ⁡ m + B 2 2 m - 1 st ⁡ F ⁡ m − B 2 2 m
156 137 138 155 3eqtr4d ⊢ φ ∧ m ∈ ℕ → 2 nd ⁡ G ⁡ m − 1 st ⁡ G ⁡ m = abs ∘ − ∘ F ⁡ m + B 2 m
157 132 156 eqtrd ⊢ φ ∧ m ∈ ℕ → abs ∘ − ∘ G ⁡ m = abs ∘ − ∘ F ⁡ m + B 2 m
158 120 157 sylan2 ⊢ φ ∧ m ∈ 1 … k → abs ∘ − ∘ G ⁡ m = abs ∘ − ∘ F ⁡ m + B 2 m
159 158 adantlr ⊢ φ ∧ k ∈ ℕ ∧ m ∈ 1 … k → abs ∘ − ∘ G ⁡ m = abs ∘ − ∘ F ⁡ m + B 2 m
160 simpr ⊢ φ ∧ k ∈ ℕ → k ∈ ℕ
161 nnuz ⊢ ℕ = ℤ ≥ 1
162 160 161 eleqtrdi ⊢ φ ∧ k ∈ ℕ → k ∈ ℤ ≥ 1
163 124 129 addcld ⊢ φ ∧ k ∈ ℕ ∧ m ∈ 1 … k → abs ∘ − ∘ F ⁡ m + B 2 m ∈ ℂ
164 159 162 163 fsumser ⊢ φ ∧ k ∈ ℕ → ∑ m = 1 k abs ∘ − ∘ F ⁡ m + B 2 m = seq 1 + abs ∘ − ∘ G ⁡ k
165 eqidd ⊢ φ ∧ k ∈ ℕ ∧ m ∈ 1 … k → abs ∘ − ∘ F ⁡ m = abs ∘ − ∘ F ⁡ m
166 165 162 124 fsumser ⊢ φ ∧ k ∈ ℕ → ∑ m = 1 k abs ∘ − ∘ F ⁡ m = seq 1 + abs ∘ − ∘ F ⁡ k
167 1 fveq1i ⊢ S ⁡ k = seq 1 + abs ∘ − ∘ F ⁡ k
168 166 167 eqtr4di ⊢ φ ∧ k ∈ ℕ → ∑ m = 1 k abs ∘ − ∘ F ⁡ m = S ⁡ k
169 6 adantr ⊢ φ ∧ k ∈ ℕ → B ∈ ℝ +
170 169 rpcnd ⊢ φ ∧ k ∈ ℕ → B ∈ ℂ
171 geo2sum ⊢ k ∈ ℕ ∧ B ∈ ℂ → ∑ m = 1 k B 2 m = B − B 2 k
172 160 170 171 syl2anc ⊢ φ ∧ k ∈ ℕ → ∑ m = 1 k B 2 m = B − B 2 k
173 168 172 oveq12d ⊢ φ ∧ k ∈ ℕ → ∑ m = 1 k abs ∘ − ∘ F ⁡ m + ∑ m = 1 k B 2 m = S ⁡ k + B - B 2 k
174 130 164 173 3eqtr3d ⊢ φ ∧ k ∈ ℕ → seq 1 + abs ∘ − ∘ G ⁡ k = S ⁡ k + B - B 2 k
175 113 174 eqtrid ⊢ φ ∧ k ∈ ℕ → T ⁡ k = S ⁡ k + B - B 2 k
176 116 1 ovolsf ⊢ F : ℕ ⟶ ≤ ∩ ℝ 2 → S : ℕ ⟶ 0 +∞
177 4 176 syl ⊢ φ → S : ℕ ⟶ 0 +∞
178 177 ffvelcdmda ⊢ φ ∧ k ∈ ℕ → S ⁡ k ∈ 0 +∞
179 115 178 sselid ⊢ φ ∧ k ∈ ℕ → S ⁡ k ∈ ℝ
180 169 rpred ⊢ φ ∧ k ∈ ℕ → B ∈ ℝ
181 nnnn0 ⊢ k ∈ ℕ → k ∈ ℕ 0
182 181 adantl ⊢ φ ∧ k ∈ ℕ → k ∈ ℕ 0
183 nnexpcl ⊢ 2 ∈ ℕ ∧ k ∈ ℕ 0 → 2 k ∈ ℕ
184 18 182 183 sylancr ⊢ φ ∧ k ∈ ℕ → 2 k ∈ ℕ
185 184 nnrpd ⊢ φ ∧ k ∈ ℕ → 2 k ∈ ℝ +
186 169 185 rpdivcld ⊢ φ ∧ k ∈ ℕ → B 2 k ∈ ℝ +
187 186 rpred ⊢ φ ∧ k ∈ ℕ → B 2 k ∈ ℝ
188 180 187 resubcld ⊢ φ ∧ k ∈ ℕ → B − B 2 k ∈ ℝ
189 7 adantr ⊢ φ ∧ k ∈ ℕ → sup ran ⁡ S ℝ * < ∈ ℝ
190 177 frnd ⊢ φ → ran ⁡ S ⊆ 0 +∞
191 190 44 sstrdi ⊢ φ → ran ⁡ S ⊆ ℝ *
192 191 adantr ⊢ φ ∧ k ∈ ℕ → ran ⁡ S ⊆ ℝ *
193 177 ffnd ⊢ φ → S Fn ℕ
194 fnfvelrn ⊢ S Fn ℕ ∧ k ∈ ℕ → S ⁡ k ∈ ran ⁡ S
195 193 194 sylan ⊢ φ ∧ k ∈ ℕ → S ⁡ k ∈ ran ⁡ S
196 supxrub ⊢ ran ⁡ S ⊆ ℝ * ∧ S ⁡ k ∈ ran ⁡ S → S ⁡ k ≤ sup ran ⁡ S ℝ * <
197 192 195 196 syl2anc ⊢ φ ∧ k ∈ ℕ → S ⁡ k ≤ sup ran ⁡ S ℝ * <
198 180 186 ltsubrpd ⊢ φ ∧ k ∈ ℕ → B − B 2 k < B
199 188 180 198 ltled ⊢ φ ∧ k ∈ ℕ → B − B 2 k ≤ B
200 179 188 189 180 197 199 le2addd ⊢ φ ∧ k ∈ ℕ → S ⁡ k + B - B 2 k ≤ sup ran ⁡ S ℝ * < + B
201 175 200 eqbrtrd ⊢ φ ∧ k ∈ ℕ → T ⁡ k ≤ sup ran ⁡ S ℝ * < + B
202 201 ralrimiva ⊢ φ → ∀ k ∈ ℕ T ⁡ k ≤ sup ran ⁡ S ℝ * < + B
203 ffn ⊢ T : ℕ ⟶ 0 +∞ → T Fn ℕ
204 breq1 ⊢ y = T ⁡ k → y ≤ sup ran ⁡ S ℝ * < + B ↔ T ⁡ k ≤ sup ran ⁡ S ℝ * < + B
205 204 ralrn ⊢ T Fn ℕ → ∀ y ∈ ran ⁡ T y ≤ sup ran ⁡ S ℝ * < + B ↔ ∀ k ∈ ℕ T ⁡ k ≤ sup ran ⁡ S ℝ * < + B
206 42 203 205 3syl ⊢ φ → ∀ y ∈ ran ⁡ T y ≤ sup ran ⁡ S ℝ * < + B ↔ ∀ k ∈ ℕ T ⁡ k ≤ sup ran ⁡ S ℝ * < + B
207 202 206 mpbird ⊢ φ → ∀ y ∈ ran ⁡ T y ≤ sup ran ⁡ S ℝ * < + B
208 supxrleub ⊢ ran ⁡ T ⊆ ℝ * ∧ sup ran ⁡ S ℝ * < + B ∈ ℝ * → sup ran ⁡ T ℝ * < ≤ sup ran ⁡ S ℝ * < + B ↔ ∀ y ∈ ran ⁡ T y ≤ sup ran ⁡ S ℝ * < + B
209 45 50 208 syl2anc ⊢ φ → sup ran ⁡ T ℝ * < ≤ sup ran ⁡ S ℝ * < + B ↔ ∀ y ∈ ran ⁡ T y ≤ sup ran ⁡ S ℝ * < + B
210 207 209 mpbird ⊢ φ → sup ran ⁡ T ℝ * < ≤ sup ran ⁡ S ℝ * < + B
211 12 47 50 112 210 xrletrd ⊢ φ → vol * ⁡ A ≤ sup ran ⁡ S ℝ * < + B