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

Theorem mbfposr 25629
Description: Converse to mbfpos 25628. (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 7061 . 2 (𝜑 → (𝑥𝐴𝐵):𝐴⟶ℝ)
3 mbfposr.2 . . 3 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn)
4 0re 11137 . . . 4 0 ∈ ℝ
5 ifcl 4513 . . . 4 ((𝐵 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
61, 4, 5sylancl 587 . . 3 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
73, 6mbfdm2 25614 . 2 (𝜑𝐴 ∈ dom vol)
8 simplr 769 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 𝑦 < 0)
9 simpllr 776 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ)
109lt0neg1d 11710 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (𝑦 < 0 ↔ 0 < -𝑦))
118, 10mpbid 232 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 0 < -𝑦)
1211biantrurd 532 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (-𝐵 < -𝑦 ↔ (0 < -𝑦 ∧ -𝐵 < -𝑦)))
131ad4ant14 753 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 𝐵 ∈ ℝ)
149, 13ltnegd 11719 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (𝑦 < 𝐵 ↔ -𝐵 < -𝑦))
15 0red 11138 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 0 ∈ ℝ)
1613renegcld 11568 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → -𝐵 ∈ ℝ)
179renegcld 11568 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → -𝑦 ∈ ℝ)
18 maxlt 13136 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ -𝐵 ∈ ℝ ∧ -𝑦 ∈ ℝ) → (if(0 ≤ -𝐵, -𝐵, 0) < -𝑦 ↔ (0 < -𝑦 ∧ -𝐵 < -𝑦)))
1915, 16, 17, 18syl3anc 1374 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) < -𝑦 ↔ (0 < -𝑦 ∧ -𝐵 < -𝑦)))
2012, 14, 193bitr4rd 312 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) < -𝑦𝑦 < 𝐵))
211renegcld 11568 . . . . . . . . . . . . . 14 ((𝜑𝑥𝐴) → -𝐵 ∈ ℝ)
22 ifcl 4513 . . . . . . . . . . . . . 14 ((-𝐵 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ)
2321, 4, 22sylancl 587 . . . . . . . . . . . . 13 ((𝜑𝑥𝐴) → if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ)
2423ad4ant14 753 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ)
2524biantrurd 532 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) < -𝑦 ↔ (if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ if(0 ≤ -𝐵, -𝐵, 0) < -𝑦)))
2613biantrurd 532 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (𝑦 < 𝐵 ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
2720, 25, 263bitr3d 309 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → ((if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ if(0 ≤ -𝐵, -𝐵, 0) < -𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
2817rexrd 11186 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → -𝑦 ∈ ℝ*)
29 elioomnf 13388 . . . . . . . . . . 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 11186 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ*)
32 elioopnf 13387 . . . . . . . . . . 11 (𝑦 ∈ ℝ* → (𝐵 ∈ (𝑦(,)+∞) ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
3331, 32syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (𝐵 ∈ (𝑦(,)+∞) ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
3427, 30, 333bitr4d 311 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ∈ (-∞(,)-𝑦) ↔ 𝐵 ∈ (𝑦(,)+∞)))
35 simpr 484 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝑥𝐴)
36 eqid 2737 . . . . . . . . . . . . 13 (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) = (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))
3736fvmpt2 6953 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) = if(0 ≤ -𝐵, -𝐵, 0))
3835, 23, 37syl2anc 585 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) = if(0 ≤ -𝐵, -𝐵, 0))
3938eleq1d 2822 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦) ↔ if(0 ≤ -𝐵, -𝐵, 0) ∈ (-∞(,)-𝑦)))
4039ad4ant14 753 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦) ↔ if(0 ≤ -𝐵, -𝐵, 0) ∈ (-∞(,)-𝑦)))
41 eqid 2737 . . . . . . . . . . . . 13 (𝑥𝐴𝐵) = (𝑥𝐴𝐵)
4241fvmpt2 6953 . . . . . . . . . . . 12 ((𝑥𝐴𝐵 ∈ ℝ) → ((𝑥𝐴𝐵)‘𝑥) = 𝐵)
4335, 1, 42syl2anc 585 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → ((𝑥𝐴𝐵)‘𝑥) = 𝐵)
4443eleq1d 2822 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞) ↔ 𝐵 ∈ (𝑦(,)+∞)))
4544ad4ant14 753 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞) ↔ 𝐵 ∈ (𝑦(,)+∞)))
4634, 40, 453bitr4d 311 . . . . . . . 8 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦) ↔ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞)))
4746pm5.32da 579 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ((𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
4823fmpttd 7061 . . . . . . . . 9 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)):𝐴⟶ℝ)
49 ffn 6662 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)):𝐴⟶ℝ → (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) Fn 𝐴)
50 elpreima 7004 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦))))
5148, 49, 503syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦))))
5251ad2antrr 727 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-∞(,)-𝑦))))
53 ffn 6662 . . . . . . . . 9 ((𝑥𝐴𝐵):𝐴⟶ℝ → (𝑥𝐴𝐵) Fn 𝐴)
54 elpreima 7004 . . . . . . . . 9 ((𝑥𝐴𝐵) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
552, 53, 543syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
5655ad2antrr 727 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → (𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
5747, 52, 563bitr4d 311 . . . . . 6 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
5857alrimiv 1929 . . . . 5 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
59 nfmpt1 5185 . . . . . . . 8 𝑥(𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))
6059nfcnv 5827 . . . . . . 7 𝑥(𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))
61 nfcv 2899 . . . . . . 7 𝑥(-∞(,)-𝑦)
6260, 61nfima 6027 . . . . . 6 𝑥((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦))
63 nfmpt1 5185 . . . . . . . 8 𝑥(𝑥𝐴𝐵)
6463nfcnv 5827 . . . . . . 7 𝑥(𝑥𝐴𝐵)
65 nfcv 2899 . . . . . . 7 𝑥(𝑦(,)+∞)
6664, 65nfima 6027 . . . . . 6 𝑥((𝑥𝐴𝐵) “ (𝑦(,)+∞))
6762, 66cleqf 2928 . . . . 5 (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) = ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
6858, 67sylibr 234 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) = ((𝑥𝐴𝐵) “ (𝑦(,)+∞)))
69 mbfposr.3 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) ∈ MblFn)
70 mbfima 25607 . . . . . 6 (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) ∈ MblFn ∧ (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)):𝐴⟶ℝ) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ∈ dom vol)
7169, 48, 70syl2anc 585 . . . . 5 (𝜑 → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ∈ dom vol)
7271ad2antrr 727 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-∞(,)-𝑦)) ∈ dom vol)
7368, 72eqeltrrd 2838 . . 3 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 < 0) → ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ∈ dom vol)
74 simplr 769 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 0 ≤ 𝑦)
75 0red 11138 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 0 ∈ ℝ)
761ad4ant14 753 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 𝐵 ∈ ℝ)
77 simpllr 776 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ)
78 maxle 13134 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦 ↔ (0 ≤ 𝑦𝐵𝑦)))
7975, 76, 77, 78syl3anc 1374 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦 ↔ (0 ≤ 𝑦𝐵𝑦)))
8074, 79mpbirand 708 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦𝐵𝑦))
8180notbid 318 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (¬ if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦 ↔ ¬ 𝐵𝑦))
8276, 4, 5sylancl 587 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
8377, 82ltnled 11284 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < if(0 ≤ 𝐵, 𝐵, 0) ↔ ¬ if(0 ≤ 𝐵, 𝐵, 0) ≤ 𝑦))
8477, 76ltnled 11284 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < 𝐵 ↔ ¬ 𝐵𝑦))
8581, 83, 843bitr4d 311 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < if(0 ≤ 𝐵, 𝐵, 0) ↔ 𝑦 < 𝐵))
8682biantrurd 532 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < if(0 ≤ 𝐵, 𝐵, 0) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 𝑦 < if(0 ≤ 𝐵, 𝐵, 0))))
8776biantrurd 532 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (𝑦 < 𝐵 ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
8885, 86, 873bitr3d 309 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → ((if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 𝑦 < if(0 ≤ 𝐵, 𝐵, 0)) ↔ (𝐵 ∈ ℝ ∧ 𝑦 < 𝐵)))
8977rexrd 11186 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ*)
90 elioopnf 13387 . . . . . . . . . . 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 311 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ∈ (𝑦(,)+∞) ↔ 𝐵 ∈ (𝑦(,)+∞)))
94 eqid 2737 . . . . . . . . . . . . 13 (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) = (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))
9594fvmpt2 6953 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) = if(0 ≤ 𝐵, 𝐵, 0))
9635, 6, 95syl2anc 585 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) = if(0 ≤ 𝐵, 𝐵, 0))
9796eleq1d 2822 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞) ↔ if(0 ≤ 𝐵, 𝐵, 0) ∈ (𝑦(,)+∞)))
9897ad4ant14 753 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞) ↔ if(0 ≤ 𝐵, 𝐵, 0) ∈ (𝑦(,)+∞)))
9944ad4ant14 753 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞) ↔ 𝐵 ∈ (𝑦(,)+∞)))
10093, 98, 993bitr4d 311 . . . . . . . 8 ((((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞) ↔ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞)))
101100pm5.32da 579 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ((𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
1026fmpttd 7061 . . . . . . . . 9 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)):𝐴⟶ℝ)
103 ffn 6662 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)):𝐴⟶ℝ → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) Fn 𝐴)
104 elpreima 7004 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞))))
105102, 103, 1043syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞))))
106105ad2antrr 727 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (𝑦(,)+∞))))
10755ad2antrr 727 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → (𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (𝑦(,)+∞))))
108101, 106, 1073bitr4d 311 . . . . . 6 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
109108alrimiv 1929 . . . . 5 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
110 nfmpt1 5185 . . . . . . . 8 𝑥(𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))
111110nfcnv 5827 . . . . . . 7 𝑥(𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))
112111, 65nfima 6027 . . . . . 6 𝑥((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞))
113112, 66cleqf 2928 . . . . 5 (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) = ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ↔ ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (𝑦(,)+∞))))
114109, 113sylibr 234 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) = ((𝑥𝐴𝐵) “ (𝑦(,)+∞)))
115 mbfima 25607 . . . . . 6 (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn ∧ (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)):𝐴⟶ℝ) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ∈ dom vol)
1163, 102, 115syl2anc 585 . . . . 5 (𝜑 → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ∈ dom vol)
117116ad2antrr 727 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (𝑦(,)+∞)) ∈ dom vol)
118114, 117eqeltrrd 2838 . . 3 (((𝜑𝑦 ∈ ℝ) ∧ 0 ≤ 𝑦) → ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ∈ dom vol)
119 simpr 484 . . 3 ((𝜑𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
120 0red 11138 . . 3 ((𝜑𝑦 ∈ ℝ) → 0 ∈ ℝ)
12173, 118, 119, 120ltlecasei 11245 . 2 ((𝜑𝑦 ∈ ℝ) → ((𝑥𝐴𝐵) “ (𝑦(,)+∞)) ∈ dom vol)
122 simplr 769 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 0 < 𝑦)
123 0red 11138 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 0 ∈ ℝ)
1241ad4ant14 753 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 𝐵 ∈ ℝ)
125 simpllr 776 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ)
126 maxlt 13136 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (if(0 ≤ 𝐵, 𝐵, 0) < 𝑦 ↔ (0 < 𝑦𝐵 < 𝑦)))
127123, 124, 125, 126syl3anc 1374 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) < 𝑦 ↔ (0 < 𝑦𝐵 < 𝑦)))
128122, 127mpbirand 708 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) < 𝑦𝐵 < 𝑦))
1296ad4ant14 753 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
130129biantrurd 532 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) < 𝑦 ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ if(0 ≤ 𝐵, 𝐵, 0) < 𝑦)))
131124biantrurd 532 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (𝐵 < 𝑦 ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
132128, 130, 1313bitr3d 309 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → ((if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ if(0 ≤ 𝐵, 𝐵, 0) < 𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
133125rexrd 11186 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ*)
134 elioomnf 13388 . . . . . . . . . . 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 13388 . . . . . . . . . . 11 (𝑦 ∈ ℝ* → (𝐵 ∈ (-∞(,)𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
137133, 136syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (𝐵 ∈ (-∞(,)𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
138132, 135, 1373bitr4d 311 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) ∈ (-∞(,)𝑦) ↔ 𝐵 ∈ (-∞(,)𝑦)))
13996eleq1d 2822 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦) ↔ if(0 ≤ 𝐵, 𝐵, 0) ∈ (-∞(,)𝑦)))
140139ad4ant14 753 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦) ↔ if(0 ≤ 𝐵, 𝐵, 0) ∈ (-∞(,)𝑦)))
14143eleq1d 2822 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦) ↔ 𝐵 ∈ (-∞(,)𝑦)))
142141ad4ant14 753 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦) ↔ 𝐵 ∈ (-∞(,)𝑦)))
143138, 140, 1423bitr4d 311 . . . . . . . 8 ((((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦) ↔ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦)))
144143pm5.32da 579 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ((𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
145 elpreima 7004 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦))))
146102, 103, 1453syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦))))
147146ad2antrr 727 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0))‘𝑥) ∈ (-∞(,)𝑦))))
148 elpreima 7004 . . . . . . . . 9 ((𝑥𝐴𝐵) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
1492, 53, 1483syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
150149ad2antrr 727 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → (𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
151144, 147, 1503bitr4d 311 . . . . . 6 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
152151alrimiv 1929 . . . . 5 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
153 nfcv 2899 . . . . . . 7 𝑥(-∞(,)𝑦)
154111, 153nfima 6027 . . . . . 6 𝑥((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦))
15564, 153nfima 6027 . . . . . 6 𝑥((𝑥𝐴𝐵) “ (-∞(,)𝑦))
156154, 155cleqf 2928 . . . . 5 (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) = ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
157152, 156sylibr 234 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) = ((𝑥𝐴𝐵) “ (-∞(,)𝑦)))
158 mbfima 25607 . . . . . 6 (((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn ∧ (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)):𝐴⟶ℝ) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ∈ dom vol)
1593, 102, 158syl2anc 585 . . . . 5 (𝜑 → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ∈ dom vol)
160159ad2antrr 727 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ((𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) “ (-∞(,)𝑦)) ∈ dom vol)
161157, 160eqeltrrd 2838 . . 3 (((𝜑𝑦 ∈ ℝ) ∧ 0 < 𝑦) → ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ∈ dom vol)
162 simplr 769 . . . . . . . . . . . . . . . 16 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 𝑦 ≤ 0)
163 simpllr 776 . . . . . . . . . . . . . . . . 17 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ)
164163le0neg1d 11712 . . . . . . . . . . . . . . . 16 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝑦 ≤ 0 ↔ 0 ≤ -𝑦))
165162, 164mpbid 232 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 0 ≤ -𝑦)
166165biantrurd 532 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (-𝐵 ≤ -𝑦 ↔ (0 ≤ -𝑦 ∧ -𝐵 ≤ -𝑦)))
1671ad4ant14 753 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 𝐵 ∈ ℝ)
168163, 167lenegd 11720 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝑦𝐵 ↔ -𝐵 ≤ -𝑦))
169 0red 11138 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 0 ∈ ℝ)
170167renegcld 11568 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → -𝐵 ∈ ℝ)
171163renegcld 11568 . . . . . . . . . . . . . . 15 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → -𝑦 ∈ ℝ)
172 maxle 13134 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ -𝐵 ∈ ℝ ∧ -𝑦 ∈ ℝ) → (if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦 ↔ (0 ≤ -𝑦 ∧ -𝐵 ≤ -𝑦)))
173169, 170, 171, 172syl3anc 1374 . . . . . . . . . . . . . 14 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦 ↔ (0 ≤ -𝑦 ∧ -𝐵 ≤ -𝑦)))
174166, 168, 1733bitr4rd 312 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦𝑦𝐵))
175174notbid 318 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (¬ if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦 ↔ ¬ 𝑦𝐵))
17623ad4ant14 753 . . . . . . . . . . . . 13 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ)
177171, 176ltnled 11284 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (-𝑦 < if(0 ≤ -𝐵, -𝐵, 0) ↔ ¬ if(0 ≤ -𝐵, -𝐵, 0) ≤ -𝑦))
178167, 163ltnled 11284 . . . . . . . . . . . 12 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝐵 < 𝑦 ↔ ¬ 𝑦𝐵))
179175, 177, 1783bitr4d 311 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (-𝑦 < if(0 ≤ -𝐵, -𝐵, 0) ↔ 𝐵 < 𝑦))
180176biantrurd 532 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (-𝑦 < if(0 ≤ -𝐵, -𝐵, 0) ↔ (if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ -𝑦 < if(0 ≤ -𝐵, -𝐵, 0))))
181167biantrurd 532 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝐵 < 𝑦 ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
182179, 180, 1813bitr3d 309 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → ((if(0 ≤ -𝐵, -𝐵, 0) ∈ ℝ ∧ -𝑦 < if(0 ≤ -𝐵, -𝐵, 0)) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
183171rexrd 11186 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → -𝑦 ∈ ℝ*)
184 elioopnf 13387 . . . . . . . . . . 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 11186 . . . . . . . . . . 11 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → 𝑦 ∈ ℝ*)
187186, 136syl 17 . . . . . . . . . 10 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (𝐵 ∈ (-∞(,)𝑦) ↔ (𝐵 ∈ ℝ ∧ 𝐵 < 𝑦)))
188182, 185, 1873bitr4d 311 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (if(0 ≤ -𝐵, -𝐵, 0) ∈ (-𝑦(,)+∞) ↔ 𝐵 ∈ (-∞(,)𝑦)))
18938eleq1d 2822 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞) ↔ if(0 ≤ -𝐵, -𝐵, 0) ∈ (-𝑦(,)+∞)))
190189ad4ant14 753 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞) ↔ if(0 ≤ -𝐵, -𝐵, 0) ∈ (-𝑦(,)+∞)))
191141ad4ant14 753 . . . . . . . . 9 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦) ↔ 𝐵 ∈ (-∞(,)𝑦)))
192188, 190, 1913bitr4d 311 . . . . . . . 8 ((((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) ∧ 𝑥𝐴) → (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞) ↔ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦)))
193192pm5.32da 579 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ((𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
194 elpreima 7004 . . . . . . . . 9 ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) Fn 𝐴 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞))))
19548, 49, 1943syl 18 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞))))
196195ad2antrr 727 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0))‘𝑥) ∈ (-𝑦(,)+∞))))
197149ad2antrr 727 . . . . . . 7 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → (𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ (𝑥𝐴 ∧ ((𝑥𝐴𝐵)‘𝑥) ∈ (-∞(,)𝑦))))
198193, 196, 1973bitr4d 311 . . . . . 6 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → (𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
199198alrimiv 1929 . . . . 5 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
200 nfcv 2899 . . . . . . 7 𝑥(-𝑦(,)+∞)
20160, 200nfima 6027 . . . . . 6 𝑥((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞))
202201, 155cleqf 2928 . . . . 5 (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) = ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ↔ ∀𝑥(𝑥 ∈ ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ↔ 𝑥 ∈ ((𝑥𝐴𝐵) “ (-∞(,)𝑦))))
203199, 202sylibr 234 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) = ((𝑥𝐴𝐵) “ (-∞(,)𝑦)))
204 mbfima 25607 . . . . . 6 (((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) ∈ MblFn ∧ (𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)):𝐴⟶ℝ) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ∈ dom vol)
20569, 48, 204syl2anc 585 . . . . 5 (𝜑 → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ∈ dom vol)
206205ad2antrr 727 . . . 4 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ((𝑥𝐴 ↦ if(0 ≤ -𝐵, -𝐵, 0)) “ (-𝑦(,)+∞)) ∈ dom vol)
207203, 206eqeltrrd 2838 . . 3 (((𝜑𝑦 ∈ ℝ) ∧ 𝑦 ≤ 0) → ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ∈ dom vol)
208161, 207, 120, 119ltlecasei 11245 . 2 ((𝜑𝑦 ∈ ℝ) → ((𝑥𝐴𝐵) “ (-∞(,)𝑦)) ∈ dom vol)
2092, 7, 121, 208ismbf2d 25617 1 (𝜑 → (𝑥𝐴𝐵) ∈ MblFn)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wal 1540   = wceq 1542  wcel 2114  ifcif 4467   class class class wbr 5086  cmpt 5167  ccnv 5623  dom cdm 5624  cima 5627   Fn wfn 6487  wf 6488  cfv 6492  (class class class)co 7360  cr 11028  0cc0 11029  +∞cpnf 11167  -∞cmnf 11168  *cxr 11169   < clt 11170  cle 11171  -cneg 11369  (,)cioo 13289  volcvol 25440  MblFncmbf 25591
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682  ax-inf2 9553  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-of 7624  df-om 7811  df-1st 7935  df-2nd 7936  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8342  df-1o 8398  df-2o 8399  df-er 8636  df-map 8768  df-pm 8769  df-en 8887  df-dom 8888  df-sdom 8889  df-fin 8890  df-sup 9348  df-inf 9349  df-oi 9418  df-dju 9816  df-card 9854  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12166  df-2 12235  df-3 12236  df-n0 12429  df-z 12516  df-uz 12780  df-q 12890  df-rp 12934  df-xadd 13055  df-ioo 13293  df-ico 13295  df-icc 13296  df-fz 13453  df-fzo 13600  df-fl 13742  df-seq 13955  df-exp 14015  df-hash 14284  df-cj 15052  df-re 15053  df-im 15054  df-sqrt 15188  df-abs 15189  df-clim 15441  df-sum 15640  df-xmet 21337  df-met 21338  df-ovol 25441  df-vol 25442  df-mbf 25596
This theorem is referenced by:  mbfposb  25630
  Copyright terms: Public domain W3C validator