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

Theorem mbfposadd 37197
Description: If the sum of two measurable functions is measurable, the sum of their nonnegative parts is measurable. (Contributed by Brendan Leahy, 2-Apr-2018.)
Hypotheses
Ref Expression
mbfposadd.1 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn)
mbfposadd.2 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ 𝐡 ∈ ℝ)
mbfposadd.3 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn)
mbfposadd.4 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ 𝐢 ∈ ℝ)
mbfposadd.5 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) ∈ MblFn)
Assertion
Ref Expression
mbfposadd (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) ∈ MblFn)
Distinct variable groups:   πœ‘,π‘₯   π‘₯,𝐴
Allowed substitution hints:   𝐡(π‘₯)   𝐢(π‘₯)

Proof of Theorem mbfposadd
Dummy variables 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 mbfposadd.2 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ 𝐡 ∈ ℝ)
2 0re 11246 . . . . 5 0 ∈ ℝ
3 ifcl 4569 . . . . 5 ((𝐡 ∈ ℝ ∧ 0 ∈ ℝ) β†’ if(0 ≀ 𝐡, 𝐡, 0) ∈ ℝ)
41, 2, 3sylancl 584 . . . 4 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ if(0 ≀ 𝐡, 𝐡, 0) ∈ ℝ)
5 mbfposadd.4 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ 𝐢 ∈ ℝ)
6 ifcl 4569 . . . . 5 ((𝐢 ∈ ℝ ∧ 0 ∈ ℝ) β†’ if(0 ≀ 𝐢, 𝐢, 0) ∈ ℝ)
75, 2, 6sylancl 584 . . . 4 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ if(0 ≀ 𝐢, 𝐢, 0) ∈ ℝ)
84, 7readdcld 11273 . . 3 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) ∈ ℝ)
98fmpttd 7120 . 2 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))):π΄βŸΆβ„)
10 ssrab2 4069 . . . 4 {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βŠ† 𝐴
11 fssres 6758 . . . 4 (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))):π΄βŸΆβ„ ∧ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βŠ† 𝐴) β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}):{π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}βŸΆβ„)
129, 10, 11sylancl 584 . . 3 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}):{π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}βŸΆβ„)
13 inss2 4224 . . . . . 6 ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}
14 resabs1 6006 . . . . . 6 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} β†’ (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
1513, 14ax-mp 5 . . . . 5 (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
16 elin 3955 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
17 rabid 3440 . . . . . . . . . 10 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ↔ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐡))
18 rabid 3440 . . . . . . . . . 10 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} ↔ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢))
1917, 18anbi12i 626 . . . . . . . . 9 ((π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ ((π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐡) ∧ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢)))
2016, 19bitri 274 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ ((π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐡) ∧ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢)))
21 iftrue 4530 . . . . . . . . . 10 (0 ≀ 𝐡 β†’ if(0 ≀ 𝐡, 𝐡, 0) = 𝐡)
22 iftrue 4530 . . . . . . . . . 10 (0 ≀ 𝐢 β†’ if(0 ≀ 𝐢, 𝐢, 0) = 𝐢)
2321, 22oveqan12d 7435 . . . . . . . . 9 ((0 ≀ 𝐡 ∧ 0 ≀ 𝐢) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = (𝐡 + 𝐢))
2423ad2ant2l 744 . . . . . . . 8 (((π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐡) ∧ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢)) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = (𝐡 + 𝐢))
2520, 24sylbi 216 . . . . . . 7 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = (𝐡 + 𝐢))
2625mpteq2ia 5246 . . . . . 6 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢))
27 inss1 4223 . . . . . . . 8 ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡}
28 ssrab2 4069 . . . . . . . 8 {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} βŠ† 𝐴
2927, 28sstri 3982 . . . . . . 7 ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴
30 resmpt 6036 . . . . . . . 8 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))))
31 nfcv 2892 . . . . . . . . . 10 Ⅎ𝑦(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))
32 nfcsb1v 3909 . . . . . . . . . 10 β„²π‘₯⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))
33 csbeq1a 3898 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
3431, 32, 33cbvmpt 5254 . . . . . . . . 9 (π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
3534reseq1i 5975 . . . . . . . 8 ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
36 nfv 1909 . . . . . . . . . 10 Ⅎ𝑦(π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
37 nfrab1 3439 . . . . . . . . . . . . 13 β„²π‘₯{π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡}
38 nfrab1 3439 . . . . . . . . . . . . 13 β„²π‘₯{π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}
3937, 38nfin 4210 . . . . . . . . . . . 12 β„²π‘₯({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
4039nfcri 2882 . . . . . . . . . . 11 β„²π‘₯ 𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
4132nfeq2 2910 . . . . . . . . . . 11 β„²π‘₯ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))
4240, 41nfan 1894 . . . . . . . . . 10 β„²π‘₯(𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
43 eleq1w 2808 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ 𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
4433eqeq2d 2736 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) ↔ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))))
4543, 44anbi12d 630 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) ↔ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))))
4636, 42, 45cbvopab1 5218 . . . . . . . . 9 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
47 df-mpt 5227 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
48 df-mpt 5227 . . . . . . . . 9 (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
4946, 47, 483eqtr4i 2763 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
5030, 35, 493eqtr4g 2790 . . . . . . 7 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))))
5129, 50ax-mp 5 . . . . . 6 ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
52 resmpt 6036 . . . . . . . 8 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)))
53 nfcv 2892 . . . . . . . . . 10 Ⅎ𝑦(𝐡 + 𝐢)
54 nfcsb1v 3909 . . . . . . . . . 10 β„²π‘₯⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)
55 csbeq1a 3898 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ (𝐡 + 𝐢) = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))
5653, 54, 55cbvmpt 5254 . . . . . . . . 9 (π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) = (𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))
5756reseq1i 5975 . . . . . . . 8 ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
58 nfv 1909 . . . . . . . . . 10 Ⅎ𝑦(π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (𝐡 + 𝐢))
5954nfeq2 2910 . . . . . . . . . . 11 β„²π‘₯ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)
6040, 59nfan 1894 . . . . . . . . . 10 β„²π‘₯(𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))
6155eqeq2d 2736 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (𝑧 = (𝐡 + 𝐢) ↔ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)))
6243, 61anbi12d 630 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (𝐡 + 𝐢)) ↔ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))))
6358, 60, 62cbvopab1 5218 . . . . . . . . 9 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (𝐡 + 𝐢))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))}
64 df-mpt 5227 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢)) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (𝐡 + 𝐢))}
65 df-mpt 5227 . . . . . . . . 9 (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))}
6663, 64, 653eqtr4i 2763 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢)) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))
6752, 57, 663eqtr4g 2790 . . . . . . 7 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢)))
6829, 67ax-mp 5 . . . . . 6 ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢))
6926, 51, 683eqtr4i 2763 . . . . 5 ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
7015, 69eqtri 2753 . . . 4 (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
71 mbfposadd.5 . . . . 5 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) ∈ MblFn)
721biantrurd 531 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 ≀ 𝐡 ↔ (𝐡 ∈ ℝ ∧ 0 ≀ 𝐡)))
73 elrege0 13463 . . . . . . . . . 10 (𝐡 ∈ (0[,)+∞) ↔ (𝐡 ∈ ℝ ∧ 0 ≀ 𝐡))
7472, 73bitr4di 288 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 ≀ 𝐡 ↔ 𝐡 ∈ (0[,)+∞)))
7574rabbidva 3426 . . . . . . . 8 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} = {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (0[,)+∞)})
76 0xr 11291 . . . . . . . . . . 11 0 ∈ ℝ*
77 pnfxr 11298 . . . . . . . . . . 11 +∞ ∈ ℝ*
78 0ltpnf 13134 . . . . . . . . . . 11 0 < +∞
79 snunioo 13487 . . . . . . . . . . 11 ((0 ∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 0 < +∞) β†’ ({0} βˆͺ (0(,)+∞)) = (0[,)+∞))
8076, 77, 78, 79mp3an 1457 . . . . . . . . . 10 ({0} βˆͺ (0(,)+∞)) = (0[,)+∞)
8180imaeq2i 6056 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ ({0} βˆͺ (0(,)+∞))) = (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0[,)+∞))
82 imaundi 6149 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ ({0} βˆͺ (0(,)+∞))) = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞)))
83 eqid 2725 . . . . . . . . . 10 (π‘₯ ∈ 𝐴 ↦ 𝐡) = (π‘₯ ∈ 𝐴 ↦ 𝐡)
8483mptpreima 6237 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0[,)+∞)) = {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (0[,)+∞)}
8581, 82, 843eqtr3ri 2762 . . . . . . . 8 {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (0[,)+∞)} = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞)))
8675, 85eqtrdi 2781 . . . . . . 7 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞))))
87 mbfposadd.1 . . . . . . . 8 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn)
881fmpttd 7120 . . . . . . . 8 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„)
89 mbfimasn 25579 . . . . . . . . . 10 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„ ∧ 0 ∈ ℝ) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) ∈ dom vol)
902, 89mp3an3 1446 . . . . . . . . 9 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) ∈ dom vol)
91 mbfima 25577 . . . . . . . . 9 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞)) ∈ dom vol)
92 unmbl 25484 . . . . . . . . 9 (((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) ∈ dom vol ∧ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞)) ∈ dom vol) β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞))) ∈ dom vol)
9390, 91, 92syl2anc 582 . . . . . . . 8 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„) β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞))) ∈ dom vol)
9487, 88, 93syl2anc 582 . . . . . . 7 (πœ‘ β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞))) ∈ dom vol)
9586, 94eqeltrd 2825 . . . . . 6 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∈ dom vol)
965biantrurd 531 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 ≀ 𝐢 ↔ (𝐢 ∈ ℝ ∧ 0 ≀ 𝐢)))
97 elrege0 13463 . . . . . . . . . 10 (𝐢 ∈ (0[,)+∞) ↔ (𝐢 ∈ ℝ ∧ 0 ≀ 𝐢))
9896, 97bitr4di 288 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 ≀ 𝐢 ↔ 𝐢 ∈ (0[,)+∞)))
9998rabbidva 3426 . . . . . . . 8 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} = {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (0[,)+∞)})
10080imaeq2i 6056 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ ({0} βˆͺ (0(,)+∞))) = (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0[,)+∞))
101 imaundi 6149 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ ({0} βˆͺ (0(,)+∞))) = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞)))
102 eqid 2725 . . . . . . . . . 10 (π‘₯ ∈ 𝐴 ↦ 𝐢) = (π‘₯ ∈ 𝐴 ↦ 𝐢)
103102mptpreima 6237 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0[,)+∞)) = {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (0[,)+∞)}
104100, 101, 1033eqtr3ri 2762 . . . . . . . 8 {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (0[,)+∞)} = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞)))
10599, 104eqtrdi 2781 . . . . . . 7 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞))))
106 mbfposadd.3 . . . . . . . 8 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn)
1075fmpttd 7120 . . . . . . . 8 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„)
108 mbfimasn 25579 . . . . . . . . . 10 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„ ∧ 0 ∈ ℝ) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) ∈ dom vol)
1092, 108mp3an3 1446 . . . . . . . . 9 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) ∈ dom vol)
110 mbfima 25577 . . . . . . . . 9 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞)) ∈ dom vol)
111 unmbl 25484 . . . . . . . . 9 (((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) ∈ dom vol ∧ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞)) ∈ dom vol) β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞))) ∈ dom vol)
112109, 110, 111syl2anc 582 . . . . . . . 8 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„) β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞))) ∈ dom vol)
113106, 107, 112syl2anc 582 . . . . . . 7 (πœ‘ β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞))) ∈ dom vol)
114105, 113eqeltrd 2825 . . . . . 6 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} ∈ dom vol)
115 inmbl 25489 . . . . . 6 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∈ dom vol ∧ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} ∈ dom vol) β†’ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol)
11695, 114, 115syl2anc 582 . . . . 5 (πœ‘ β†’ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol)
117 mbfres 25591 . . . . 5 (((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) ∈ MblFn ∧ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol) β†’ ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
11871, 116, 117syl2anc 582 . . . 4 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
11970, 118eqeltrid 2829 . . 3 (πœ‘ β†’ (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
120 inss2 4224 . . . . . 6 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}
121 resabs1 6006 . . . . . 6 (({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} β†’ (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
122120, 121ax-mp 5 . . . . 5 (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
123 rabid 3440 . . . . . . . . . 10 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ↔ (π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐡))
124123, 18anbi12i 626 . . . . . . . . 9 ((π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ ((π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐡) ∧ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢)))
125 elin 3955 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
126 anandi 674 . . . . . . . . 9 ((π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢)) ↔ ((π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐡) ∧ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢)))
127124, 125, 1263bitr4i 302 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ (π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢)))
128 iffalse 4533 . . . . . . . . . . 11 (Β¬ 0 ≀ 𝐡 β†’ if(0 ≀ 𝐡, 𝐡, 0) = 0)
129128, 22oveqan12d 7435 . . . . . . . . . 10 ((Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = (0 + 𝐢))
130129ad2antll 727 . . . . . . . . 9 ((πœ‘ ∧ (π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢))) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = (0 + 𝐢))
1315recnd 11272 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ 𝐢 ∈ β„‚)
132131addlidd 11445 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 + 𝐢) = 𝐢)
133132adantrr 715 . . . . . . . . 9 ((πœ‘ ∧ (π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢))) β†’ (0 + 𝐢) = 𝐢)
134130, 133eqtrd 2765 . . . . . . . 8 ((πœ‘ ∧ (π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢))) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = 𝐢)
135127, 134sylan2b 592 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = 𝐢)
136135mpteq2dva 5243 . . . . . 6 (πœ‘ β†’ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢))
137 inss1 4223 . . . . . . . 8 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡}
138 ssrab2 4069 . . . . . . . 8 {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} βŠ† 𝐴
139137, 138sstri 3982 . . . . . . 7 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴
140 resmpt 6036 . . . . . . . 8 (({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))))
14134reseq1i 5975 . . . . . . . 8 ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
142 nfv 1909 . . . . . . . . . 10 Ⅎ𝑦(π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
143 nfrab1 3439 . . . . . . . . . . . . 13 β„²π‘₯{π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡}
144143, 38nfin 4210 . . . . . . . . . . . 12 β„²π‘₯({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
145144nfcri 2882 . . . . . . . . . . 11 β„²π‘₯ 𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
146145, 41nfan 1894 . . . . . . . . . 10 β„²π‘₯(𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
147 eleq1w 2808 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ 𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
148147, 44anbi12d 630 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) ↔ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))))
149142, 146, 148cbvopab1 5218 . . . . . . . . 9 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
150 df-mpt 5227 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
151 df-mpt 5227 . . . . . . . . 9 (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
152149, 150, 1513eqtr4i 2763 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
153140, 141, 1523eqtr4g 2790 . . . . . . 7 (({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))))
154139, 153ax-mp 5 . . . . . 6 ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
155 resmpt 6036 . . . . . . . 8 (({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌𝐢))
156 nfcv 2892 . . . . . . . . . 10 Ⅎ𝑦𝐢
157 nfcsb1v 3909 . . . . . . . . . 10 β„²π‘₯⦋𝑦 / π‘₯⦌𝐢
158 csbeq1a 3898 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ 𝐢 = ⦋𝑦 / π‘₯⦌𝐢)
159156, 157, 158cbvmpt 5254 . . . . . . . . 9 (π‘₯ ∈ 𝐴 ↦ 𝐢) = (𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌𝐢)
160159reseq1i 5975 . . . . . . . 8 ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
161 nfv 1909 . . . . . . . . . 10 Ⅎ𝑦(π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = 𝐢)
162157nfeq2 2910 . . . . . . . . . . 11 β„²π‘₯ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢
163145, 162nfan 1894 . . . . . . . . . 10 β„²π‘₯(𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢)
164158eqeq2d 2736 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (𝑧 = 𝐢 ↔ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢))
165147, 164anbi12d 630 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = 𝐢) ↔ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢)))
166161, 163, 165cbvopab1 5218 . . . . . . . . 9 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = 𝐢)} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢)}
167 df-mpt 5227 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = 𝐢)}
168 df-mpt 5227 . . . . . . . . 9 (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌𝐢) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢)}
169166, 167, 1683eqtr4i 2763 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌𝐢)
170155, 160, 1693eqtr4g 2790 . . . . . . 7 (({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢))
171139, 170ax-mp 5 . . . . . 6 ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢)
172136, 154, 1713eqtr4g 2790 . . . . 5 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
173122, 172eqtrid 2777 . . . 4 (πœ‘ β†’ (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
17483mptpreima 6237 . . . . . . . 8 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (-∞(,)0)) = {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (-∞(,)0)}
175 elioomnf 13453 . . . . . . . . . . 11 (0 ∈ ℝ* β†’ (𝐡 ∈ (-∞(,)0) ↔ (𝐡 ∈ ℝ ∧ 𝐡 < 0)))
17676, 175ax-mp 5 . . . . . . . . . 10 (𝐡 ∈ (-∞(,)0) ↔ (𝐡 ∈ ℝ ∧ 𝐡 < 0))
1771biantrurd 531 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐡 < 0 ↔ (𝐡 ∈ ℝ ∧ 𝐡 < 0)))
178 ltnle 11323 . . . . . . . . . . . 12 ((𝐡 ∈ ℝ ∧ 0 ∈ ℝ) β†’ (𝐡 < 0 ↔ Β¬ 0 ≀ 𝐡))
1791, 2, 178sylancl 584 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐡 < 0 ↔ Β¬ 0 ≀ 𝐡))
180177, 179bitr3d 280 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ ((𝐡 ∈ ℝ ∧ 𝐡 < 0) ↔ Β¬ 0 ≀ 𝐡))
181176, 180bitrid 282 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐡 ∈ (-∞(,)0) ↔ Β¬ 0 ≀ 𝐡))
182181rabbidva 3426 . . . . . . . 8 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (-∞(,)0)} = {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡})
183174, 182eqtrid 2777 . . . . . . 7 (πœ‘ β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (-∞(,)0)) = {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡})
184 mbfima 25577 . . . . . . . 8 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (-∞(,)0)) ∈ dom vol)
18587, 88, 184syl2anc 582 . . . . . . 7 (πœ‘ β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (-∞(,)0)) ∈ dom vol)
186183, 185eqeltrrd 2826 . . . . . 6 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∈ dom vol)
187 inmbl 25489 . . . . . 6 (({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∈ dom vol ∧ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} ∈ dom vol) β†’ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol)
188186, 114, 187syl2anc 582 . . . . 5 (πœ‘ β†’ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol)
189 mbfres 25591 . . . . 5 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol) β†’ ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
190106, 188, 189syl2anc 582 . . . 4 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
191173, 190eqeltrd 2825 . . 3 (πœ‘ β†’ (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
192 ssid 3995 . . . . . 6 𝐴 βŠ† 𝐴
193 dfrab3ss 4308 . . . . . 6 (𝐴 βŠ† 𝐴 β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} = (𝐴 ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
194192, 193ax-mp 5 . . . . 5 {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} = (𝐴 ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
195 rabxm 4382 . . . . . 6 𝐴 = ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡})
196195ineq1i 4202 . . . . 5 (𝐴 ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) = (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡}) ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
197 indir 4270 . . . . 5 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡}) ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) = (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βˆͺ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
198194, 196, 1973eqtrri 2758 . . . 4 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βˆͺ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}
199198a1i 11 . . 3 (πœ‘ β†’ (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βˆͺ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
20012, 119, 191, 199mbfres2 25592 . 2 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ MblFn)
201 rabid 3440 . . . . . 6 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↔ (π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐢))
202 iffalse 4533 . . . . . . . . 9 (Β¬ 0 ≀ 𝐢 β†’ if(0 ≀ 𝐢, 𝐢, 0) = 0)
203202oveq2d 7432 . . . . . . . 8 (Β¬ 0 ≀ 𝐢 β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = (if(0 ≀ 𝐡, 𝐡, 0) + 0))
2044recnd 11272 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ if(0 ≀ 𝐡, 𝐡, 0) ∈ β„‚)
205204addridd 11444 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + 0) = if(0 ≀ 𝐡, 𝐡, 0))
206203, 205sylan9eqr 2787 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ 𝐴) ∧ Β¬ 0 ≀ 𝐢) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = if(0 ≀ 𝐡, 𝐡, 0))
207206anasss 465 . . . . . 6 ((πœ‘ ∧ (π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐢)) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = if(0 ≀ 𝐡, 𝐡, 0))
208201, 207sylan2b 592 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = if(0 ≀ 𝐡, 𝐡, 0))
209208mpteq2dva 5243 . . . 4 (πœ‘ β†’ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ if(0 ≀ 𝐡, 𝐡, 0)))
210 ssrab2 4069 . . . . 5 {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} βŠ† 𝐴
211 resmpt 6036 . . . . . 6 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))))
21234reseq1i 5975 . . . . . 6 ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢})
213 nfv 1909 . . . . . . . 8 Ⅎ𝑦(π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
214 nfrab1 3439 . . . . . . . . . 10 β„²π‘₯{π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}
215214nfcri 2882 . . . . . . . . 9 β„²π‘₯ 𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}
216215, 41nfan 1894 . . . . . . . 8 β„²π‘₯(𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
217 eleq1w 2808 . . . . . . . . 9 (π‘₯ = 𝑦 β†’ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↔ 𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}))
218217, 44anbi12d 630 . . . . . . . 8 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) ↔ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))))
219213, 216, 218cbvopab1 5218 . . . . . . 7 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
220 df-mpt 5227 . . . . . . 7 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
221 df-mpt 5227 . . . . . . 7 (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
222219, 220, 2213eqtr4i 2763 . . . . . 6 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
223211, 212, 2223eqtr4g 2790 . . . . 5 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} βŠ† 𝐴 β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))))
224210, 223ax-mp 5 . . . 4 ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
225 resmpt 6036 . . . . . 6 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)))
226 nfcv 2892 . . . . . . . 8 Ⅎ𝑦if(0 ≀ 𝐡, 𝐡, 0)
227 nfcsb1v 3909 . . . . . . . 8 β„²π‘₯⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)
228 csbeq1a 3898 . . . . . . . 8 (π‘₯ = 𝑦 β†’ if(0 ≀ 𝐡, 𝐡, 0) = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))
229226, 227, 228cbvmpt 5254 . . . . . . 7 (π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) = (𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))
230229reseq1i 5975 . . . . . 6 ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢})
231 nfv 1909 . . . . . . . 8 Ⅎ𝑦(π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = if(0 ≀ 𝐡, 𝐡, 0))
232227nfeq2 2910 . . . . . . . . 9 β„²π‘₯ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)
233215, 232nfan 1894 . . . . . . . 8 β„²π‘₯(𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))
234228eqeq2d 2736 . . . . . . . . 9 (π‘₯ = 𝑦 β†’ (𝑧 = if(0 ≀ 𝐡, 𝐡, 0) ↔ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)))
235217, 234anbi12d 630 . . . . . . . 8 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = if(0 ≀ 𝐡, 𝐡, 0)) ↔ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))))
236231, 233, 235cbvopab1 5218 . . . . . . 7 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = if(0 ≀ 𝐡, 𝐡, 0))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))}
237 df-mpt 5227 . . . . . . 7 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ if(0 ≀ 𝐡, 𝐡, 0)) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = if(0 ≀ 𝐡, 𝐡, 0))}
238 df-mpt 5227 . . . . . . 7 (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))}
239236, 237, 2383eqtr4i 2763 . . . . . 6 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ if(0 ≀ 𝐡, 𝐡, 0)) = (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))
240225, 230, 2393eqtr4g 2790 . . . . 5 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} βŠ† 𝐴 β†’ ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ if(0 ≀ 𝐡, 𝐡, 0)))
241210, 240ax-mp 5 . . . 4 ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ if(0 ≀ 𝐡, 𝐡, 0))
242209, 224, 2413eqtr4g 2790 . . 3 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}))
2431, 87mbfpos 25598 . . . 4 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) ∈ MblFn)
244102mptpreima 6237 . . . . . 6 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (-∞(,)0)) = {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (-∞(,)0)}
245 elioomnf 13453 . . . . . . . . 9 (0 ∈ ℝ* β†’ (𝐢 ∈ (-∞(,)0) ↔ (𝐢 ∈ ℝ ∧ 𝐢 < 0)))
24676, 245ax-mp 5 . . . . . . . 8 (𝐢 ∈ (-∞(,)0) ↔ (𝐢 ∈ ℝ ∧ 𝐢 < 0))
2475biantrurd 531 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐢 < 0 ↔ (𝐢 ∈ ℝ ∧ 𝐢 < 0)))
248 ltnle 11323 . . . . . . . . . 10 ((𝐢 ∈ ℝ ∧ 0 ∈ ℝ) β†’ (𝐢 < 0 ↔ Β¬ 0 ≀ 𝐢))
2495, 2, 248sylancl 584 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐢 < 0 ↔ Β¬ 0 ≀ 𝐢))
250247, 249bitr3d 280 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ ((𝐢 ∈ ℝ ∧ 𝐢 < 0) ↔ Β¬ 0 ≀ 𝐢))
251246, 250bitrid 282 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐢 ∈ (-∞(,)0) ↔ Β¬ 0 ≀ 𝐢))
252251rabbidva 3426 . . . . . 6 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (-∞(,)0)} = {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢})
253244, 252eqtrid 2777 . . . . 5 (πœ‘ β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (-∞(,)0)) = {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢})
254 mbfima 25577 . . . . . 6 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (-∞(,)0)) ∈ dom vol)
255106, 107, 254syl2anc 582 . . . . 5 (πœ‘ β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (-∞(,)0)) ∈ dom vol)
256253, 255eqeltrrd 2826 . . . 4 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∈ dom vol)
257 mbfres 25591 . . . 4 (((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) ∈ MblFn ∧ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∈ dom vol) β†’ ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) ∈ MblFn)
258243, 256, 257syl2anc 582 . . 3 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) ∈ MblFn)
259242, 258eqeltrd 2825 . 2 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) ∈ MblFn)
260 rabxm 4382 . . . 4 𝐴 = ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢})
261260eqcomi 2734 . . 3 ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = 𝐴
262261a1i 11 . 2 (πœ‘ β†’ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = 𝐴)
2639, 200, 259, 262mbfres2 25592 1 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) ∈ MblFn)
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 394   = wceq 1533   ∈ wcel 2098  {crab 3419  β¦‹csb 3884   βˆͺ cun 3937   ∩ cin 3938   βŠ† wss 3939  ifcif 4524  {csn 4624   class class class wbr 5143  {copab 5205   ↦ cmpt 5226  β—‘ccnv 5671  dom cdm 5672   β†Ύ cres 5674   β€œ cima 5675  βŸΆwf 6539  (class class class)co 7416  β„cr 11137  0cc0 11138   + caddc 11141  +∞cpnf 11275  -∞cmnf 11276  β„*cxr 11277   < clt 11278   ≀ cle 11279  (,)cioo 13356  [,)cico 13358  volcvol 25410  MblFncmbf 25561
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-rep 5280  ax-sep 5294  ax-nul 5301  ax-pow 5359  ax-pr 5423  ax-un 7738  ax-inf2 9664  ax-cnex 11194  ax-resscn 11195  ax-1cn 11196  ax-icn 11197  ax-addcl 11198  ax-addrcl 11199  ax-mulcl 11200  ax-mulrcl 11201  ax-mulcom 11202  ax-addass 11203  ax-mulass 11204  ax-distr 11205  ax-i2m1 11206  ax-1ne0 11207  ax-1rid 11208  ax-rnegex 11209  ax-rrecex 11210  ax-cnre 11211  ax-pre-lttri 11212  ax-pre-lttrn 11213  ax-pre-ltadd 11214  ax-pre-mulgt0 11215  ax-pre-sup 11216
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2931  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3364  df-reu 3365  df-rab 3420  df-v 3465  df-sbc 3769  df-csb 3885  df-dif 3942  df-un 3944  df-in 3946  df-ss 3956  df-pss 3959  df-nul 4319  df-if 4525  df-pw 4600  df-sn 4625  df-pr 4627  df-op 4631  df-uni 4904  df-int 4945  df-iun 4993  df-br 5144  df-opab 5206  df-mpt 5227  df-tr 5261  df-id 5570  df-eprel 5576  df-po 5584  df-so 5585  df-fr 5627  df-se 5628  df-we 5629  df-xp 5678  df-rel 5679  df-cnv 5680  df-co 5681  df-dm 5682  df-rn 5683  df-res 5684  df-ima 5685  df-pred 6300  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6495  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 7372  df-ov 7419  df-oprab 7420  df-mpo 7421  df-of 7682  df-om 7869  df-1st 7991  df-2nd 7992  df-frecs 8285  df-wrecs 8316  df-recs 8390  df-rdg 8429  df-1o 8485  df-2o 8486  df-er 8723  df-map 8845  df-pm 8846  df-en 8963  df-dom 8964  df-sdom 8965  df-fin 8966  df-sup 9465  df-inf 9466  df-oi 9533  df-dju 9924  df-card 9962  df-pnf 11280  df-mnf 11281  df-xr 11282  df-ltxr 11283  df-le 11284  df-sub 11476  df-neg 11477  df-div 11902  df-nn 12243  df-2 12305  df-3 12306  df-n0 12503  df-z 12589  df-uz 12853  df-q 12963  df-rp 13007  df-xadd 13125  df-ioo 13360  df-ico 13362  df-icc 13363  df-fz 13517  df-fzo 13660  df-fl 13789  df-seq 13999  df-exp 14059  df-hash 14322  df-cj 15078  df-re 15079  df-im 15080  df-sqrt 15214  df-abs 15215  df-clim 15464  df-sum 15665  df-xmet 21276  df-met 21277  df-ovol 25411  df-vol 25412  df-mbf 25566
This theorem is referenced by:  itgaddnclem2  37209
  Copyright terms: Public domain W3C validator