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 37700
Description: Lemma for ibladdnc 37701; cf ibladdlem 25773, whose fifth hypothesis is rendered unnecessary by the weakened hypotheses of itg2addnc 37698. (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 4554 . . . 4 if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) = if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0)
2 ibladdnclem.3 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 = (𝐵 + 𝐶))
3 ibladdnclem.1 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐵 ∈ ℝ)
4 ibladdnclem.2 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐶 ∈ ℝ)
53, 4readdcld 11264 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ∈ ℝ)
62, 5eqeltrd 2834 . . . . . . . . 9 ((𝜑𝑥𝐴) → 𝐷 ∈ ℝ)
7 0re 11237 . . . . . . . . 9 0 ∈ ℝ
8 ifcl 4546 . . . . . . . . 9 ((𝐷 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
96, 7, 8sylancl 586 . . . . . . . 8 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
109rexrd 11285 . . . . . . 7 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ*)
11 max1 13201 . . . . . . . 8 ((0 ∈ ℝ ∧ 𝐷 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
127, 6, 11sylancr 587 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
13 elxrge0 13474 . . . . . . 7 (if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞) ↔ (if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ* ∧ 0 ≤ if(0 ≤ 𝐷, 𝐷, 0)))
1410, 12, 13sylanbrc 583 . . . . . 6 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞))
15 0e0iccpnf 13476 . . . . . . 7 0 ∈ (0[,]+∞)
1615a1i 11 . . . . . 6 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,]+∞))
1714, 16ifclda 4536 . . . . 5 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
1817adantr 480 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
191, 18eqeltrid 2838 . . 3 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ∈ (0[,]+∞))
2019fmpttd 7105 . 2 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)):ℝ⟶(0[,]+∞))
21 reex 11220 . . . . . . . 8 ℝ ∈ V
2221a1i 11 . . . . . . 7 (𝜑 → ℝ ∈ V)
23 ifan 4554 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0)
24 ifcl 4546 . . . . . . . . . . 11 ((𝐵 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
253, 7, 24sylancl 586 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
267a1i 11 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ ℝ)
2725, 26ifclda 4536 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ ℝ)
2823, 27eqeltrid 2838 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
2928adantr 480 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
30 ifan 4554 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0)
31 ifcl 4546 . . . . . . . . . . 11 ((𝐶 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
324, 7, 31sylancl 586 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
3332, 26ifclda 4536 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ ℝ)
3430, 33eqeltrid 2838 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
3534adantr 480 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
36 eqidd 2736 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)))
37 eqidd 2736 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))
3822, 29, 35, 36, 37offval2 7691 . . . . . 6 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))))
39 iftrue 4506 . . . . . . . . 9 (𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
40 ibar 528 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐵 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐵)))
4140ifbid 4524 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐵, 𝐵, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
42 ibar 528 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐶 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐶)))
4342ifbid 4524 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐶, 𝐶, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))
4441, 43oveq12d 7423 . . . . . . . . 9 (𝑥𝐴 → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) = (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))
4539, 44eqtr2d 2771 . . . . . . . 8 (𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
46 00id 11410 . . . . . . . . 9 (0 + 0) = 0
47 simpl 482 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐵) → 𝑥𝐴)
4847con3i 154 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
4948iffalsed 4511 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
50 simpl 482 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐶) → 𝑥𝐴)
5150con3i 154 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐶))
5251iffalsed 4511 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = 0)
5349, 52oveq12d 7423 . . . . . . . . 9 𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = (0 + 0))
54 iffalse 4509 . . . . . . . . 9 𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = 0)
5546, 53, 543eqtr4a 2796 . . . . . . . 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 5217 . . . . . 6 (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
5838, 57eqtrdi 2786 . . . . 5 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
5958fveq2d 6880 . . . 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 25590 . . . . . . 7 (𝜑𝐴 ∈ dom vol)
62 mblss 25484 . . . . . . 7 (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
6361, 62syl 17 . . . . . 6 (𝜑𝐴 ⊆ ℝ)
64 rembl 25493 . . . . . . 7 ℝ ∈ dom vol
6564a1i 11 . . . . . 6 (𝜑 → ℝ ∈ dom vol)
6628adantr 480 . . . . . 6 ((𝜑𝑥𝐴) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
67 eldifn 4107 . . . . . . . . 9 (𝑥 ∈ (ℝ ∖ 𝐴) → ¬ 𝑥𝐴)
6867adantl 481 . . . . . . . 8 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ 𝑥𝐴)
6968intnanrd 489 . . . . . . 7 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
7069iffalsed 4511 . . . . . 6 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
7141mpteq2ia 5216 . . . . . . 7 (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) = (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
723, 60mbfpos 25604 . . . . . . 7 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn)
7371, 72eqeltrrid 2839 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
7463, 65, 66, 70, 73mbfss 25599 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
75 max1 13201 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
767, 3, 75sylancr 587 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
77 elrege0 13471 . . . . . . . . . 10 (if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐵, 𝐵, 0)))
7825, 76, 77sylanbrc 583 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞))
79 0e0icopnf 13475 . . . . . . . . . 10 0 ∈ (0[,)+∞)
8079a1i 11 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,)+∞))
8178, 80ifclda 4536 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ (0[,)+∞))
8223, 81eqeltrid 2838 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8382adantr 480 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8483fmpttd 7105 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)):ℝ⟶(0[,)+∞))
85 ibladdnclem.6 . . . . 5 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) ∈ ℝ)
86 max1 13201 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
877, 4, 86sylancr 587 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
88 elrege0 13471 . . . . . . . . . 10 (if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐶, 𝐶, 0)))
8932, 87, 88sylanbrc 583 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞))
9089, 80ifclda 4536 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ (0[,)+∞))
9130, 90eqeltrid 2838 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
9291adantr 480 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
9392fmpttd 7105 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)):ℝ⟶(0[,)+∞))
94 ibladdnclem.7 . . . . 5 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) ∈ ℝ)
9574, 84, 85, 93, 94itg2addnc 37698 . . . 4 (𝜑 → (∫2‘((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
9659, 95eqtr3d 2772 . . 3 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
9785, 94readdcld 11264 . . 3 (𝜑 → ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) ∈ ℝ)
9896, 97eqeltrd 2834 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) ∈ ℝ)
9925, 32readdcld 11264 . . . . . . . 8 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ)
10099rexrd 11285 . . . . . . 7 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ*)
10125, 32, 76, 87addge0d 11813 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
102 elxrge0 13474 . . . . . . 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 4536 . . . . 5 (𝜑 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
105104adantr 480 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
106105fmpttd 7105 . . 3 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)):ℝ⟶(0[,]+∞))
107 max2 13203 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
1087, 3, 107sylancr 587 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
109 max2 13203 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1107, 4, 109sylancr 587 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1113, 4, 25, 32, 108, 110le2addd 11856 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
1122, 111eqbrtrd 5141 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
113 breq1 5122 . . . . . . . . . . 11 (𝐷 = if(0 ≤ 𝐷, 𝐷, 0) → (𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
114 breq1 5122 . . . . . . . . . . 11 (0 = if(0 ≤ 𝐷, 𝐷, 0) → (0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
115113, 114ifboth 4540 . . . . . . . . . 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 4506 . . . . . . . . . 10 (𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = if(0 ≤ 𝐷, 𝐷, 0))
118117adantl 481 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = if(0 ≤ 𝐷, 𝐷, 0))
11939adantl 481 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
120116, 118, 1193brtr4d 5151 . . . . . . . 8 ((𝜑𝑥𝐴) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
121120ex 412 . . . . . . 7 (𝜑 → (𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
122 0le0 12341 . . . . . . . . 9 0 ≤ 0
123122a1i 11 . . . . . . . 8 𝑥𝐴 → 0 ≤ 0)
124 iffalse 4509 . . . . . . . 8 𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = 0)
125123, 124, 543brtr4d 5151 . . . . . . 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 5154 . . . . 5 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
128127ralrimivw 3136 . . . 4 (𝜑 → ∀𝑥 ∈ ℝ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
129 eqidd 2736 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)))
130 eqidd 2736 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
13122, 19, 105, 129, 130ofrfval2 7692 . . . 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 257 . . 3 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) ∘r ≤ (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
133 itg2le 25692 . . 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 1373 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))))
135 itg2lecl 25691 . 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 1373 1 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ∈ ℝ)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395   = wceq 1540  wcel 2108  wral 3051  Vcvv 3459  cdif 3923  wss 3926  ifcif 4500   class class class wbr 5119  cmpt 5201  dom cdm 5654  wf 6527  cfv 6531  (class class class)co 7405  f cof 7669  r cofr 7670  cr 11128  0cc0 11129   + caddc 11132  +∞cpnf 11266  *cxr 11268  cle 11270  [,)cico 13364  [,]cicc 13365  volcvol 25416  MblFncmbf 25567  2citg2 25569
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-rep 5249  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7729  ax-inf2 9655  ax-cnex 11185  ax-resscn 11186  ax-1cn 11187  ax-icn 11188  ax-addcl 11189  ax-addrcl 11190  ax-mulcl 11191  ax-mulrcl 11192  ax-mulcom 11193  ax-addass 11194  ax-mulass 11195  ax-distr 11196  ax-i2m1 11197  ax-1ne0 11198  ax-1rid 11199  ax-rnegex 11200  ax-rrecex 11201  ax-cnre 11202  ax-pre-lttri 11203  ax-pre-lttrn 11204  ax-pre-ltadd 11205  ax-pre-mulgt0 11206  ax-pre-sup 11207  ax-addf 11208
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3359  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-int 4923  df-iun 4969  df-disj 5087  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-se 5607  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6484  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-isom 6540  df-riota 7362  df-ov 7408  df-oprab 7409  df-mpo 7410  df-of 7671  df-ofr 7672  df-om 7862  df-1st 7988  df-2nd 7989  df-frecs 8280  df-wrecs 8311  df-recs 8385  df-rdg 8424  df-1o 8480  df-2o 8481  df-er 8719  df-map 8842  df-pm 8843  df-en 8960  df-dom 8961  df-sdom 8962  df-fin 8963  df-fi 9423  df-sup 9454  df-inf 9455  df-oi 9524  df-dju 9915  df-card 9953  df-pnf 11271  df-mnf 11272  df-xr 11273  df-ltxr 11274  df-le 11275  df-sub 11468  df-neg 11469  df-div 11895  df-nn 12241  df-2 12303  df-3 12304  df-n0 12502  df-z 12589  df-uz 12853  df-q 12965  df-rp 13009  df-xneg 13128  df-xadd 13129  df-xmul 13130  df-ioo 13366  df-ico 13368  df-icc 13369  df-fz 13525  df-fzo 13672  df-fl 13809  df-seq 14020  df-exp 14080  df-hash 14349  df-cj 15118  df-re 15119  df-im 15120  df-sqrt 15254  df-abs 15255  df-clim 15504  df-sum 15703  df-rest 17436  df-topgen 17457  df-psmet 21307  df-xmet 21308  df-met 21309  df-bl 21310  df-mopn 21311  df-top 22832  df-topon 22849  df-bases 22884  df-cmp 23325  df-ovol 25417  df-vol 25418  df-mbf 25572  df-itg1 25573  df-itg2 25574
This theorem is referenced by:  ibladdnc  37701
  Copyright terms: Public domain W3C validator