Users' Mathboxes Mathbox for Brendan Leahy < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ftc1anclem1 Structured version   Visualization version   GIF version

Theorem ftc1anclem1 38720
Description: Lemma for ftc1anc 38728- the absolute value of a real-valued measurable function is measurable. Would be trivial with cncombf 25988, but this proof avoids ax-cc 10520. (Contributed by Brendan Leahy, 18-Jun-2018.)
Assertion
Ref Expression
ftc1anclem1 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → (abs ∘ 𝐹) ∈ MblFn)

Proof of Theorem ftc1anclem1
Dummy variables 𝑥 𝑡 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ffvelcdm 7086 . . . . 5 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → (𝐹‘𝑡) ∈ ℝ)
21recnd 11344 . . . 4 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → (𝐹‘𝑡) ∈ ℂ)
3 id 23 . . . . 5 (𝐹:𝐴⟶ℝ → 𝐹:𝐴⟶ℝ)
43feqmptd 6958 . . . 4 (𝐹:𝐴⟶ℝ → 𝐹 = (𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)))
5 absf 15514 . . . . . 6 abs:ℂ⟶ℝ
65a1i 11 . . . . 5 (𝐹:𝐴⟶ℝ → abs:ℂ⟶ℝ)
76feqmptd 6958 . . . 4 (𝐹:𝐴⟶ℝ → abs = (𝑥 ∈ ℂ ↦ (abs‘𝑥)))
8 fveq2 6890 . . . 4 (𝑥 = (𝐹‘𝑡) → (abs‘𝑥) = (abs‘(𝐹‘𝑡)))
92, 4, 7, 8fmptco 7135 . . 3 (𝐹:𝐴⟶ℝ → (abs ∘ 𝐹) = (𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))))
109adantr 486 . 2 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → (abs ∘ 𝐹) = (𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))))
112abscld 15615 . . . . 5 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → (abs‘(𝐹‘𝑡)) ∈ ℝ)
1211fmpttd 7120 . . . 4 (𝐹:𝐴⟶ℝ → (𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))):𝐴⟶ℝ)
1312adantr 486 . . 3 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → (𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))):𝐴⟶ℝ)
14 fdm 6724 . . . . 5 (𝐹:𝐴⟶ℝ → dom 𝐹 = 𝐴)
1514adantr 486 . . . 4 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → dom 𝐹 = 𝐴)
16 mbfdm 25956 . . . . 5 (𝐹 ∈ MblFn → dom 𝐹 ∈ dom vol)
1716adantl 487 . . . 4 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → dom 𝐹 ∈ dom vol)
1815, 17eqeltrrd 2861 . . 3 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → 𝐴 ∈ dom vol)
19 rexr 11362 . . . . . . . . . . . . 13 (𝑥 ∈ ℝ → 𝑥 ∈ ℝ*)
20 elioopnf 13581 . . . . . . . . . . . . 13 (𝑥 ∈ ℝ* → ((abs‘(𝐹‘𝑡)) ∈ (𝑥(,)+∞) ↔ ((abs‘(𝐹‘𝑡)) ∈ ℝ ∧ 𝑥 < (abs‘(𝐹‘𝑡)))))
2119, 20syl 18 . . . . . . . . . . . 12 (𝑥 ∈ ℝ → ((abs‘(𝐹‘𝑡)) ∈ (𝑥(,)+∞) ↔ ((abs‘(𝐹‘𝑡)) ∈ ℝ ∧ 𝑥 < (abs‘(𝐹‘𝑡)))))
2211biantrurd 542 . . . . . . . . . . . . 13 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → (𝑥 < (abs‘(𝐹‘𝑡)) ↔ ((abs‘(𝐹‘𝑡)) ∈ ℝ ∧ 𝑥 < (abs‘(𝐹‘𝑡)))))
2322bicomd 226 . . . . . . . . . . . 12 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → (((abs‘(𝐹‘𝑡)) ∈ ℝ ∧ 𝑥 < (abs‘(𝐹‘𝑡))) ↔ 𝑥 < (abs‘(𝐹‘𝑡))))
2421, 23sylan9bbr 520 . . . . . . . . . . 11 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((abs‘(𝐹‘𝑡)) ∈ (𝑥(,)+∞) ↔ 𝑥 < (abs‘(𝐹‘𝑡))))
25 ltnle 11396 . . . . . . . . . . . . 13 ((𝑥 ∈ ℝ ∧ (abs‘(𝐹‘𝑡)) ∈ ℝ) → (𝑥 < (abs‘(𝐹‘𝑡)) ↔ ¬ (abs‘(𝐹‘𝑡)) ≤ 𝑥))
2625ancoms 464 . . . . . . . . . . . 12 (((abs‘(𝐹‘𝑡)) ∈ ℝ ∧ 𝑥 ∈ ℝ) → (𝑥 < (abs‘(𝐹‘𝑡)) ↔ ¬ (abs‘(𝐹‘𝑡)) ≤ 𝑥))
2711, 26sylan 592 . . . . . . . . . . 11 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → (𝑥 < (abs‘(𝐹‘𝑡)) ↔ ¬ (abs‘(𝐹‘𝑡)) ≤ 𝑥))
28 absle 15492 . . . . . . . . . . . . . . 15 (((𝐹‘𝑡) ∈ ℝ ∧ 𝑥 ∈ ℝ) → ((abs‘(𝐹‘𝑡)) ≤ 𝑥 ↔ ( -𝑥 ≤ (𝐹‘𝑡) ∧ (𝐹‘𝑡) ≤ 𝑥)))
291, 28sylan 592 . . . . . . . . . . . . . 14 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((abs‘(𝐹‘𝑡)) ≤ 𝑥 ↔ ( -𝑥 ≤ (𝐹‘𝑡) ∧ (𝐹‘𝑡) ≤ 𝑥)))
30 renegcl 11628 . . . . . . . . . . . . . . . . 17 (𝑥 ∈ ℝ → -𝑥 ∈ ℝ)
31 lenlt 11395 . . . . . . . . . . . . . . . . 17 (( -𝑥 ∈ ℝ ∧ (𝐹‘𝑡) ∈ ℝ) → ( -𝑥 ≤ (𝐹‘𝑡) ↔ ¬ (𝐹‘𝑡) < -𝑥))
3230, 1, 31syl2anr 609 . . . . . . . . . . . . . . . 16 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ( -𝑥 ≤ (𝐹‘𝑡) ↔ ¬ (𝐹‘𝑡) < -𝑥))
331biantrurd 542 . . . . . . . . . . . . . . . . . 18 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → ((𝐹‘𝑡) < -𝑥 ↔ ((𝐹‘𝑡) ∈ ℝ ∧ (𝐹‘𝑡) < -𝑥)))
3430rexrd 11366 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ ℝ → -𝑥 ∈ ℝ*)
35 elioomnf 13582 . . . . . . . . . . . . . . . . . . . 20 ( -𝑥 ∈ ℝ* → ((𝐹‘𝑡) ∈ (-∞(,) -𝑥) ↔ ((𝐹‘𝑡) ∈ ℝ ∧ (𝐹‘𝑡) < -𝑥)))
3634, 35syl 18 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ ℝ → ((𝐹‘𝑡) ∈ (-∞(,) -𝑥) ↔ ((𝐹‘𝑡) ∈ ℝ ∧ (𝐹‘𝑡) < -𝑥)))
3736bicomd 226 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ ℝ → (((𝐹‘𝑡) ∈ ℝ ∧ (𝐹‘𝑡) < -𝑥) ↔ (𝐹‘𝑡) ∈ (-∞(,) -𝑥)))
3833, 37sylan9bb 519 . . . . . . . . . . . . . . . . 17 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((𝐹‘𝑡) < -𝑥 ↔ (𝐹‘𝑡) ∈ (-∞(,) -𝑥)))
3938notbid 321 . . . . . . . . . . . . . . . 16 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → (¬ (𝐹‘𝑡) < -𝑥 ↔ ¬ (𝐹‘𝑡) ∈ (-∞(,) -𝑥)))
4032, 39bitrd 282 . . . . . . . . . . . . . . 15 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ( -𝑥 ≤ (𝐹‘𝑡) ↔ ¬ (𝐹‘𝑡) ∈ (-∞(,) -𝑥)))
41 lenlt 11395 . . . . . . . . . . . . . . . . 17 (((𝐹‘𝑡) ∈ ℝ ∧ 𝑥 ∈ ℝ) → ((𝐹‘𝑡) ≤ 𝑥 ↔ ¬ 𝑥 < (𝐹‘𝑡)))
421, 41sylan 592 . . . . . . . . . . . . . . . 16 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((𝐹‘𝑡) ≤ 𝑥 ↔ ¬ 𝑥 < (𝐹‘𝑡)))
431biantrurd 542 . . . . . . . . . . . . . . . . . 18 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → (𝑥 < (𝐹‘𝑡) ↔ ((𝐹‘𝑡) ∈ ℝ ∧ 𝑥 < (𝐹‘𝑡))))
44 elioopnf 13581 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ ℝ* → ((𝐹‘𝑡) ∈ (𝑥(,)+∞) ↔ ((𝐹‘𝑡) ∈ ℝ ∧ 𝑥 < (𝐹‘𝑡))))
4519, 44syl 18 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ ℝ → ((𝐹‘𝑡) ∈ (𝑥(,)+∞) ↔ ((𝐹‘𝑡) ∈ ℝ ∧ 𝑥 < (𝐹‘𝑡))))
4645bicomd 226 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ ℝ → (((𝐹‘𝑡) ∈ ℝ ∧ 𝑥 < (𝐹‘𝑡)) ↔ (𝐹‘𝑡) ∈ (𝑥(,)+∞)))
4743, 46sylan9bb 519 . . . . . . . . . . . . . . . . 17 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → (𝑥 < (𝐹‘𝑡) ↔ (𝐹‘𝑡) ∈ (𝑥(,)+∞)))
4847notbid 321 . . . . . . . . . . . . . . . 16 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → (¬ 𝑥 < (𝐹‘𝑡) ↔ ¬ (𝐹‘𝑡) ∈ (𝑥(,)+∞)))
4942, 48bitrd 282 . . . . . . . . . . . . . . 15 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((𝐹‘𝑡) ≤ 𝑥 ↔ ¬ (𝐹‘𝑡) ∈ (𝑥(,)+∞)))
5040, 49anbi12d 644 . . . . . . . . . . . . . 14 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → (( -𝑥 ≤ (𝐹‘𝑡) ∧ (𝐹‘𝑡) ≤ 𝑥) ↔ (¬ (𝐹‘𝑡) ∈ (-∞(,) -𝑥) ∧ ¬ (𝐹‘𝑡) ∈ (𝑥(,)+∞))))
5129, 50bitrd 282 . . . . . . . . . . . . 13 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((abs‘(𝐹‘𝑡)) ≤ 𝑥 ↔ (¬ (𝐹‘𝑡) ∈ (-∞(,) -𝑥) ∧ ¬ (𝐹‘𝑡) ∈ (𝑥(,)+∞))))
5251notbid 321 . . . . . . . . . . . 12 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → (¬ (abs‘(𝐹‘𝑡)) ≤ 𝑥 ↔ ¬ (¬ (𝐹‘𝑡) ∈ (-∞(,) -𝑥) ∧ ¬ (𝐹‘𝑡) ∈ (𝑥(,)+∞))))
53 elun 4151 . . . . . . . . . . . . 13 ((𝐹‘𝑡) ∈ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞)) ↔ ((𝐹‘𝑡) ∈ (-∞(,) -𝑥) ∨ (𝐹‘𝑡) ∈ (𝑥(,)+∞)))
54 oran 1005 . . . . . . . . . . . . 13 (((𝐹‘𝑡) ∈ (-∞(,) -𝑥) ∨ (𝐹‘𝑡) ∈ (𝑥(,)+∞)) ↔ ¬ (¬ (𝐹‘𝑡) ∈ (-∞(,) -𝑥) ∧ ¬ (𝐹‘𝑡) ∈ (𝑥(,)+∞)))
5553, 54bitri 278 . . . . . . . . . . . 12 ((𝐹‘𝑡) ∈ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞)) ↔ ¬ (¬ (𝐹‘𝑡) ∈ (-∞(,) -𝑥) ∧ ¬ (𝐹‘𝑡) ∈ (𝑥(,)+∞)))
5652, 55bitr4di 292 . . . . . . . . . . 11 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → (¬ (abs‘(𝐹‘𝑡)) ≤ 𝑥 ↔ (𝐹‘𝑡) ∈ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))))
5724, 27, 563bitrd 308 . . . . . . . . . 10 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((abs‘(𝐹‘𝑡)) ∈ (𝑥(,)+∞) ↔ (𝐹‘𝑡) ∈ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))))
5857an32s 665 . . . . . . . . 9 (((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) ∧ 𝑡 ∈ 𝐴) → ((abs‘(𝐹‘𝑡)) ∈ (𝑥(,)+∞) ↔ (𝐹‘𝑡) ∈ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))))
5958rabbidva 3418 . . . . . . . 8 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → {𝑡 ∈ 𝐴 ∣ (abs‘(𝐹‘𝑡)) ∈ (𝑥(,)+∞)} = {𝑡 ∈ 𝐴 ∣ (𝐹‘𝑡) ∈ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))})
60 eqid 2760 . . . . . . . . 9 (𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) = (𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡)))
6160mptpreima 6242 . . . . . . . 8 (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (𝑥(,)+∞)) = {𝑡 ∈ 𝐴 ∣ (abs‘(𝐹‘𝑡)) ∈ (𝑥(,)+∞)}
62 eqid 2760 . . . . . . . . 9 (𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)) = (𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡))
6362mptpreima 6242 . . . . . . . 8 (◡(𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)) “ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))) = {𝑡 ∈ 𝐴 ∣ (𝐹‘𝑡) ∈ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))}
6459, 61, 633eqtr4g 2820 . . . . . . 7 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (𝑥(,)+∞)) = (◡(𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)) “ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))))
65 simpl 488 . . . . . . . . . 10 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → 𝐹:𝐴⟶ℝ)
6665feqmptd 6958 . . . . . . . . 9 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → 𝐹 = (𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)))
6766cnveqd 5854 . . . . . . . 8 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → ◡𝐹 = ◡(𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)))
6867imaeq1d 6053 . . . . . . 7 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → (◡𝐹 “ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))) = (◡(𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)) “ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))))
6964, 68eqtr4d 2798 . . . . . 6 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (𝑥(,)+∞)) = (◡𝐹 “ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))))
70 imaundi 6143 . . . . . 6 (◡𝐹 “ ((-∞(,) -𝑥) ∪ (𝑥(,)+∞))) = ((◡𝐹 “ (-∞(,) -𝑥)) ∪ (◡𝐹 “ (𝑥(,)+∞)))
7169, 70eqtrdi 2811 . . . . 5 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (𝑥(,)+∞)) = ((◡𝐹 “ (-∞(,) -𝑥)) ∪ (◡𝐹 “ (𝑥(,)+∞))))
7271adantlr 728 . . . 4 (((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) ∧ 𝑥 ∈ ℝ) → (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (𝑥(,)+∞)) = ((◡𝐹 “ (-∞(,) -𝑥)) ∪ (◡𝐹 “ (𝑥(,)+∞))))
73 mbfima 25960 . . . . . . 7 ((𝐹 ∈ MblFn ∧ 𝐹:𝐴⟶ℝ) → (◡𝐹 “ (-∞(,) -𝑥)) ∈ dom vol)
74 mbfima 25960 . . . . . . 7 ((𝐹 ∈ MblFn ∧ 𝐹:𝐴⟶ℝ) → (◡𝐹 “ (𝑥(,)+∞)) ∈ dom vol)
75 unmbl 25867 . . . . . . 7 (((◡𝐹 “ (-∞(,) -𝑥)) ∈ dom vol ∧ (◡𝐹 “ (𝑥(,)+∞)) ∈ dom vol) → ((◡𝐹 “ (-∞(,) -𝑥)) ∪ (◡𝐹 “ (𝑥(,)+∞))) ∈ dom vol)
7673, 74, 75syl2anc 596 . . . . . 6 ((𝐹 ∈ MblFn ∧ 𝐹:𝐴⟶ℝ) → ((◡𝐹 “ (-∞(,) -𝑥)) ∪ (◡𝐹 “ (𝑥(,)+∞))) ∈ dom vol)
7776ancoms 464 . . . . 5 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → ((◡𝐹 “ (-∞(,) -𝑥)) ∪ (◡𝐹 “ (𝑥(,)+∞))) ∈ dom vol)
7877adantr 486 . . . 4 (((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) ∧ 𝑥 ∈ ℝ) → ((◡𝐹 “ (-∞(,) -𝑥)) ∪ (◡𝐹 “ (𝑥(,)+∞))) ∈ dom vol)
7972, 78eqeltrd 2860 . . 3 (((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) ∧ 𝑥 ∈ ℝ) → (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (𝑥(,)+∞)) ∈ dom vol)
80 abslt 15491 . . . . . . . . . . 11 (((𝐹‘𝑡) ∈ ℝ ∧ 𝑥 ∈ ℝ) → ((abs‘(𝐹‘𝑡)) < 𝑥 ↔ ( -𝑥 < (𝐹‘𝑡) ∧ (𝐹‘𝑡) < 𝑥)))
811, 80sylan 592 . . . . . . . . . 10 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((abs‘(𝐹‘𝑡)) < 𝑥 ↔ ( -𝑥 < (𝐹‘𝑡) ∧ (𝐹‘𝑡) < 𝑥)))
82 elioomnf 13582 . . . . . . . . . . . 12 (𝑥 ∈ ℝ* → ((abs‘(𝐹‘𝑡)) ∈ (-∞(,)𝑥) ↔ ((abs‘(𝐹‘𝑡)) ∈ ℝ ∧ (abs‘(𝐹‘𝑡)) < 𝑥)))
8319, 82syl 18 . . . . . . . . . . 11 (𝑥 ∈ ℝ → ((abs‘(𝐹‘𝑡)) ∈ (-∞(,)𝑥) ↔ ((abs‘(𝐹‘𝑡)) ∈ ℝ ∧ (abs‘(𝐹‘𝑡)) < 𝑥)))
8411biantrurd 542 . . . . . . . . . . . 12 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → ((abs‘(𝐹‘𝑡)) < 𝑥 ↔ ((abs‘(𝐹‘𝑡)) ∈ ℝ ∧ (abs‘(𝐹‘𝑡)) < 𝑥)))
8584bicomd 226 . . . . . . . . . . 11 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → (((abs‘(𝐹‘𝑡)) ∈ ℝ ∧ (abs‘(𝐹‘𝑡)) < 𝑥) ↔ (abs‘(𝐹‘𝑡)) < 𝑥))
8683, 85sylan9bbr 520 . . . . . . . . . 10 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((abs‘(𝐹‘𝑡)) ∈ (-∞(,)𝑥) ↔ (abs‘(𝐹‘𝑡)) < 𝑥))
8734, 19jca 521 . . . . . . . . . . 11 (𝑥 ∈ ℝ → ( -𝑥 ∈ ℝ* ∧ 𝑥 ∈ ℝ*))
881rexrd 11366 . . . . . . . . . . 11 ((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) → (𝐹‘𝑡) ∈ ℝ*)
89 elioo5 13541 . . . . . . . . . . . 12 (( -𝑥 ∈ ℝ* ∧ 𝑥 ∈ ℝ* ∧ (𝐹‘𝑡) ∈ ℝ*) → ((𝐹‘𝑡) ∈ ( -𝑥(,)𝑥) ↔ ( -𝑥 < (𝐹‘𝑡) ∧ (𝐹‘𝑡) < 𝑥)))
90893expa 1136 . . . . . . . . . . 11 ((( -𝑥 ∈ ℝ* ∧ 𝑥 ∈ ℝ*) ∧ (𝐹‘𝑡) ∈ ℝ*) → ((𝐹‘𝑡) ∈ ( -𝑥(,)𝑥) ↔ ( -𝑥 < (𝐹‘𝑡) ∧ (𝐹‘𝑡) < 𝑥)))
9187, 88, 90syl2anr 609 . . . . . . . . . 10 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((𝐹‘𝑡) ∈ ( -𝑥(,)𝑥) ↔ ( -𝑥 < (𝐹‘𝑡) ∧ (𝐹‘𝑡) < 𝑥)))
9281, 86, 913bitr4d 314 . . . . . . . . 9 (((𝐹:𝐴⟶ℝ ∧ 𝑡 ∈ 𝐴) ∧ 𝑥 ∈ ℝ) → ((abs‘(𝐹‘𝑡)) ∈ (-∞(,)𝑥) ↔ (𝐹‘𝑡) ∈ ( -𝑥(,)𝑥)))
9392an32s 665 . . . . . . . 8 (((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) ∧ 𝑡 ∈ 𝐴) → ((abs‘(𝐹‘𝑡)) ∈ (-∞(,)𝑥) ↔ (𝐹‘𝑡) ∈ ( -𝑥(,)𝑥)))
9493rabbidva 3418 . . . . . . 7 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → {𝑡 ∈ 𝐴 ∣ (abs‘(𝐹‘𝑡)) ∈ (-∞(,)𝑥)} = {𝑡 ∈ 𝐴 ∣ (𝐹‘𝑡) ∈ ( -𝑥(,)𝑥)})
9560mptpreima 6242 . . . . . . 7 (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (-∞(,)𝑥)) = {𝑡 ∈ 𝐴 ∣ (abs‘(𝐹‘𝑡)) ∈ (-∞(,)𝑥)}
9662mptpreima 6242 . . . . . . 7 (◡(𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)) “ ( -𝑥(,)𝑥)) = {𝑡 ∈ 𝐴 ∣ (𝐹‘𝑡) ∈ ( -𝑥(,)𝑥)}
9794, 95, 963eqtr4g 2820 . . . . . 6 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (-∞(,)𝑥)) = (◡(𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)) “ ( -𝑥(,)𝑥)))
9867imaeq1d 6053 . . . . . 6 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → (◡𝐹 “ ( -𝑥(,)𝑥)) = (◡(𝑡 ∈ 𝐴 ↦ (𝐹‘𝑡)) “ ( -𝑥(,)𝑥)))
9997, 98eqtr4d 2798 . . . . 5 ((𝐹:𝐴⟶ℝ ∧ 𝑥 ∈ ℝ) → (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (-∞(,)𝑥)) = (◡𝐹 “ ( -𝑥(,)𝑥)))
10099adantlr 728 . . . 4 (((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) ∧ 𝑥 ∈ ℝ) → (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (-∞(,)𝑥)) = (◡𝐹 “ ( -𝑥(,)𝑥)))
101 mbfima 25960 . . . . . 6 ((𝐹 ∈ MblFn ∧ 𝐹:𝐴⟶ℝ) → (◡𝐹 “ ( -𝑥(,)𝑥)) ∈ dom vol)
102101ancoms 464 . . . . 5 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → (◡𝐹 “ ( -𝑥(,)𝑥)) ∈ dom vol)
103102adantr 486 . . . 4 (((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) ∧ 𝑥 ∈ ℝ) → (◡𝐹 “ ( -𝑥(,)𝑥)) ∈ dom vol)
104100, 103eqeltrd 2860 . . 3 (((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) ∧ 𝑥 ∈ ℝ) → (◡(𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) “ (-∞(,)𝑥)) ∈ dom vol)
10513, 18, 79, 104ismbf2d 25970 . 2 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → (𝑡 ∈ 𝐴 ↦ (abs‘(𝐹‘𝑡))) ∈ MblFn)
10610, 105eqeltrd 2860 1 ((𝐹:𝐴⟶ℝ ∧ 𝐹 ∈ MblFn) → (abs ∘ 𝐹) ∈ MblFn)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   = wceq 1569   ∈ wcel 2144  {crab 3412   ∪ cun 4148   class class class wbr 5102   ↦ cmpt 5185  ◡ccnv 5650  dom cdm 5651   “ cima 5654   ∘ ccom 5655  ⟶wf 6539  ‘cfv 6543  (class class class)co 7424  ℂcc 11205  ℝcr 11206  +∞cpnf 11347  -∞cmnf 11348  ℝ*cxr 11349   < clt 11350   ≤ cle 11351   -cneg 11549  (,)cioo 13483  abscabs 15410  volcvol 25793  MblFncmbf 25944
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5327  ax-pr 5391  ax-un 7755  ax-inf2 9649  ax-cnex 11263  ax-resscn 11264  ax-1cn 11265  ax-icn 11266  ax-addcl 11267  ax-addrcl 11268  ax-mulcl 11269  ax-mulrcl 11270  ax-mulcom 11271  ax-addass 11272  ax-mulass 11273  ax-distr 11274  ax-i2m1 11275  ax-1ne0 11276  ax-1rid 11277  ax-rnegex 11278  ax-rrecex 11279  ax-cnre 11280  ax-pre-lttri 11281  ax-pre-lttrn 11282  ax-pre-ltadd 11283  ax-pre-mulgt0 11284  ax-pre-sup 11285
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3848  df-ss 3897  df-pss 4013  df-dif 4046  df-in 4090  df-un 4150  df-nul 4278  df-if 4482  df-pw 4558  df-sn 4585  df-pr 4587  df-op 4835  df-uni 4867  df-int 4907  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6307  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6497  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7381  df-ov 7427  df-oprab 7428  df-mpo 7429  df-of 7697  df-om 7882  df-1st 8005  df-2nd 8006  df-frecs 8306  df-wrecs 8337  df-recs 8386  df-rdg 8425  df-1o 8483  df-2o 8484  df-er 8724  df-map 8856  df-pm 8857  df-en 8981  df-dom 8982  df-sdom 8983  df-fin 8984  df-sup 9441  df-inf 9442  df-oi 9511  df-dju 9989  df-card 10027  df-pnf 11352  df-mnf 11353  df-xr 11354  df-ltxr 11355  df-le 11356  df-sub 11550  df-neg 11551  df-div 11981  df-nn 12343  df-2 12412  df-3 12413  df-n0 12614  df-z 12701  df-uz 12973  df-q 13083  df-rp 13128  df-xadd 13249  df-ioo 13487  df-ico 13489  df-icc 13490  df-fz 13647  df-fzo 13796  df-fl 13939  df-seq 14152  df-exp 14212  df-hash 14482  df-cj 15275  df-re 15276  df-im 15277  df-sqrt 15411  df-abs 15412  df-clim 15664  df-sum 15863  df-xmet 21680  df-met 21681  df-ovol 25794  df-vol 25795  df-mbf 25949
This theorem is used by:  ftc1anclem2  38721  ftc1anclem4  38723  ftc1anclem5  38724  ftc1anclem6  38725  ftc1anclem8  38727
  Copyright terms: Public domain W3C validator