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 36523
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 11212 . . . . 5 0 ∈ ℝ
3 ifcl 4572 . . . . 5 ((𝐡 ∈ ℝ ∧ 0 ∈ ℝ) β†’ if(0 ≀ 𝐡, 𝐡, 0) ∈ ℝ)
41, 2, 3sylancl 586 . . . 4 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ if(0 ≀ 𝐡, 𝐡, 0) ∈ ℝ)
5 mbfposadd.4 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ 𝐢 ∈ ℝ)
6 ifcl 4572 . . . . 5 ((𝐢 ∈ ℝ ∧ 0 ∈ ℝ) β†’ if(0 ≀ 𝐢, 𝐢, 0) ∈ ℝ)
75, 2, 6sylancl 586 . . . 4 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ if(0 ≀ 𝐢, 𝐢, 0) ∈ ℝ)
84, 7readdcld 11239 . . 3 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) ∈ ℝ)
98fmpttd 7111 . 2 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))):π΄βŸΆβ„)
10 ssrab2 4076 . . . 4 {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βŠ† 𝐴
11 fssres 6754 . . . 4 (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))):π΄βŸΆβ„ ∧ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βŠ† 𝐴) β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}):{π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}βŸΆβ„)
129, 10, 11sylancl 586 . . 3 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}):{π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}βŸΆβ„)
13 inss2 4228 . . . . . 6 ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}
14 resabs1 6009 . . . . . 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 3963 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
17 rabid 3452 . . . . . . . . . 10 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ↔ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐡))
18 rabid 3452 . . . . . . . . . 10 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} ↔ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢))
1917, 18anbi12i 627 . . . . . . . . 9 ((π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ ((π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐡) ∧ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢)))
2016, 19bitri 274 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ ((π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐡) ∧ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢)))
21 iftrue 4533 . . . . . . . . . 10 (0 ≀ 𝐡 β†’ if(0 ≀ 𝐡, 𝐡, 0) = 𝐡)
22 iftrue 4533 . . . . . . . . . 10 (0 ≀ 𝐢 β†’ if(0 ≀ 𝐢, 𝐢, 0) = 𝐢)
2321, 22oveqan12d 7424 . . . . . . . . 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 5250 . . . . . 6 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢))
27 inss1 4227 . . . . . . . 8 ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡}
28 ssrab2 4076 . . . . . . . 8 {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} βŠ† 𝐴
2927, 28sstri 3990 . . . . . . 7 ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴
30 resmpt 6035 . . . . . . . 8 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))))
31 nfcv 2903 . . . . . . . . . 10 Ⅎ𝑦(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))
32 nfcsb1v 3917 . . . . . . . . . 10 β„²π‘₯⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))
33 csbeq1a 3906 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
3431, 32, 33cbvmpt 5258 . . . . . . . . 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 1917 . . . . . . . . . 10 Ⅎ𝑦(π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
37 nfrab1 3451 . . . . . . . . . . . . 13 β„²π‘₯{π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡}
38 nfrab1 3451 . . . . . . . . . . . . 13 β„²π‘₯{π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}
3937, 38nfin 4215 . . . . . . . . . . . 12 β„²π‘₯({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
4039nfcri 2890 . . . . . . . . . . 11 β„²π‘₯ 𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
4132nfeq2 2920 . . . . . . . . . . 11 β„²π‘₯ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))
4240, 41nfan 1902 . . . . . . . . . 10 β„²π‘₯(𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
43 eleq1w 2816 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ 𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
4433eqeq2d 2743 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) ↔ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))))
4543, 44anbi12d 631 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) ↔ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))))
4636, 42, 45cbvopab1 5222 . . . . . . . . 9 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
47 df-mpt 5231 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
48 df-mpt 5231 . . . . . . . . 9 (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
4946, 47, 483eqtr4i 2770 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
5030, 35, 493eqtr4g 2797 . . . . . . 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 6035 . . . . . . . 8 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)))
53 nfcv 2903 . . . . . . . . . 10 Ⅎ𝑦(𝐡 + 𝐢)
54 nfcsb1v 3917 . . . . . . . . . 10 β„²π‘₯⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)
55 csbeq1a 3906 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ (𝐡 + 𝐢) = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))
5653, 54, 55cbvmpt 5258 . . . . . . . . 9 (π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) = (𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))
5756reseq1i 5975 . . . . . . . 8 ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
58 nfv 1917 . . . . . . . . . 10 Ⅎ𝑦(π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (𝐡 + 𝐢))
5954nfeq2 2920 . . . . . . . . . . 11 β„²π‘₯ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)
6040, 59nfan 1902 . . . . . . . . . 10 β„²π‘₯(𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))
6155eqeq2d 2743 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (𝑧 = (𝐡 + 𝐢) ↔ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)))
6243, 61anbi12d 631 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (𝐡 + 𝐢)) ↔ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))))
6358, 60, 62cbvopab1 5222 . . . . . . . . 9 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (𝐡 + 𝐢))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))}
64 df-mpt 5231 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢)) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (𝐡 + 𝐢))}
65 df-mpt 5231 . . . . . . . . 9 (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢)) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))}
6663, 64, 653eqtr4i 2770 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢)) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(𝐡 + 𝐢))
6752, 57, 663eqtr4g 2797 . . . . . . 7 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢)))
6829, 67ax-mp 5 . . . . . 6 ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (𝐡 + 𝐢))
6926, 51, 683eqtr4i 2770 . . . . 5 ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
7015, 69eqtri 2760 . . . 4 (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
71 mbfposadd.5 . . . . 5 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) ∈ MblFn)
721biantrurd 533 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 ≀ 𝐡 ↔ (𝐡 ∈ ℝ ∧ 0 ≀ 𝐡)))
73 elrege0 13427 . . . . . . . . . 10 (𝐡 ∈ (0[,)+∞) ↔ (𝐡 ∈ ℝ ∧ 0 ≀ 𝐡))
7472, 73bitr4di 288 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 ≀ 𝐡 ↔ 𝐡 ∈ (0[,)+∞)))
7574rabbidva 3439 . . . . . . . 8 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} = {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (0[,)+∞)})
76 0xr 11257 . . . . . . . . . . 11 0 ∈ ℝ*
77 pnfxr 11264 . . . . . . . . . . 11 +∞ ∈ ℝ*
78 0ltpnf 13098 . . . . . . . . . . 11 0 < +∞
79 snunioo 13451 . . . . . . . . . . 11 ((0 ∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 0 < +∞) β†’ ({0} βˆͺ (0(,)+∞)) = (0[,)+∞))
8076, 77, 78, 79mp3an 1461 . . . . . . . . . 10 ({0} βˆͺ (0(,)+∞)) = (0[,)+∞)
8180imaeq2i 6055 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ ({0} βˆͺ (0(,)+∞))) = (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0[,)+∞))
82 imaundi 6146 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ ({0} βˆͺ (0(,)+∞))) = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞)))
83 eqid 2732 . . . . . . . . . 10 (π‘₯ ∈ 𝐴 ↦ 𝐡) = (π‘₯ ∈ 𝐴 ↦ 𝐡)
8483mptpreima 6234 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0[,)+∞)) = {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (0[,)+∞)}
8581, 82, 843eqtr3ri 2769 . . . . . . . 8 {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (0[,)+∞)} = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞)))
8675, 85eqtrdi 2788 . . . . . . 7 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞))))
87 mbfposadd.1 . . . . . . . 8 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn)
881fmpttd 7111 . . . . . . . 8 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„)
89 mbfimasn 25140 . . . . . . . . . 10 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„ ∧ 0 ∈ ℝ) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) ∈ dom vol)
902, 89mp3an3 1450 . . . . . . . . 9 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) ∈ dom vol)
91 mbfima 25138 . . . . . . . . 9 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞)) ∈ dom vol)
92 unmbl 25045 . . . . . . . . 9 (((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) ∈ dom vol ∧ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞)) ∈ dom vol) β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞))) ∈ dom vol)
9390, 91, 92syl2anc 584 . . . . . . . 8 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„) β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞))) ∈ dom vol)
9487, 88, 93syl2anc 584 . . . . . . 7 (πœ‘ β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (0(,)+∞))) ∈ dom vol)
9586, 94eqeltrd 2833 . . . . . 6 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∈ dom vol)
965biantrurd 533 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 ≀ 𝐢 ↔ (𝐢 ∈ ℝ ∧ 0 ≀ 𝐢)))
97 elrege0 13427 . . . . . . . . . 10 (𝐢 ∈ (0[,)+∞) ↔ (𝐢 ∈ ℝ ∧ 0 ≀ 𝐢))
9896, 97bitr4di 288 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 ≀ 𝐢 ↔ 𝐢 ∈ (0[,)+∞)))
9998rabbidva 3439 . . . . . . . 8 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} = {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (0[,)+∞)})
10080imaeq2i 6055 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ ({0} βˆͺ (0(,)+∞))) = (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0[,)+∞))
101 imaundi 6146 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ ({0} βˆͺ (0(,)+∞))) = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞)))
102 eqid 2732 . . . . . . . . . 10 (π‘₯ ∈ 𝐴 ↦ 𝐢) = (π‘₯ ∈ 𝐴 ↦ 𝐢)
103102mptpreima 6234 . . . . . . . . 9 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0[,)+∞)) = {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (0[,)+∞)}
104100, 101, 1033eqtr3ri 2769 . . . . . . . 8 {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (0[,)+∞)} = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞)))
10599, 104eqtrdi 2788 . . . . . . 7 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} = ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞))))
106 mbfposadd.3 . . . . . . . 8 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn)
1075fmpttd 7111 . . . . . . . 8 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„)
108 mbfimasn 25140 . . . . . . . . . 10 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„ ∧ 0 ∈ ℝ) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) ∈ dom vol)
1092, 108mp3an3 1450 . . . . . . . . 9 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) ∈ dom vol)
110 mbfima 25138 . . . . . . . . 9 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞)) ∈ dom vol)
111 unmbl 25045 . . . . . . . . 9 (((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) ∈ dom vol ∧ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞)) ∈ dom vol) β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞))) ∈ dom vol)
112109, 110, 111syl2anc 584 . . . . . . . 8 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„) β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞))) ∈ dom vol)
113106, 107, 112syl2anc 584 . . . . . . 7 (πœ‘ β†’ ((β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ {0}) βˆͺ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (0(,)+∞))) ∈ dom vol)
114105, 113eqeltrd 2833 . . . . . 6 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} ∈ dom vol)
115 inmbl 25050 . . . . . 6 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∈ dom vol ∧ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} ∈ dom vol) β†’ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol)
11695, 114, 115syl2anc 584 . . . . 5 (πœ‘ β†’ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol)
117 mbfres 25152 . . . . 5 (((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) ∈ MblFn ∧ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol) β†’ ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
11871, 116, 117syl2anc 584 . . . 4 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (𝐡 + 𝐢)) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
11970, 118eqeltrid 2837 . . 3 (πœ‘ β†’ (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
120 inss2 4228 . . . . . 6 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}
121 resabs1 6009 . . . . . 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 3452 . . . . . . . . . 10 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ↔ (π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐡))
124123, 18anbi12i 627 . . . . . . . . 9 ((π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ ((π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐡) ∧ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢)))
125 elin 3963 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
126 anandi 674 . . . . . . . . 9 ((π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢)) ↔ ((π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐡) ∧ (π‘₯ ∈ 𝐴 ∧ 0 ≀ 𝐢)))
127124, 125, 1263bitr4i 302 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ (π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢)))
128 iffalse 4536 . . . . . . . . . . 11 (Β¬ 0 ≀ 𝐡 β†’ if(0 ≀ 𝐡, 𝐡, 0) = 0)
129128, 22oveqan12d 7424 . . . . . . . . . 10 ((Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = (0 + 𝐢))
130129ad2antll 727 . . . . . . . . 9 ((πœ‘ ∧ (π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢))) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = (0 + 𝐢))
1315recnd 11238 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ 𝐢 ∈ β„‚)
132131addlidd 11411 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (0 + 𝐢) = 𝐢)
133132adantrr 715 . . . . . . . . 9 ((πœ‘ ∧ (π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢))) β†’ (0 + 𝐢) = 𝐢)
134130, 133eqtrd 2772 . . . . . . . 8 ((πœ‘ ∧ (π‘₯ ∈ 𝐴 ∧ (Β¬ 0 ≀ 𝐡 ∧ 0 ≀ 𝐢))) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = 𝐢)
135127, 134sylan2b 594 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = 𝐢)
136135mpteq2dva 5247 . . . . . 6 (πœ‘ β†’ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢))
137 inss1 4227 . . . . . . . 8 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡}
138 ssrab2 4076 . . . . . . . 8 {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} βŠ† 𝐴
139137, 138sstri 3990 . . . . . . 7 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴
140 resmpt 6035 . . . . . . . 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 1917 . . . . . . . . . 10 Ⅎ𝑦(π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
143 nfrab1 3451 . . . . . . . . . . . . 13 β„²π‘₯{π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡}
144143, 38nfin 4215 . . . . . . . . . . . 12 β„²π‘₯({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
145144nfcri 2890 . . . . . . . . . . 11 β„²π‘₯ 𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
146145, 41nfan 1902 . . . . . . . . . 10 β„²π‘₯(𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
147 eleq1w 2816 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↔ 𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
148147, 44anbi12d 631 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) ↔ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))))
149142, 146, 148cbvopab1 5222 . . . . . . . . 9 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
150 df-mpt 5231 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
151 df-mpt 5231 . . . . . . . . 9 (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
152149, 150, 1513eqtr4i 2770 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
153140, 141, 1523eqtr4g 2797 . . . . . . 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 6035 . . . . . . . 8 (({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌𝐢))
156 nfcv 2903 . . . . . . . . . 10 Ⅎ𝑦𝐢
157 nfcsb1v 3917 . . . . . . . . . 10 β„²π‘₯⦋𝑦 / π‘₯⦌𝐢
158 csbeq1a 3906 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ 𝐢 = ⦋𝑦 / π‘₯⦌𝐢)
159156, 157, 158cbvmpt 5258 . . . . . . . . 9 (π‘₯ ∈ 𝐴 ↦ 𝐢) = (𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌𝐢)
160159reseq1i 5975 . . . . . . . 8 ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
161 nfv 1917 . . . . . . . . . 10 Ⅎ𝑦(π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = 𝐢)
162157nfeq2 2920 . . . . . . . . . . 11 β„²π‘₯ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢
163145, 162nfan 1902 . . . . . . . . . 10 β„²π‘₯(𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢)
164158eqeq2d 2743 . . . . . . . . . . 11 (π‘₯ = 𝑦 β†’ (𝑧 = 𝐢 ↔ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢))
165147, 164anbi12d 631 . . . . . . . . . 10 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = 𝐢) ↔ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢)))
166161, 163, 165cbvopab1 5222 . . . . . . . . 9 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = 𝐢)} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢)}
167 df-mpt 5231 . . . . . . . . 9 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = 𝐢)}
168 df-mpt 5231 . . . . . . . . 9 (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌𝐢) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∧ 𝑧 = ⦋𝑦 / π‘₯⦌𝐢)}
169166, 167, 1683eqtr4i 2770 . . . . . . . 8 (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢) = (𝑦 ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ ⦋𝑦 / π‘₯⦌𝐢)
170155, 160, 1693eqtr4g 2797 . . . . . . 7 (({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βŠ† 𝐴 β†’ ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢))
171139, 170ax-mp 5 . . . . . 6 ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = (π‘₯ ∈ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ↦ 𝐢)
172136, 154, 1713eqtr4g 2797 . . . . 5 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
173122, 172eqtrid 2784 . . . 4 (πœ‘ β†’ (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})))
17483mptpreima 6234 . . . . . . . 8 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (-∞(,)0)) = {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (-∞(,)0)}
175 elioomnf 13417 . . . . . . . . . . 11 (0 ∈ ℝ* β†’ (𝐡 ∈ (-∞(,)0) ↔ (𝐡 ∈ ℝ ∧ 𝐡 < 0)))
17676, 175ax-mp 5 . . . . . . . . . 10 (𝐡 ∈ (-∞(,)0) ↔ (𝐡 ∈ ℝ ∧ 𝐡 < 0))
1771biantrurd 533 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐡 < 0 ↔ (𝐡 ∈ ℝ ∧ 𝐡 < 0)))
178 ltnle 11289 . . . . . . . . . . . 12 ((𝐡 ∈ ℝ ∧ 0 ∈ ℝ) β†’ (𝐡 < 0 ↔ Β¬ 0 ≀ 𝐡))
1791, 2, 178sylancl 586 . . . . . . . . . . 11 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐡 < 0 ↔ Β¬ 0 ≀ 𝐡))
180177, 179bitr3d 280 . . . . . . . . . 10 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ ((𝐡 ∈ ℝ ∧ 𝐡 < 0) ↔ Β¬ 0 ≀ 𝐡))
181176, 180bitrid 282 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐡 ∈ (-∞(,)0) ↔ Β¬ 0 ≀ 𝐡))
182181rabbidva 3439 . . . . . . . 8 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 𝐡 ∈ (-∞(,)0)} = {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡})
183174, 182eqtrid 2784 . . . . . . 7 (πœ‘ β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (-∞(,)0)) = {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡})
184 mbfima 25138 . . . . . . . 8 (((π‘₯ ∈ 𝐴 ↦ 𝐡) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐡):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (-∞(,)0)) ∈ dom vol)
18587, 88, 184syl2anc 584 . . . . . . 7 (πœ‘ β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐡) β€œ (-∞(,)0)) ∈ dom vol)
186183, 185eqeltrrd 2834 . . . . . 6 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∈ dom vol)
187 inmbl 25050 . . . . . 6 (({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∈ dom vol ∧ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} ∈ dom vol) β†’ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol)
188186, 114, 187syl2anc 584 . . . . 5 (πœ‘ β†’ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol)
189 mbfres 25152 . . . . 5 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ dom vol) β†’ ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
190106, 188, 189syl2anc 584 . . . 4 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ 𝐢) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
191173, 190eqeltrd 2833 . . 3 (πœ‘ β†’ (((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) β†Ύ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) ∈ MblFn)
192 ssid 4003 . . . . . 6 𝐴 βŠ† 𝐴
193 dfrab3ss 4311 . . . . . 6 (𝐴 βŠ† 𝐴 β†’ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} = (𝐴 ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
194192, 193ax-mp 5 . . . . 5 {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} = (𝐴 ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
195 rabxm 4385 . . . . . 6 𝐴 = ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡})
196195ineq1i 4207 . . . . 5 (𝐴 ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) = (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡}) ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
197 indir 4274 . . . . 5 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡}) ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) = (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βˆͺ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}))
198194, 196, 1973eqtrri 2765 . . . 4 (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βˆͺ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}
199198a1i 11 . . 3 (πœ‘ β†’ (({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) βˆͺ ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐡} ∩ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})) = {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢})
20012, 119, 191, 199mbfres2 25153 . 2 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢}) ∈ MblFn)
201 rabid 3452 . . . . . 6 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↔ (π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐢))
202 iffalse 4536 . . . . . . . . 9 (Β¬ 0 ≀ 𝐢 β†’ if(0 ≀ 𝐢, 𝐢, 0) = 0)
203202oveq2d 7421 . . . . . . . 8 (Β¬ 0 ≀ 𝐢 β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = (if(0 ≀ 𝐡, 𝐡, 0) + 0))
2044recnd 11238 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ if(0 ≀ 𝐡, 𝐡, 0) ∈ β„‚)
205204addridd 11410 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + 0) = if(0 ≀ 𝐡, 𝐡, 0))
206203, 205sylan9eqr 2794 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ 𝐴) ∧ Β¬ 0 ≀ 𝐢) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = if(0 ≀ 𝐡, 𝐡, 0))
207206anasss 467 . . . . . 6 ((πœ‘ ∧ (π‘₯ ∈ 𝐴 ∧ Β¬ 0 ≀ 𝐢)) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = if(0 ≀ 𝐡, 𝐡, 0))
208201, 207sylan2b 594 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) β†’ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)) = if(0 ≀ 𝐡, 𝐡, 0))
209208mpteq2dva 5247 . . . 4 (πœ‘ β†’ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ if(0 ≀ 𝐡, 𝐡, 0)))
210 ssrab2 4076 . . . . 5 {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} βŠ† 𝐴
211 resmpt 6035 . . . . . 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 1917 . . . . . . . 8 Ⅎ𝑦(π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
214 nfrab1 3451 . . . . . . . . . 10 β„²π‘₯{π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}
215214nfcri 2890 . . . . . . . . 9 β„²π‘₯ 𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}
216215, 41nfan 1902 . . . . . . . 8 β„²π‘₯(𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
217 eleq1w 2816 . . . . . . . . 9 (π‘₯ = 𝑦 β†’ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↔ 𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}))
218217, 44anbi12d 631 . . . . . . . 8 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) ↔ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))))
219213, 216, 218cbvopab1 5222 . . . . . . 7 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
220 df-mpt 5231 . . . . . . 7 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
221 df-mpt 5231 . . . . . . 7 (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))}
222219, 220, 2213eqtr4i 2770 . . . . . 6 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) = (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌(if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0)))
223211, 212, 2223eqtr4g 2797 . . . . 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 6035 . . . . . 6 ({π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} βŠ† 𝐴 β†’ ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)))
226 nfcv 2903 . . . . . . . 8 Ⅎ𝑦if(0 ≀ 𝐡, 𝐡, 0)
227 nfcsb1v 3917 . . . . . . . 8 β„²π‘₯⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)
228 csbeq1a 3906 . . . . . . . 8 (π‘₯ = 𝑦 β†’ if(0 ≀ 𝐡, 𝐡, 0) = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))
229226, 227, 228cbvmpt 5258 . . . . . . 7 (π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) = (𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))
230229reseq1i 5975 . . . . . 6 ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = ((𝑦 ∈ 𝐴 ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢})
231 nfv 1917 . . . . . . . 8 Ⅎ𝑦(π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = if(0 ≀ 𝐡, 𝐡, 0))
232227nfeq2 2920 . . . . . . . . 9 β„²π‘₯ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)
233215, 232nfan 1902 . . . . . . . 8 β„²π‘₯(𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))
234228eqeq2d 2743 . . . . . . . . 9 (π‘₯ = 𝑦 β†’ (𝑧 = if(0 ≀ 𝐡, 𝐡, 0) ↔ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)))
235217, 234anbi12d 631 . . . . . . . 8 (π‘₯ = 𝑦 β†’ ((π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = if(0 ≀ 𝐡, 𝐡, 0)) ↔ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))))
236231, 233, 235cbvopab1 5222 . . . . . . 7 {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = if(0 ≀ 𝐡, 𝐡, 0))} = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))}
237 df-mpt 5231 . . . . . . 7 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ if(0 ≀ 𝐡, 𝐡, 0)) = {⟨π‘₯, π‘§βŸ© ∣ (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = if(0 ≀ 𝐡, 𝐡, 0))}
238 df-mpt 5231 . . . . . . 7 (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0)) = {βŸ¨π‘¦, π‘§βŸ© ∣ (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∧ 𝑧 = ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))}
239236, 237, 2383eqtr4i 2770 . . . . . 6 (π‘₯ ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ if(0 ≀ 𝐡, 𝐡, 0)) = (𝑦 ∈ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ↦ ⦋𝑦 / π‘₯⦌if(0 ≀ 𝐡, 𝐡, 0))
240225, 230, 2393eqtr4g 2797 . . . . 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 2797 . . 3 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}))
2431, 87mbfpos 25159 . . . 4 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) ∈ MblFn)
244102mptpreima 6234 . . . . . 6 (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (-∞(,)0)) = {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (-∞(,)0)}
245 elioomnf 13417 . . . . . . . . 9 (0 ∈ ℝ* β†’ (𝐢 ∈ (-∞(,)0) ↔ (𝐢 ∈ ℝ ∧ 𝐢 < 0)))
24676, 245ax-mp 5 . . . . . . . 8 (𝐢 ∈ (-∞(,)0) ↔ (𝐢 ∈ ℝ ∧ 𝐢 < 0))
2475biantrurd 533 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐢 < 0 ↔ (𝐢 ∈ ℝ ∧ 𝐢 < 0)))
248 ltnle 11289 . . . . . . . . . 10 ((𝐢 ∈ ℝ ∧ 0 ∈ ℝ) β†’ (𝐢 < 0 ↔ Β¬ 0 ≀ 𝐢))
2495, 2, 248sylancl 586 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐢 < 0 ↔ Β¬ 0 ≀ 𝐢))
250247, 249bitr3d 280 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ ((𝐢 ∈ ℝ ∧ 𝐢 < 0) ↔ Β¬ 0 ≀ 𝐢))
251246, 250bitrid 282 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ 𝐴) β†’ (𝐢 ∈ (-∞(,)0) ↔ Β¬ 0 ≀ 𝐢))
252251rabbidva 3439 . . . . . 6 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ 𝐢 ∈ (-∞(,)0)} = {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢})
253244, 252eqtrid 2784 . . . . 5 (πœ‘ β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (-∞(,)0)) = {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢})
254 mbfima 25138 . . . . . 6 (((π‘₯ ∈ 𝐴 ↦ 𝐢) ∈ MblFn ∧ (π‘₯ ∈ 𝐴 ↦ 𝐢):π΄βŸΆβ„) β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (-∞(,)0)) ∈ dom vol)
255106, 107, 254syl2anc 584 . . . . 5 (πœ‘ β†’ (β—‘(π‘₯ ∈ 𝐴 ↦ 𝐢) β€œ (-∞(,)0)) ∈ dom vol)
256253, 255eqeltrrd 2834 . . . 4 (πœ‘ β†’ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∈ dom vol)
257 mbfres 25152 . . . 4 (((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) ∈ MblFn ∧ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢} ∈ dom vol) β†’ ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) ∈ MblFn)
258243, 256, 257syl2anc 584 . . 3 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ if(0 ≀ 𝐡, 𝐡, 0)) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) ∈ MblFn)
259242, 258eqeltrd 2833 . 2 (πœ‘ β†’ ((π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) β†Ύ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) ∈ MblFn)
260 rabxm 4385 . . . 4 𝐴 = ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢})
261260eqcomi 2741 . . 3 ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = 𝐴
262261a1i 11 . 2 (πœ‘ β†’ ({π‘₯ ∈ 𝐴 ∣ 0 ≀ 𝐢} βˆͺ {π‘₯ ∈ 𝐴 ∣ Β¬ 0 ≀ 𝐢}) = 𝐴)
2639, 200, 259, 262mbfres2 25153 1 (πœ‘ β†’ (π‘₯ ∈ 𝐴 ↦ (if(0 ≀ 𝐡, 𝐡, 0) + if(0 ≀ 𝐢, 𝐢, 0))) ∈ MblFn)
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 396   = wceq 1541   ∈ wcel 2106  {crab 3432  β¦‹csb 3892   βˆͺ cun 3945   ∩ cin 3946   βŠ† wss 3947  ifcif 4527  {csn 4627   class class class wbr 5147  {copab 5209   ↦ cmpt 5230  β—‘ccnv 5674  dom cdm 5675   β†Ύ cres 5677   β€œ cima 5678  βŸΆwf 6536  (class class class)co 7405  β„cr 11105  0cc0 11106   + caddc 11109  +∞cpnf 11241  -∞cmnf 11242  β„*cxr 11243   < clt 11244   ≀ cle 11245  (,)cioo 13320  [,)cico 13322  volcvol 24971  MblFncmbf 25122
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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-inf2 9632  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-of 7666  df-om 7852  df-1st 7971  df-2nd 7972  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-2o 8463  df-er 8699  df-map 8818  df-pm 8819  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-sup 9433  df-inf 9434  df-oi 9501  df-dju 9892  df-card 9930  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-n0 12469  df-z 12555  df-uz 12819  df-q 12929  df-rp 12971  df-xadd 13089  df-ioo 13324  df-ico 13326  df-icc 13327  df-fz 13481  df-fzo 13624  df-fl 13753  df-seq 13963  df-exp 14024  df-hash 14287  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-clim 15428  df-sum 15629  df-xmet 20929  df-met 20930  df-ovol 24972  df-vol 24973  df-mbf 25127
This theorem is referenced by:  itgaddnclem2  36535
  Copyright terms: Public domain W3C validator