MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  mbfposr Structured version   Visualization version   GIF version

Theorem mbfposr 24236
Description: Converse to mbfpos 24235. (Contributed by Mario Carneiro, 11-Aug-2014.)
Hypotheses
Ref Expression
mbfpos.1 ((𝜑𝑥𝐴) → 𝐵 ∈ ℝ)
mbfposr.2 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn)
mbfposr.3 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) ∈ MblFn)
Assertion
Ref Expression
mbfposr (𝜑 → (𝑥𝐴𝐵) ∈ MblFn)
Distinct variable groups:   𝑥,𝐴   𝜑,𝑥
Allowed substitution hint:   𝐵(𝑥)

Proof of Theorem mbfposr
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 mbfpos.1 . . 3 ((𝜑𝑥𝐴) → 𝐵 ∈ ℝ)
21fmpttd 6865 . 2 (𝜑 → (𝑥𝐴𝐵):𝐴⟶ℝ)
3 mbfposr.2 . . 3 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn)
4 0re 10629 . . . 4 0 ∈ ℝ
5 ifcl 4497 . . . 4 ((𝐵 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
61, 4, 5sylancl 588 . . 3 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
73, 6mbfdm2 24221 . 2 (𝜑𝐴 ∈ dom vol)
8 simplr 767 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 𝑦 < 0)
9 simpllr 774 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ)
109lt0neg1d 11195 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (𝑦 < 0 ↔ 0 < -𝑦))
118, 10mpbid 234 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 0 < -𝑦)
1211biantrurd 535 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (-𝐵 < -𝑦 ↔ (0 < -𝑦 ∧ -𝐵 < -𝑦)))
131ad4ant14 750 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 𝐵 ∈ ℝ)
149, 13ltnegd 11204 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (𝑦 < 𝐵 ↔ -𝐵 < -𝑦))
15 0red 10630 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 0 ∈ ℝ)
1613renegcld 11053 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → -𝐵 ∈ ℝ)
179renegcld 11053 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → -𝑦 ∈ ℝ)
18 maxlt 12573 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ -𝐵 ∈ ℝ ∧ -𝑦 ∈ ℝ) → (if(0 ≤ -𝐵, -𝐵, 0) < -𝑦 ↔ (0 < -𝑦 ∧ -𝐵 < -𝑦)))
1915, 16, 17, 18syl3anc 1367 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) < -𝑦 ↔ (0 < -𝑦 ∧ -𝐵 < -𝑦)))
2012, 14, 193bitr4rd 314 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) < -𝑦𝑦 < 𝐵))
211renegcld 11053 . . . . . . . . . . . . . 14 ((𝜑𝑥𝐴) → -𝐵 ∈ ℝ)
22 ifcl 4497 . . . . . . . . . . . . . 14 ((-𝐵 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ)
2321, 4, 22sylancl 588 . . . . . . . . . . . . 13 ((𝜑𝑥𝐴) → if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ)
2423ad4ant14 750 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ)
2524biantrurd 535 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) < -𝑦 ↔ (if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ if(0 ≤ -𝐵, -𝐵, 0) < -𝑦)))
2613biantrurd 535 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (𝑦 < 𝐵 ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
2720, 25, 263bitr3d 311 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → ((if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ if(0 ≤ -𝐵, -𝐵, 0) < -𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
2817rexrd 10677 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → -𝑦 ∈ ℝ*)
29 elioomnf 12819 . . . . . . . . . . 11 (-𝑦 ∈ ℝ* → (if(0 ≤ -𝐵, -𝐵, 0) ∈ (-∞(,)-𝑦) ↔ (if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ if(0 ≤ -𝐵, -𝐵, 0) < -𝑦)))
3028, 29syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ∈ (-∞(,)-𝑦) ↔ (if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ if(0 ≤ -𝐵, -𝐵, 0) < -𝑦)))
319rexrd 10677 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ*)
32 elioopnf 12818 . . . . . . . . . . 11 (𝑦 ∈ ℝ* → (𝐵 ∈ (𝑦(,)+∞) ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
3331, 32syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (𝐵 ∈ (𝑦(,)+∞) ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
3427, 30, 333bitr4d 313 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ∈ (-∞(,)-𝑦) ↔ 𝐵 ∈ (𝑦(,)+∞)))
35 simpr 487 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝑥𝐴)
36 eqid 2821 . . . . . . . . . . . . 13 (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) = (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))
3736fvmpt2 6765 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) = if(0 ≤ -𝐵, -𝐵, 0))
3835, 23, 37syl2anc 586 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) = if(0 ≤ -𝐵, -𝐵, 0))
3938eleq1d 2897 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦) ↔ if(0 ≤ -𝐵, -𝐵, 0) ∈ (-∞(,)-𝑦)))
4039ad4ant14 750 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦) ↔ if(0 ≤ -𝐵, -𝐵, 0) ∈ (-∞(,)-𝑦)))
41 eqid 2821 . . . . . . . . . . . . 13 (𝑥𝐴𝐵) = (𝑥𝐴𝐵)
4241fvmpt2 6765 . . . . . . . . . . . 12 ((𝑥𝐴𝐵 ∈ ℝ) → ((𝑥𝐴𝐵)‘𝑥) = 𝐵)
4335, 1, 42syl2anc 586 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → ((𝑥𝐴𝐵)‘𝑥) = 𝐵)
4443eleq1d 2897 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞) ↔ 𝐵 ∈ (𝑦(,)+∞)))
4544ad4ant14 750 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞) ↔ 𝐵 ∈ (𝑦(,)+∞)))
4634, 40, 453bitr4d 313 . . . . . . . 8 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦) ↔ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞)))
4746pm5.32da 581 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ((𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
4823fmpttd 6865 . . . . . . . . 9 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)):𝐴⟶ℝ)
49 ffn 6500 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)):𝐴⟶ℝ → (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) Fn 𝐴)
50 elpreima 6814 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦))))
5148, 49, 503syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦))))
5251ad2antrr 724 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦))))
53 ffn 6500 . . . . . . . . 9 ((𝑥𝐴𝐵):𝐴⟶ℝ → (𝑥𝐴𝐵) Fn 𝐴)
54 elpreima 6814 . . . . . . . . 9 ((𝑥𝐴𝐵) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
552, 53, 543syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
5655ad2antrr 724 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → (𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
5747, 52, 563bitr4d 313 . . . . . 6 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
5857alrimiv 1928 . . . . 5 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
59 nfmpt1 5150 . . . . . . . 8 𝑥(𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))
6059nfcnv 5735 . . . . . . 7 𝑥(𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))
61 nfcv 2977 . . . . . . 7 𝑥(-∞(,)-𝑦)
6260, 61nfima 5923 . . . . . 6 𝑥((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦))
63 nfmpt1 5150 . . . . . . . 8 𝑥(𝑥𝐴𝐵)
6463nfcnv 5735 . . . . . . 7 𝑥(𝑥𝐴𝐵)
65 nfcv 2977 . . . . . . 7 𝑥(𝑦(,)+∞)
6664, 65nfima 5923 . . . . . 6 𝑥((𝑥𝐴𝐵) “ (𝑦(,)+∞))
6762, 66cleqf 3010 . . . . 5 (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) = ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
6858, 67sylibr 236 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) = ((𝑥𝐴𝐵) “ (𝑦(,)+∞)))
69 mbfposr.3 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) ∈ MblFn)
70 mbfima 24214 . . . . . 6 (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) ∈ MblFn ∧ (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)):𝐴⟶ℝ) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ∈ dom vol)
7169, 48, 70syl2anc 586 . . . . 5 (𝜑 → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ∈ dom vol)
7271ad2antrr 724 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ∈ dom vol)
7368, 72eqeltrrd 2914 . . 3 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ∈ dom vol)
74 simplr 767 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 0 ≤ 𝑦)
75 0red 10630 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 0 ∈ ℝ)
761ad4ant14 750 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 𝐵 ∈ ℝ)
77 simpllr 774 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ)
78 maxle 12571 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦 ↔ (0 ≤ 𝑦𝐵𝑦)))
7975, 76, 77, 78syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦 ↔ (0 ≤ 𝑦𝐵𝑦)))
8074, 79mpbirand 705 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦𝐵𝑦))
8180notbid 320 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (¬ if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦 ↔ ¬ 𝐵𝑦))
8276, 4, 5sylancl 588 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
8377, 82ltnled 10773 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < if(0 ≤ 𝐵, 𝐵, 0) ↔ ¬ if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦))
8477, 76ltnled 10773 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < 𝐵 ↔ ¬ 𝐵𝑦))
8581, 83, 843bitr4d 313 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < if(0 ≤ 𝐵, 𝐵, 0) ↔ 𝑦 < 𝐵))
8682biantrurd 535 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < if(0 ≤ 𝐵, 𝐵, 0) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 𝑦 < if(0 ≤ 𝐵, 𝐵, 0))))
8776biantrurd 535 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < 𝐵 ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
8885, 86, 873bitr3d 311 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → ((if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 𝑦 < if(0 ≤ 𝐵, 𝐵, 0)) ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
8977rexrd 10677 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ*)
90 elioopnf 12818 . . . . . . . . . . 11 (𝑦 ∈ ℝ* → (if(0 ≤ 𝐵, 𝐵, 0) ∈ (𝑦(,)+∞) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 𝑦 < if(0 ≤ 𝐵, 𝐵, 0))))
9189, 90syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ∈ (𝑦(,)+∞) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 𝑦 < if(0 ≤ 𝐵, 𝐵, 0))))
9289, 32syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝐵 ∈ (𝑦(,)+∞) ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
9388, 91, 923bitr4d 313 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ∈ (𝑦(,)+∞) ↔ 𝐵 ∈ (𝑦(,)+∞)))
94 eqid 2821 . . . . . . . . . . . . 13 (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) = (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))
9594fvmpt2 6765 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) = if(0 ≤ 𝐵, 𝐵, 0))
9635, 6, 95syl2anc 586 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) = if(0 ≤ 𝐵, 𝐵, 0))
9796eleq1d 2897 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞) ↔ if(0 ≤ 𝐵, 𝐵, 0) ∈ (𝑦(,)+∞)))
9897ad4ant14 750 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞) ↔ if(0 ≤ 𝐵, 𝐵, 0) ∈ (𝑦(,)+∞)))
9944ad4ant14 750 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞) ↔ 𝐵 ∈ (𝑦(,)+∞)))
10093, 98, 993bitr4d 313 . . . . . . . 8 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞) ↔ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞)))
101100pm5.32da 581 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ((𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
1026fmpttd 6865 . . . . . . . . 9 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)):𝐴⟶ℝ)
103 ffn 6500 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)):𝐴⟶ℝ → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) Fn 𝐴)
104 elpreima 6814 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞))))
105102, 103, 1043syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞))))
106105ad2antrr 724 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞))))
10755ad2antrr 724 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → (𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
108101, 106, 1073bitr4d 313 . . . . . 6 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
109108alrimiv 1928 . . . . 5 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
110 nfmpt1 5150 . . . . . . . 8 𝑥(𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))
111110nfcnv 5735 . . . . . . 7 𝑥(𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))
112111, 65nfima 5923 . . . . . 6 𝑥((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞))
113112, 66cleqf 3010 . . . . 5 (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) = ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
114109, 113sylibr 236 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) = ((𝑥𝐴𝐵) “ (𝑦(,)+∞)))
115 mbfima 24214 . . . . . 6 (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn ∧ (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)):𝐴⟶ℝ) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ∈ dom vol)
1163, 102, 115syl2anc 586 . . . . 5 (𝜑 → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ∈ dom vol)
117116ad2antrr 724 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ∈ dom vol)
118114, 117eqeltrrd 2914 . . 3 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ∈ dom vol)
119 simpr 487 . . 3 ((𝜑𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
120 0red 10630 . . 3 ((𝜑𝑦 ∈ ℝ) → 0 ∈ ℝ)
12173, 118, 119, 120ltlecasei 10734 . 2 ((𝜑𝑦 ∈ ℝ) → ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ∈ dom vol)
122 simplr 767 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 0 < 𝑦)
123 0red 10630 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 0 ∈ ℝ)
1241ad4ant14 750 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 𝐵 ∈ ℝ)
125 simpllr 774 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ)
126 maxlt 12573 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (if(0 ≤ 𝐵, 𝐵, 0) < 𝑦 ↔ (0 < 𝑦𝐵 < 𝑦)))
127123, 124, 125, 126syl3anc 1367 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) < 𝑦 ↔ (0 < 𝑦𝐵 < 𝑦)))
128122, 127mpbirand 705 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) < 𝑦𝐵 < 𝑦))
1296ad4ant14 750 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
130129biantrurd 535 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) < 𝑦 ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ if(0 ≤ 𝐵, 𝐵, 0) < 𝑦)))
131124biantrurd 535 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (𝐵 < 𝑦 ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
132128, 130, 1313bitr3d 311 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → ((if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ if(0 ≤ 𝐵, 𝐵, 0) < 𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
133125rexrd 10677 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ*)
134 elioomnf 12819 . . . . . . . . . . 11 (𝑦 ∈ ℝ* → (if(0 ≤ 𝐵, 𝐵, 0) ∈ (-∞(,)𝑦) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ if(0 ≤ 𝐵, 𝐵, 0) < 𝑦)))
135133, 134syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ∈ (-∞(,)𝑦) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ if(0 ≤ 𝐵, 𝐵, 0) < 𝑦)))
136 elioomnf 12819 . . . . . . . . . . 11 (𝑦 ∈ ℝ* → (𝐵 ∈ (-∞(,)𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
137133, 136syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (𝐵 ∈ (-∞(,)𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
138132, 135, 1373bitr4d 313 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ∈ (-∞(,)𝑦) ↔ 𝐵 ∈ (-∞(,)𝑦)))
13996eleq1d 2897 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦) ↔ if(0 ≤ 𝐵, 𝐵, 0) ∈ (-∞(,)𝑦)))
140139ad4ant14 750 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦) ↔ if(0 ≤ 𝐵, 𝐵, 0) ∈ (-∞(,)𝑦)))
14143eleq1d 2897 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦) ↔ 𝐵 ∈ (-∞(,)𝑦)))
142141ad4ant14 750 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦) ↔ 𝐵 ∈ (-∞(,)𝑦)))
143138, 140, 1423bitr4d 313 . . . . . . . 8 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦) ↔ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦)))
144143pm5.32da 581 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ((𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
145 elpreima 6814 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦))))
146102, 103, 1453syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦))))
147146ad2antrr 724 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦))))
148 elpreima 6814 . . . . . . . . 9 ((𝑥𝐴𝐵) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
1492, 53, 1483syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
150149ad2antrr 724 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → (𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
151144, 147, 1503bitr4d 313 . . . . . 6 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
152151alrimiv 1928 . . . . 5 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
153 nfcv 2977 . . . . . . 7 𝑥(-∞(,)𝑦)
154111, 153nfima 5923 . . . . . 6 𝑥((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦))
15564, 153nfima 5923 . . . . . 6 𝑥((𝑥𝐴𝐵) “ (-∞(,)𝑦))
156154, 155cleqf 3010 . . . . 5 (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) = ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
157152, 156sylibr 236 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) = ((𝑥𝐴𝐵) “ (-∞(,)𝑦)))
158 mbfima 24214 . . . . . 6 (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn ∧ (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)):𝐴⟶ℝ) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ∈ dom vol)
1593, 102, 158syl2anc 586 . . . . 5 (𝜑 → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ∈ dom vol)
160159ad2antrr 724 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ∈ dom vol)
161157, 160eqeltrrd 2914 . . 3 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ∈ dom vol)
162 simplr 767 . . . . . . . . . . . . . . . 16 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 𝑦 ≤ 0)
163 simpllr 774 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ)
164163le0neg1d 11197 . . . . . . . . . . . . . . . 16 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝑦 ≤ 0 ↔ 0 ≤ -𝑦))
165162, 164mpbid 234 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 0 ≤ -𝑦)
166165biantrurd 535 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (-𝐵 ≤ -𝑦 ↔ (0 ≤ -𝑦 ∧ -𝐵 ≤ -𝑦)))
1671ad4ant14 750 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 𝐵 ∈ ℝ)
168163, 167lenegd 11205 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝑦𝐵 ↔ -𝐵 ≤ -𝑦))
169 0red 10630 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 0 ∈ ℝ)
170167renegcld 11053 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → -𝐵 ∈ ℝ)
171163renegcld 11053 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → -𝑦 ∈ ℝ)
172 maxle 12571 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ -𝐵 ∈ ℝ ∧ -𝑦 ∈ ℝ) → (if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦 ↔ (0 ≤ -𝑦 ∧ -𝐵 ≤ -𝑦)))
173169, 170, 171, 172syl3anc 1367 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦 ↔ (0 ≤ -𝑦 ∧ -𝐵 ≤ -𝑦)))
174166, 168, 1733bitr4rd 314 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦𝑦𝐵))
175174notbid 320 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (¬ if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦 ↔ ¬ 𝑦𝐵))
17623ad4ant14 750 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ)
177171, 176ltnled 10773 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (-𝑦 < if(0 ≤ -𝐵, -𝐵, 0) ↔ ¬ if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦))
178167, 163ltnled 10773 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝐵 < 𝑦 ↔ ¬ 𝑦𝐵))
179175, 177, 1783bitr4d 313 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (-𝑦 < if(0 ≤ -𝐵, -𝐵, 0) ↔ 𝐵 < 𝑦))
180176biantrurd 535 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (-𝑦 < if(0 ≤ -𝐵, -𝐵, 0) ↔ (if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ -𝑦 < if(0 ≤ -𝐵, -𝐵, 0))))
181167biantrurd 535 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝐵 < 𝑦 ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
182179, 180, 1813bitr3d 311 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → ((if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ -𝑦 < if(0 ≤ -𝐵, -𝐵, 0)) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
183171rexrd 10677 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → -𝑦 ∈ ℝ*)
184 elioopnf 12818 . . . . . . . . . . 11 (-𝑦 ∈ ℝ* → (if(0 ≤ -𝐵, -𝐵, 0) ∈ (-𝑦(,)+∞) ↔ (if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ -𝑦 < if(0 ≤ -𝐵, -𝐵, 0))))
185183, 184syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ∈ (-𝑦(,)+∞) ↔ (if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ -𝑦 < if(0 ≤ -𝐵, -𝐵, 0))))
186163rexrd 10677 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ*)
187186, 136syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝐵 ∈ (-∞(,)𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
188182, 185, 1873bitr4d 313 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ∈ (-𝑦(,)+∞) ↔ 𝐵 ∈ (-∞(,)𝑦)))
18938eleq1d 2897 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞) ↔ if(0 ≤ -𝐵, -𝐵, 0) ∈ (-𝑦(,)+∞)))
190189ad4ant14 750 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞) ↔ if(0 ≤ -𝐵, -𝐵, 0) ∈ (-𝑦(,)+∞)))
191141ad4ant14 750 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦) ↔ 𝐵 ∈ (-∞(,)𝑦)))
192188, 190, 1913bitr4d 313 . . . . . . . 8 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞) ↔ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦)))
193192pm5.32da 581 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ((𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
194 elpreima 6814 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞))))
19548, 49, 1943syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞))))
196195ad2antrr 724 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞))))
197149ad2antrr 724 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → (𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
198193, 196, 1973bitr4d 313 . . . . . 6 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
199198alrimiv 1928 . . . . 5 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
200 nfcv 2977 . . . . . . 7 𝑥(-𝑦(,)+∞)
20160, 200nfima 5923 . . . . . 6 𝑥((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞))
202201, 155cleqf 3010 . . . . 5 (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) = ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
203199, 202sylibr 236 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) = ((𝑥𝐴𝐵) “ (-∞(,)𝑦)))
204 mbfima 24214 . . . . . 6 (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) ∈ MblFn ∧ (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)):𝐴⟶ℝ) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ∈ dom vol)
20569, 48, 204syl2anc 586 . . . . 5 (𝜑 → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ∈ dom vol)
206205ad2antrr 724 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ∈ dom vol)
207203, 206eqeltrrd 2914 . . 3 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ∈ dom vol)
208161, 207, 120, 119ltlecasei 10734 . 2 ((𝜑𝑦 ∈ ℝ) → ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ∈ dom vol)
2092, 7, 121, 208ismbf2d 24224 1 (𝜑 → (𝑥𝐴𝐵) ∈ MblFn)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  wal 1535   = wceq 1537  wcel 2114  ifcif 4453   class class class wbr 5052  cmpt 5132  ccnv 5540  dom cdm 5541  cima 5544   Fn wfn 6336  wf 6337  cfv 6341  (class class class)co 7142  cr 10522  0cc0 10523  +∞cpnf 10658  -∞cmnf 10659  *cxr 10660   < clt 10661  cle 10662  -cneg 10857  (,)cioo 12725  volcvol 24047  MblFncmbf 24198
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5176  ax-sep 5189  ax-nul 5196  ax-pow 5252  ax-pr 5316  ax-un 7447  ax-inf2 9090  ax-cnex 10579  ax-resscn 10580  ax-1cn 10581  ax-icn 10582  ax-addcl 10583  ax-addrcl 10584  ax-mulcl 10585  ax-mulrcl 10586  ax-mulcom 10587  ax-addass 10588  ax-mulass 10589  ax-distr 10590  ax-i2m1 10591  ax-1ne0 10592  ax-1rid 10593  ax-rnegex 10594  ax-rrecex 10595  ax-cnre 10596  ax-pre-lttri 10597  ax-pre-lttrn 10598  ax-pre-ltadd 10599  ax-pre-mulgt0 10600  ax-pre-sup 10601
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-fal 1550  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3488  df-sbc 3764  df-csb 3872  df-dif 3927  df-un 3929  df-in 3931  df-ss 3940  df-pss 3942  df-nul 4280  df-if 4454  df-pw 4527  df-sn 4554  df-pr 4556  df-tp 4558  df-op 4560  df-uni 4825  df-int 4863  df-iun 4907  df-br 5053  df-opab 5115  df-mpt 5133  df-tr 5159  df-id 5446  df-eprel 5451  df-po 5460  df-so 5461  df-fr 5500  df-se 5501  df-we 5502  df-xp 5547  df-rel 5548  df-cnv 5549  df-co 5550  df-dm 5551  df-rn 5552  df-res 5553  df-ima 5554  df-pred 6134  df-ord 6180  df-on 6181  df-lim 6182  df-suc 6183  df-iota 6300  df-fun 6343  df-fn 6344  df-f 6345  df-f1 6346  df-fo 6347  df-f1o 6348  df-fv 6349  df-isom 6350  df-riota 7100  df-ov 7145  df-oprab 7146  df-mpo 7147  df-of 7395  df-om 7567  df-1st 7675  df-2nd 7676  df-wrecs 7933  df-recs 7994  df-rdg 8032  df-1o 8088  df-2o 8089  df-oadd 8092  df-er 8275  df-map 8394  df-pm 8395  df-en 8496  df-dom 8497  df-sdom 8498  df-fin 8499  df-sup 8892  df-inf 8893  df-oi 8960  df-dju 9316  df-card 9354  df-pnf 10663  df-mnf 10664  df-xr 10665  df-ltxr 10666  df-le 10667  df-sub 10858  df-neg 10859  df-div 11284  df-nn 11625  df-2 11687  df-3 11688  df-n0 11885  df-z 11969  df-uz 12231  df-q 12336  df-rp 12377  df-xadd 12495  df-ioo 12729  df-ico 12731  df-icc 12732  df-fz 12883  df-fzo 13024  df-fl 13152  df-seq 13360  df-exp 13420  df-hash 13681  df-cj 14443  df-re 14444  df-im 14445  df-sqrt 14579  df-abs 14580  df-clim 14830  df-sum 15028  df-xmet 20521  df-met 20522  df-ovol 24048  df-vol 24049  df-mbf 24203
This theorem is referenced by:  mbfposb  24237
  Copyright terms: Public domain W3C validator