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

Theorem ibladdnclem 36029
Description: Lemma for ibladdnc 36030; cf ibladdlem 25106, whose fifth hypothesis is rendered unnecessary by the weakened hypotheses of itg2addnc 36027. (Contributed by Brendan Leahy, 31-Oct-2017.)
Hypotheses
Ref Expression
ibladdnclem.1 ((𝜑𝑥𝐴) → 𝐵 ∈ ℝ)
ibladdnclem.2 ((𝜑𝑥𝐴) → 𝐶 ∈ ℝ)
ibladdnclem.3 ((𝜑𝑥𝐴) → 𝐷 = (𝐵 + 𝐶))
ibladdnclem.4 (𝜑 → (𝑥𝐴𝐵) ∈ MblFn)
ibladdnclem.6 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) ∈ ℝ)
ibladdnclem.7 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) ∈ ℝ)
Assertion
Ref Expression
ibladdnclem (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ∈ ℝ)
Distinct variable groups:   𝑥,𝐴   𝜑,𝑥
Allowed substitution hints:   𝐵(𝑥)   𝐶(𝑥)   𝐷(𝑥)

Proof of Theorem ibladdnclem
StepHypRef Expression
1 ifan 4537 . . . 4 if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) = if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0)
2 ibladdnclem.3 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 = (𝐵 + 𝐶))
3 ibladdnclem.1 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐵 ∈ ℝ)
4 ibladdnclem.2 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐶 ∈ ℝ)
53, 4readdcld 11117 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ∈ ℝ)
62, 5eqeltrd 2838 . . . . . . . . 9 ((𝜑𝑥𝐴) → 𝐷 ∈ ℝ)
7 0re 11090 . . . . . . . . 9 0 ∈ ℝ
8 ifcl 4529 . . . . . . . . 9 ((𝐷 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
96, 7, 8sylancl 586 . . . . . . . 8 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
109rexrd 11138 . . . . . . 7 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ*)
11 max1 13032 . . . . . . . 8 ((0 ∈ ℝ ∧ 𝐷 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
127, 6, 11sylancr 587 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
13 elxrge0 13302 . . . . . . 7 (if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞) ↔ (if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ* ∧ 0 ≤ if(0 ≤ 𝐷, 𝐷, 0)))
1410, 12, 13sylanbrc 583 . . . . . 6 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞))
15 0e0iccpnf 13304 . . . . . . 7 0 ∈ (0[,]+∞)
1615a1i 11 . . . . . 6 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,]+∞))
1714, 16ifclda 4519 . . . . 5 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
1817adantr 481 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
191, 18eqeltrid 2842 . . 3 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ∈ (0[,]+∞))
2019fmpttd 7057 . 2 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)):ℝ⟶(0[,]+∞))
21 reex 11075 . . . . . . . 8 ℝ ∈ V
2221a1i 11 . . . . . . 7 (𝜑 → ℝ ∈ V)
23 ifan 4537 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0)
24 ifcl 4529 . . . . . . . . . . 11 ((𝐵 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
253, 7, 24sylancl 586 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
267a1i 11 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ ℝ)
2725, 26ifclda 4519 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ ℝ)
2823, 27eqeltrid 2842 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
2928adantr 481 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
30 ifan 4537 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0)
31 ifcl 4529 . . . . . . . . . . 11 ((𝐶 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
324, 7, 31sylancl 586 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
3332, 26ifclda 4519 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ ℝ)
3430, 33eqeltrid 2842 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
3534adantr 481 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
36 eqidd 2738 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)))
37 eqidd 2738 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))
3822, 29, 35, 36, 37offval2 7627 . . . . . 6 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))))
39 iftrue 4490 . . . . . . . . 9 (𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
40 ibar 529 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐵 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐵)))
4140ifbid 4507 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐵, 𝐵, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
42 ibar 529 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐶 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐶)))
4342ifbid 4507 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐶, 𝐶, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))
4441, 43oveq12d 7367 . . . . . . . . 9 (𝑥𝐴 → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) = (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))
4539, 44eqtr2d 2778 . . . . . . . 8 (𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
46 00id 11263 . . . . . . . . 9 (0 + 0) = 0
47 simpl 483 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐵) → 𝑥𝐴)
4847con3i 154 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
4948iffalsed 4495 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
50 simpl 483 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐶) → 𝑥𝐴)
5150con3i 154 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐶))
5251iffalsed 4495 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = 0)
5349, 52oveq12d 7367 . . . . . . . . 9 𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = (0 + 0))
54 iffalse 4493 . . . . . . . . 9 𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = 0)
5546, 53, 543eqtr4a 2803 . . . . . . . 8 𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
5645, 55pm2.61i 182 . . . . . . 7 (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)
5756mpteq2i 5208 . . . . . 6 (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
5838, 57eqtrdi 2793 . . . . 5 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
5958fveq2d 6841 . . . 4 (𝜑 → (∫2‘((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))))
60 ibladdnclem.4 . . . . . . . 8 (𝜑 → (𝑥𝐴𝐵) ∈ MblFn)
6160, 3mbfdm2 24923 . . . . . . 7 (𝜑𝐴 ∈ dom vol)
62 mblss 24817 . . . . . . 7 (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
6361, 62syl 17 . . . . . 6 (𝜑𝐴 ⊆ ℝ)
64 rembl 24826 . . . . . . 7 ℝ ∈ dom vol
6564a1i 11 . . . . . 6 (𝜑 → ℝ ∈ dom vol)
6628adantr 481 . . . . . 6 ((𝜑𝑥𝐴) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
67 eldifn 4085 . . . . . . . . 9 (𝑥 ∈ (ℝ ∖ 𝐴) → ¬ 𝑥𝐴)
6867adantl 482 . . . . . . . 8 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ 𝑥𝐴)
6968intnanrd 490 . . . . . . 7 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
7069iffalsed 4495 . . . . . 6 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
7141mpteq2ia 5206 . . . . . . 7 (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) = (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
723, 60mbfpos 24937 . . . . . . 7 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn)
7371, 72eqeltrrid 2843 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
7463, 65, 66, 70, 73mbfss 24932 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
75 max1 13032 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
767, 3, 75sylancr 587 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
77 elrege0 13299 . . . . . . . . . 10 (if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐵, 𝐵, 0)))
7825, 76, 77sylanbrc 583 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞))
79 0e0icopnf 13303 . . . . . . . . . 10 0 ∈ (0[,)+∞)
8079a1i 11 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,)+∞))
8178, 80ifclda 4519 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ (0[,)+∞))
8223, 81eqeltrid 2842 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8382adantr 481 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8483fmpttd 7057 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)):ℝ⟶(0[,)+∞))
85 ibladdnclem.6 . . . . 5 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) ∈ ℝ)
86 max1 13032 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
877, 4, 86sylancr 587 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
88 elrege0 13299 . . . . . . . . . 10 (if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐶, 𝐶, 0)))
8932, 87, 88sylanbrc 583 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞))
9089, 80ifclda 4519 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ (0[,)+∞))
9130, 90eqeltrid 2842 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
9291adantr 481 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
9392fmpttd 7057 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)):ℝ⟶(0[,)+∞))
94 ibladdnclem.7 . . . . 5 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) ∈ ℝ)
9574, 84, 85, 93, 94itg2addnc 36027 . . . 4 (𝜑 → (∫2‘((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
9659, 95eqtr3d 2779 . . 3 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
9785, 94readdcld 11117 . . 3 (𝜑 → ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) ∈ ℝ)
9896, 97eqeltrd 2838 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) ∈ ℝ)
9925, 32readdcld 11117 . . . . . . . 8 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ)
10099rexrd 11138 . . . . . . 7 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ*)
10125, 32, 76, 87addge0d 11664 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
102 elxrge0 13302 . . . . . . 7 ((if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ (0[,]+∞) ↔ ((if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ* ∧ 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
103100, 101, 102sylanbrc 583 . . . . . 6 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ (0[,]+∞))
104103, 16ifclda 4519 . . . . 5 (𝜑 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
105104adantr 481 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
106105fmpttd 7057 . . 3 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)):ℝ⟶(0[,]+∞))
107 max2 13034 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
1087, 3, 107sylancr 587 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
109 max2 13034 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1107, 4, 109sylancr 587 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1113, 4, 25, 32, 108, 110le2addd 11707 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
1122, 111eqbrtrd 5125 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
113 breq1 5106 . . . . . . . . . . 11 (𝐷 = if(0 ≤ 𝐷, 𝐷, 0) → (𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
114 breq1 5106 . . . . . . . . . . 11 (0 = if(0 ≤ 𝐷, 𝐷, 0) → (0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
115113, 114ifboth 4523 . . . . . . . . . 10 ((𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∧ 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))) → if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
116112, 101, 115syl2anc 584 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
117 iftrue 4490 . . . . . . . . . 10 (𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = if(0 ≤ 𝐷, 𝐷, 0))
118117adantl 482 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = if(0 ≤ 𝐷, 𝐷, 0))
11939adantl 482 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
120116, 118, 1193brtr4d 5135 . . . . . . . 8 ((𝜑𝑥𝐴) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
121120ex 413 . . . . . . 7 (𝜑 → (𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
122 0le0 12187 . . . . . . . . 9 0 ≤ 0
123122a1i 11 . . . . . . . 8 𝑥𝐴 → 0 ≤ 0)
124 iffalse 4493 . . . . . . . 8 𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = 0)
125123, 124, 543brtr4d 5135 . . . . . . 7 𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
126121, 125pm2.61d1 180 . . . . . 6 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
1271, 126eqbrtrid 5138 . . . . 5 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
128127ralrimivw 3145 . . . 4 (𝜑 → ∀𝑥 ∈ ℝ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
129 eqidd 2738 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)))
130 eqidd 2738 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
13122, 19, 105, 129, 130ofrfval2 7628 . . . 4 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) ∘r ≤ (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)) ↔ ∀𝑥 ∈ ℝ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
132128, 131mpbird 256 . . 3 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) ∘r ≤ (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
133 itg2le 25026 . . 3 (((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)):ℝ⟶(0[,]+∞) ∧ (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)):ℝ⟶(0[,]+∞) ∧ (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) ∘r ≤ (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))))
13420, 106, 132, 133syl3anc 1371 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))))
135 itg2lecl 25025 . 2 (((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)):ℝ⟶(0[,]+∞) ∧ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) ∈ ℝ ∧ (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))) → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ∈ ℝ)
13620, 98, 134, 135syl3anc 1371 1 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ∈ ℝ)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396   = wceq 1541  wcel 2106  wral 3062  Vcvv 3443  cdif 3905  wss 3908  ifcif 4484   class class class wbr 5103  cmpt 5186  dom cdm 5630  wf 6487  cfv 6491  (class class class)co 7349  f cof 7605  r cofr 7606  cr 10983  0cc0 10984   + caddc 10987  +∞cpnf 11119  *cxr 11121  cle 11123  [,)cico 13194  [,]cicc 13195  volcvol 24749  MblFncmbf 24900  2citg2 24902
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 2708  ax-rep 5240  ax-sep 5254  ax-nul 5261  ax-pow 5318  ax-pr 5382  ax-un 7662  ax-inf2 9510  ax-cnex 11040  ax-resscn 11041  ax-1cn 11042  ax-icn 11043  ax-addcl 11044  ax-addrcl 11045  ax-mulcl 11046  ax-mulrcl 11047  ax-mulcom 11048  ax-addass 11049  ax-mulass 11050  ax-distr 11051  ax-i2m1 11052  ax-1ne0 11053  ax-1rid 11054  ax-rnegex 11055  ax-rrecex 11056  ax-cnre 11057  ax-pre-lttri 11058  ax-pre-lttrn 11059  ax-pre-ltadd 11060  ax-pre-mulgt0 11061  ax-pre-sup 11062  ax-addf 11063
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 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3351  df-reu 3352  df-rab 3406  df-v 3445  df-sbc 3738  df-csb 3854  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3927  df-nul 4281  df-if 4485  df-pw 4560  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4864  df-int 4906  df-iun 4954  df-disj 5069  df-br 5104  df-opab 5166  df-mpt 5187  df-tr 5221  df-id 5528  df-eprel 5534  df-po 5542  df-so 5543  df-fr 5585  df-se 5586  df-we 5587  df-xp 5636  df-rel 5637  df-cnv 5638  df-co 5639  df-dm 5640  df-rn 5641  df-res 5642  df-ima 5643  df-pred 6249  df-ord 6316  df-on 6317  df-lim 6318  df-suc 6319  df-iota 6443  df-fun 6493  df-fn 6494  df-f 6495  df-f1 6496  df-fo 6497  df-f1o 6498  df-fv 6499  df-isom 6500  df-riota 7305  df-ov 7352  df-oprab 7353  df-mpo 7354  df-of 7607  df-ofr 7608  df-om 7793  df-1st 7911  df-2nd 7912  df-frecs 8179  df-wrecs 8210  df-recs 8284  df-rdg 8323  df-1o 8379  df-2o 8380  df-er 8581  df-map 8700  df-pm 8701  df-en 8817  df-dom 8818  df-sdom 8819  df-fin 8820  df-fi 9280  df-sup 9311  df-inf 9312  df-oi 9379  df-dju 9770  df-card 9808  df-pnf 11124  df-mnf 11125  df-xr 11126  df-ltxr 11127  df-le 11128  df-sub 11320  df-neg 11321  df-div 11746  df-nn 12087  df-2 12149  df-3 12150  df-n0 12347  df-z 12433  df-uz 12696  df-q 12802  df-rp 12844  df-xneg 12961  df-xadd 12962  df-xmul 12963  df-ioo 13196  df-ico 13198  df-icc 13199  df-fz 13353  df-fzo 13496  df-fl 13625  df-seq 13835  df-exp 13896  df-hash 14158  df-cj 14917  df-re 14918  df-im 14919  df-sqrt 15053  df-abs 15054  df-clim 15304  df-sum 15505  df-rest 17238  df-topgen 17259  df-psmet 20711  df-xmet 20712  df-met 20713  df-bl 20714  df-mopn 20715  df-top 22165  df-topon 22182  df-bases 22218  df-cmp 22660  df-ovol 24750  df-vol 24751  df-mbf 24905  df-itg1 24906  df-itg2 24907
This theorem is referenced by:  ibladdnc  36030
  Copyright terms: Public domain W3C validator