Metamath Proof Explorer


Theorem smfmullem1

Description: The multiplication of two sigma-measurable functions is measurable: this is the step (i) of the proof of Proposition 121E (d) of Fremlin1 p. 37 . (Contributed by Glauco Siliprandi, 26-Jun-2021)

Ref Expression
Hypotheses smfmullem1.a ⊢ φ → A ∈ ℝ
smfmullem1.u ⊢ φ → U ∈ ℝ
smfmullem1.v ⊢ φ → V ∈ ℝ
smfmullem1.l ⊢ φ → U ⁢ V < A
smfmullem1.x ⊢ X = A − U ⁢ V 1 + U + V
smfmullem1.y ⊢ Y = if 1 ≤ X 1 X
smfmullem1.p ⊢ φ → P ∈ U − Y U
smfmullem1.r ⊢ φ → R ∈ U U + Y
smfmullem1.s ⊢ φ → S ∈ V − Y V
smfmullem1.z ⊢ φ → Z ∈ V V + Y
smfmullem1.h ⊢ φ → H ∈ P R
smfmullem1.i ⊢ φ → I ∈ S Z
Assertion smfmullem1 ⊢ φ → H ⋅ I < A

Proof

Step Hyp Ref Expression
1 smfmullem1.a ⊢ φ → A ∈ ℝ
2 smfmullem1.u ⊢ φ → U ∈ ℝ
3 smfmullem1.v ⊢ φ → V ∈ ℝ
4 smfmullem1.l ⊢ φ → U ⁢ V < A
5 smfmullem1.x ⊢ X = A − U ⁢ V 1 + U + V
6 smfmullem1.y ⊢ Y = if 1 ≤ X 1 X
7 smfmullem1.p ⊢ φ → P ∈ U − Y U
8 smfmullem1.r ⊢ φ → R ∈ U U + Y
9 smfmullem1.s ⊢ φ → S ∈ V − Y V
10 smfmullem1.z ⊢ φ → Z ∈ V V + Y
11 smfmullem1.h ⊢ φ → H ∈ P R
12 smfmullem1.i ⊢ φ → I ∈ S Z
13 11 elioored ⊢ φ → H ∈ ℝ
14 13 recnd ⊢ φ → H ∈ ℂ
15 2 recnd ⊢ φ → U ∈ ℂ
16 12 elioored ⊢ φ → I ∈ ℝ
17 16 recnd ⊢ φ → I ∈ ℂ
18 3 recnd ⊢ φ → V ∈ ℂ
19 14 15 17 18 mulsubd ⊢ φ → H − U ⁢ I − V = H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U
20 14 15 18 subdird ⊢ φ → H − U ⁢ V = H ⁢ V − U ⁢ V
21 15 17 18 subdid ⊢ φ → U ⁢ I − V = U ⋅ I − U ⁢ V
22 20 21 oveq12d ⊢ φ → H − U ⁢ V + U ⁢ I − V = H ⁢ V − U ⁢ V + U ⋅ I - U ⁢ V
23 14 18 mulcld ⊢ φ → H ⁢ V ∈ ℂ
24 15 17 mulcld ⊢ φ → U ⋅ I ∈ ℂ
25 15 18 mulcld ⊢ φ → U ⁢ V ∈ ℂ
26 23 24 25 25 addsub4d ⊢ φ → H ⁢ V + U ⋅ I - U ⁢ V + U ⁢ V = H ⁢ V − U ⁢ V + U ⋅ I - U ⁢ V
27 26 eqcomd ⊢ φ → H ⁢ V − U ⁢ V + U ⋅ I - U ⁢ V = H ⁢ V + U ⋅ I - U ⁢ V + U ⁢ V
28 15 17 mulcomd ⊢ φ → U ⋅ I = I ⁢ U
29 28 oveq2d ⊢ φ → H ⁢ V + U ⋅ I = H ⁢ V + I ⁢ U
30 29 oveq1d ⊢ φ → H ⁢ V + U ⋅ I - U ⁢ V + U ⁢ V = H ⁢ V + I ⁢ U - U ⁢ V + U ⁢ V
31 22 27 30 3eqtrd ⊢ φ → H − U ⁢ V + U ⁢ I − V = H ⁢ V + I ⁢ U - U ⁢ V + U ⁢ V
32 19 31 oveq12d ⊢ φ → H − U ⁢ I − V + H − U ⁢ V + U ⁢ I − V = H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U + H ⁢ V + I ⁢ U - U ⁢ V + U ⁢ V
33 14 17 mulcld ⊢ φ → H ⋅ I ∈ ℂ
34 18 15 mulcld ⊢ φ → V ⁢ U ∈ ℂ
35 33 34 addcld ⊢ φ → H ⋅ I + V ⁢ U ∈ ℂ
36 17 15 mulcld ⊢ φ → I ⁢ U ∈ ℂ
37 23 36 addcld ⊢ φ → H ⁢ V + I ⁢ U ∈ ℂ
38 35 37 npcand ⊢ φ → H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U + H ⁢ V + I ⁢ U = H ⋅ I + V ⁢ U
39 18 15 mulcomd ⊢ φ → V ⁢ U = U ⁢ V
40 39 oveq2d ⊢ φ → H ⋅ I + V ⁢ U = H ⋅ I + U ⁢ V
41 38 40 eqtrd ⊢ φ → H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U + H ⁢ V + I ⁢ U = H ⋅ I + U ⁢ V
42 41 eqcomd ⊢ φ → H ⋅ I + U ⁢ V = H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U + H ⁢ V + I ⁢ U
43 42 oveq1d ⊢ φ → H ⋅ I + U ⁢ V - U ⁢ V + U ⁢ V = H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U + H ⁢ V + I ⁢ U - U ⁢ V + U ⁢ V
44 35 37 subcld ⊢ φ → H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U ∈ ℂ
45 25 25 addcld ⊢ φ → U ⁢ V + U ⁢ V ∈ ℂ
46 44 37 45 addsubassd ⊢ φ → H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U + H ⁢ V + I ⁢ U - U ⁢ V + U ⁢ V = H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U + H ⁢ V + I ⁢ U - U ⁢ V + U ⁢ V
47 43 46 eqtr2d ⊢ φ → H ⋅ I + V ⁢ U - H ⁢ V + I ⁢ U + H ⁢ V + I ⁢ U - U ⁢ V + U ⁢ V = H ⋅ I + U ⁢ V - U ⁢ V + U ⁢ V
48 33 25 25 pnpcan2d ⊢ φ → H ⋅ I + U ⁢ V - U ⁢ V + U ⁢ V = H ⋅ I − U ⁢ V
49 32 47 48 3eqtrrd ⊢ φ → H ⋅ I − U ⁢ V = H − U ⁢ I − V + H − U ⁢ V + U ⁢ I − V
50 13 2 jca ⊢ φ → H ∈ ℝ ∧ U ∈ ℝ
51 resubcl ⊢ H ∈ ℝ ∧ U ∈ ℝ → H − U ∈ ℝ
52 50 51 syl ⊢ φ → H − U ∈ ℝ
53 16 3 jca ⊢ φ → I ∈ ℝ ∧ V ∈ ℝ
54 resubcl ⊢ I ∈ ℝ ∧ V ∈ ℝ → I − V ∈ ℝ
55 53 54 syl ⊢ φ → I − V ∈ ℝ
56 52 55 jca ⊢ φ → H − U ∈ ℝ ∧ I − V ∈ ℝ
57 remulcl ⊢ H − U ∈ ℝ ∧ I − V ∈ ℝ → H − U ⁢ I − V ∈ ℝ
58 56 57 syl ⊢ φ → H − U ⁢ I − V ∈ ℝ
59 52 3 jca ⊢ φ → H − U ∈ ℝ ∧ V ∈ ℝ
60 remulcl ⊢ H − U ∈ ℝ ∧ V ∈ ℝ → H − U ⁢ V ∈ ℝ
61 59 60 syl ⊢ φ → H − U ⁢ V ∈ ℝ
62 2 55 jca ⊢ φ → U ∈ ℝ ∧ I − V ∈ ℝ
63 remulcl ⊢ U ∈ ℝ ∧ I − V ∈ ℝ → U ⁢ I − V ∈ ℝ
64 62 63 syl ⊢ φ → U ⁢ I − V ∈ ℝ
65 61 64 jca ⊢ φ → H − U ⁢ V ∈ ℝ ∧ U ⁢ I − V ∈ ℝ
66 readdcl ⊢ H − U ⁢ V ∈ ℝ ∧ U ⁢ I − V ∈ ℝ → H − U ⁢ V + U ⁢ I − V ∈ ℝ
67 65 66 syl ⊢ φ → H − U ⁢ V + U ⁢ I − V ∈ ℝ
68 58 67 jca ⊢ φ → H − U ⁢ I − V ∈ ℝ ∧ H − U ⁢ V + U ⁢ I − V ∈ ℝ
69 readdcl ⊢ H − U ⁢ I − V ∈ ℝ ∧ H − U ⁢ V + U ⁢ I − V ∈ ℝ → H − U ⁢ I − V + H − U ⁢ V + U ⁢ I − V ∈ ℝ
70 68 69 syl ⊢ φ → H − U ⁢ I − V + H − U ⁢ V + U ⁢ I − V ∈ ℝ
71 6 a1i ⊢ φ → Y = if 1 ≤ X 1 X
72 1rp ⊢ 1 ∈ ℝ +
73 72 a1i ⊢ φ → 1 ∈ ℝ +
74 5 a1i ⊢ φ → X = A − U ⁢ V 1 + U + V
75 2 3 remulcld ⊢ φ → U ⁢ V ∈ ℝ
76 difrp ⊢ U ⁢ V ∈ ℝ ∧ A ∈ ℝ → U ⁢ V < A ↔ A − U ⁢ V ∈ ℝ +
77 75 1 76 syl2anc ⊢ φ → U ⁢ V < A ↔ A − U ⁢ V ∈ ℝ +
78 4 77 mpbid ⊢ φ → A − U ⁢ V ∈ ℝ +
79 1red ⊢ φ → 1 ∈ ℝ
80 15 abscld ⊢ φ → U ∈ ℝ
81 18 abscld ⊢ φ → V ∈ ℝ
82 80 81 readdcld ⊢ φ → U + V ∈ ℝ
83 79 82 readdcld ⊢ φ → 1 + U + V ∈ ℝ
84 0re ⊢ 0 ∈ ℝ
85 84 a1i ⊢ φ → 0 ∈ ℝ
86 73 rpgt0d ⊢ φ → 0 < 1
87 15 absge0d ⊢ φ → 0 ≤ U
88 18 absge0d ⊢ φ → 0 ≤ V
89 80 81 addge01d ⊢ φ → 0 ≤ V ↔ U ≤ U + V
90 88 89 mpbid ⊢ φ → U ≤ U + V
91 85 80 82 87 90 letrd ⊢ φ → 0 ≤ U + V
92 79 82 addge01d ⊢ φ → 0 ≤ U + V ↔ 1 ≤ 1 + U + V
93 91 92 mpbid ⊢ φ → 1 ≤ 1 + U + V
94 85 79 83 86 93 ltletrd ⊢ φ → 0 < 1 + U + V
95 83 94 elrpd ⊢ φ → 1 + U + V ∈ ℝ +
96 78 95 rpdivcld ⊢ φ → A − U ⁢ V 1 + U + V ∈ ℝ +
97 74 96 eqeltrd ⊢ φ → X ∈ ℝ +
98 73 97 ifcld ⊢ φ → if 1 ≤ X 1 X ∈ ℝ +
99 71 98 eqeltrd ⊢ φ → Y ∈ ℝ +
100 99 rpred ⊢ φ → Y ∈ ℝ
101 resqcl ⊢ Y ∈ ℝ → Y 2 ∈ ℝ
102 100 101 syl ⊢ φ → Y 2 ∈ ℝ
103 100 81 remulcld ⊢ φ → Y ⁢ V ∈ ℝ
104 100 80 remulcld ⊢ φ → Y ⁢ U ∈ ℝ
105 103 104 jca ⊢ φ → Y ⁢ V ∈ ℝ ∧ Y ⁢ U ∈ ℝ
106 readdcl ⊢ Y ⁢ V ∈ ℝ ∧ Y ⁢ U ∈ ℝ → Y ⁢ V + Y ⁢ U ∈ ℝ
107 105 106 syl ⊢ φ → Y ⁢ V + Y ⁢ U ∈ ℝ
108 102 107 jca ⊢ φ → Y 2 ∈ ℝ ∧ Y ⁢ V + Y ⁢ U ∈ ℝ
109 readdcl ⊢ Y 2 ∈ ℝ ∧ Y ⁢ V + Y ⁢ U ∈ ℝ → Y 2 + Y ⁢ V + Y ⁢ U ∈ ℝ
110 108 109 syl ⊢ φ → Y 2 + Y ⁢ V + Y ⁢ U ∈ ℝ
111 1 75 resubcld ⊢ φ → A − U ⁢ V ∈ ℝ
112 100 resqcld ⊢ φ → Y 2 ∈ ℝ
113 103 104 readdcld ⊢ φ → Y ⁢ V + Y ⁢ U ∈ ℝ
114 19 44 eqeltrd ⊢ φ → H − U ⁢ I − V ∈ ℂ
115 114 abscld ⊢ φ → H − U ⁢ I − V ∈ ℝ
116 100 100 remulcld ⊢ φ → Y ⁢ Y ∈ ℝ
117 58 leabsd ⊢ φ → H − U ⁢ I − V ≤ H − U ⁢ I − V
118 52 recnd ⊢ φ → H − U ∈ ℂ
119 55 recnd ⊢ φ → I − V ∈ ℂ
120 118 119 absmuld ⊢ φ → H − U ⁢ I − V = H − U ⁢ I − V
121 118 abscld ⊢ φ → H − U ∈ ℝ
122 119 abscld ⊢ φ → I − V ∈ ℝ
123 118 absge0d ⊢ φ → 0 ≤ H − U
124 2 100 resubcld ⊢ φ → U − Y ∈ ℝ
125 7 elioored ⊢ φ → P ∈ ℝ
126 124 rexrd ⊢ φ → U − Y ∈ ℝ *
127 2 rexrd ⊢ φ → U ∈ ℝ *
128 ioogtlb ⊢ U − Y ∈ ℝ * ∧ U ∈ ℝ * ∧ P ∈ U − Y U → U − Y < P
129 126 127 7 128 syl3anc ⊢ φ → U − Y < P
130 125 rexrd ⊢ φ → P ∈ ℝ *
131 8 elioored ⊢ φ → R ∈ ℝ
132 131 rexrd ⊢ φ → R ∈ ℝ *
133 ioogtlb ⊢ P ∈ ℝ * ∧ R ∈ ℝ * ∧ H ∈ P R → P < H
134 130 132 11 133 syl3anc ⊢ φ → P < H
135 124 125 13 129 134 lttrd ⊢ φ → U − Y < H
136 2 100 readdcld ⊢ φ → U + Y ∈ ℝ
137 iooltub ⊢ P ∈ ℝ * ∧ R ∈ ℝ * ∧ H ∈ P R → H < R
138 130 132 11 137 syl3anc ⊢ φ → H < R
139 136 rexrd ⊢ φ → U + Y ∈ ℝ *
140 iooltub ⊢ U ∈ ℝ * ∧ U + Y ∈ ℝ * ∧ R ∈ U U + Y → R < U + Y
141 127 139 8 140 syl3anc ⊢ φ → R < U + Y
142 13 131 136 138 141 lttrd ⊢ φ → H < U + Y
143 135 142 jca ⊢ φ → U − Y < H ∧ H < U + Y
144 13 2 100 absdifltd ⊢ φ → H − U < Y ↔ U − Y < H ∧ H < U + Y
145 143 144 mpbird ⊢ φ → H − U < Y
146 119 absge0d ⊢ φ → 0 ≤ I − V
147 3 100 resubcld ⊢ φ → V − Y ∈ ℝ
148 9 elioored ⊢ φ → S ∈ ℝ
149 147 rexrd ⊢ φ → V − Y ∈ ℝ *
150 3 rexrd ⊢ φ → V ∈ ℝ *
151 149 150 9 ioogtlbd ⊢ φ → V − Y < S
152 148 rexrd ⊢ φ → S ∈ ℝ *
153 10 elioored ⊢ φ → Z ∈ ℝ
154 153 rexrd ⊢ φ → Z ∈ ℝ *
155 152 154 12 ioogtlbd ⊢ φ → S < I
156 147 148 16 151 155 lttrd ⊢ φ → V − Y < I
157 3 100 readdcld ⊢ φ → V + Y ∈ ℝ
158 152 154 12 iooltubd ⊢ φ → I < Z
159 157 rexrd ⊢ φ → V + Y ∈ ℝ *
160 150 159 10 iooltubd ⊢ φ → Z < V + Y
161 16 153 157 158 160 lttrd ⊢ φ → I < V + Y
162 156 161 jca ⊢ φ → V − Y < I ∧ I < V + Y
163 16 3 100 absdifltd ⊢ φ → I − V < Y ↔ V − Y < I ∧ I < V + Y
164 162 163 mpbird ⊢ φ → I − V < Y
165 121 100 122 100 123 145 146 164 ltmul12ad ⊢ φ → H − U ⁢ I − V < Y ⁢ Y
166 120 165 eqbrtrd ⊢ φ → H − U ⁢ I − V < Y ⁢ Y
167 58 115 116 117 166 lelttrd ⊢ φ → H − U ⁢ I − V < Y ⁢ Y
168 100 recnd ⊢ φ → Y ∈ ℂ
169 168 sqvald ⊢ φ → Y 2 = Y ⁢ Y
170 169 eqcomd ⊢ φ → Y ⁢ Y = Y 2
171 167 170 breqtrd ⊢ φ → H − U ⁢ I − V < Y 2
172 61 recnd ⊢ φ → H − U ⁢ V ∈ ℂ
173 172 abscld ⊢ φ → H − U ⁢ V ∈ ℝ
174 61 leabsd ⊢ φ → H − U ⁢ V ≤ H − U ⁢ V
175 118 18 absmuld ⊢ φ → H − U ⁢ V = H − U ⁢ V
176 121 100 145 ltled ⊢ φ → H − U ≤ Y
177 121 100 81 88 176 lemul1ad ⊢ φ → H − U ⁢ V ≤ Y ⁢ V
178 175 177 eqbrtrd ⊢ φ → H − U ⁢ V ≤ Y ⁢ V
179 61 173 103 174 178 letrd ⊢ φ → H − U ⁢ V ≤ Y ⁢ V
180 64 recnd ⊢ φ → U ⁢ I − V ∈ ℂ
181 180 abscld ⊢ φ → U ⁢ I − V ∈ ℝ
182 64 leabsd ⊢ φ → U ⁢ I − V ≤ U ⁢ I − V
183 15 119 absmuld ⊢ φ → U ⁢ I − V = U ⁢ I − V
184 80 recnd ⊢ φ → U ∈ ℂ
185 122 recnd ⊢ φ → I − V ∈ ℂ
186 184 185 mulcomd ⊢ φ → U ⁢ I − V = I − V ⁢ U
187 183 186 eqtrd ⊢ φ → U ⁢ I − V = I − V ⁢ U
188 122 100 164 ltled ⊢ φ → I − V ≤ Y
189 122 100 80 87 188 lemul1ad ⊢ φ → I − V ⁢ U ≤ Y ⁢ U
190 187 189 eqbrtrd ⊢ φ → U ⁢ I − V ≤ Y ⁢ U
191 64 181 104 182 190 letrd ⊢ φ → U ⁢ I − V ≤ Y ⁢ U
192 61 64 103 104 179 191 le2addd ⊢ φ → H − U ⁢ V + U ⁢ I − V ≤ Y ⁢ V + Y ⁢ U
193 58 67 112 113 171 192 ltleaddd ⊢ φ → H − U ⁢ I − V + H − U ⁢ V + U ⁢ I − V < Y 2 + Y ⁢ V + Y ⁢ U
194 100 107 readdcld ⊢ φ → Y + Y ⁢ V + Y ⁢ U ∈ ℝ
195 85 121 100 123 176 letrd ⊢ φ → 0 ≤ Y
196 97 rpred ⊢ φ → X ∈ ℝ
197 min1 ⊢ 1 ∈ ℝ ∧ X ∈ ℝ → if 1 ≤ X 1 X ≤ 1
198 79 196 197 syl2anc ⊢ φ → if 1 ≤ X 1 X ≤ 1
199 6 198 eqbrtrid ⊢ φ → Y ≤ 1
200 85 79 100 195 199 eliccd ⊢ φ → Y ∈ 0 1
201 100 sqrlearg ⊢ φ → Y 2 ≤ Y ↔ Y ∈ 0 1
202 200 201 mpbird ⊢ φ → Y 2 ≤ Y
203 102 100 107 202 leadd1dd ⊢ φ → Y 2 + Y ⁢ V + Y ⁢ U ≤ Y + Y ⁢ V + Y ⁢ U
204 1cnd ⊢ φ → 1 ∈ ℂ
205 81 recnd ⊢ φ → V ∈ ℂ
206 205 184 addcld ⊢ φ → V + U ∈ ℂ
207 168 204 206 adddid ⊢ φ → Y ⁢ 1 + V + U = Y ⋅ 1 + Y ⁢ V + U
208 168 mulridd ⊢ φ → Y ⋅ 1 = Y
209 168 205 184 adddid ⊢ φ → Y ⁢ V + U = Y ⁢ V + Y ⁢ U
210 208 209 oveq12d ⊢ φ → Y ⋅ 1 + Y ⁢ V + U = Y + Y ⁢ V + Y ⁢ U
211 207 210 eqtr2d ⊢ φ → Y + Y ⁢ V + Y ⁢ U = Y ⁢ 1 + V + U
212 81 80 readdcld ⊢ φ → V + U ∈ ℝ
213 79 212 readdcld ⊢ φ → 1 + V + U ∈ ℝ
214 81 80 addge01d ⊢ φ → 0 ≤ U ↔ V ≤ V + U
215 87 214 mpbid ⊢ φ → V ≤ V + U
216 85 81 212 88 215 letrd ⊢ φ → 0 ≤ V + U
217 79 212 addge01d ⊢ φ → 0 ≤ V + U ↔ 1 ≤ 1 + V + U
218 216 217 mpbid ⊢ φ → 1 ≤ 1 + V + U
219 85 79 213 86 218 ltletrd ⊢ φ → 0 < 1 + V + U
220 85 213 219 ltled ⊢ φ → 0 ≤ 1 + V + U
221 min2 ⊢ 1 ∈ ℝ ∧ X ∈ ℝ → if 1 ≤ X 1 X ≤ X
222 79 196 221 syl2anc ⊢ φ → if 1 ≤ X 1 X ≤ X
223 71 222 eqbrtrd ⊢ φ → Y ≤ X
224 100 196 213 220 223 lemul1ad ⊢ φ → Y ⁢ 1 + V + U ≤ X ⁢ 1 + V + U
225 74 oveq1d ⊢ φ → X ⁢ 1 + V + U = A − U ⁢ V 1 + U + V ⁢ 1 + V + U
226 184 205 addcomd ⊢ φ → U + V = V + U
227 226 oveq2d ⊢ φ → 1 + U + V = 1 + V + U
228 227 oveq2d ⊢ φ → A − U ⁢ V 1 + U + V = A − U ⁢ V 1 + V + U
229 228 oveq1d ⊢ φ → A − U ⁢ V 1 + U + V ⁢ 1 + V + U = A − U ⁢ V 1 + V + U ⁢ 1 + V + U
230 111 recnd ⊢ φ → A − U ⁢ V ∈ ℂ
231 204 206 addcld ⊢ φ → 1 + V + U ∈ ℂ
232 85 219 gtned ⊢ φ → 1 + V + U ≠ 0
233 230 231 232 divcan1d ⊢ φ → A − U ⁢ V 1 + V + U ⁢ 1 + V + U = A − U ⁢ V
234 225 229 233 3eqtrd ⊢ φ → X ⁢ 1 + V + U = A − U ⁢ V
235 224 234 breqtrd ⊢ φ → Y ⁢ 1 + V + U ≤ A − U ⁢ V
236 211 235 eqbrtrd ⊢ φ → Y + Y ⁢ V + Y ⁢ U ≤ A − U ⁢ V
237 110 194 111 203 236 letrd ⊢ φ → Y 2 + Y ⁢ V + Y ⁢ U ≤ A − U ⁢ V
238 70 110 111 193 237 ltletrd ⊢ φ → H − U ⁢ I − V + H − U ⁢ V + U ⁢ I − V < A − U ⁢ V
239 49 238 eqbrtrd ⊢ φ → H ⋅ I − U ⁢ V < A − U ⁢ V
240 13 16 remulcld ⊢ φ → H ⋅ I ∈ ℝ
241 240 1 75 ltsub1d ⊢ φ → H ⋅ I < A ↔ H ⋅ I − U ⁢ V < A − U ⁢ V
242 239 241 mpbird ⊢ φ → H ⋅ I < A