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

Theorem ibladdlem 25670
Description: Lemma for ibladd 25671. (Contributed by Mario Carneiro, 17-Aug-2014.)
Hypotheses
Ref Expression
ibladd.1 ((𝜑𝑥𝐴) → 𝐵 ∈ ℝ)
ibladd.2 ((𝜑𝑥𝐴) → 𝐶 ∈ ℝ)
ibladd.3 ((𝜑𝑥𝐴) → 𝐷 = (𝐵 + 𝐶))
ibladd.4 (𝜑 → (𝑥𝐴𝐵) ∈ MblFn)
ibladd.5 (𝜑 → (𝑥𝐴𝐶) ∈ MblFn)
ibladd.6 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) ∈ ℝ)
ibladd.7 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) ∈ ℝ)
Assertion
Ref Expression
ibladdlem (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ∈ ℝ)
Distinct variable groups:   𝑥,𝐴   𝜑,𝑥
Allowed substitution hints:   𝐵(𝑥)   𝐶(𝑥)   𝐷(𝑥)

Proof of Theorem ibladdlem
StepHypRef Expression
1 ifan 4573 . . . 4 if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) = if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0)
2 ibladd.3 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 = (𝐵 + 𝐶))
3 ibladd.1 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐵 ∈ ℝ)
4 ibladd.2 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐶 ∈ ℝ)
53, 4readdcld 11239 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ∈ ℝ)
62, 5eqeltrd 2825 . . . . . . . . 9 ((𝜑𝑥𝐴) → 𝐷 ∈ ℝ)
7 0re 11212 . . . . . . . . 9 0 ∈ ℝ
8 ifcl 4565 . . . . . . . . 9 ((𝐷 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
96, 7, 8sylancl 585 . . . . . . . 8 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
109rexrd 11260 . . . . . . 7 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ*)
11 max1 13160 . . . . . . . 8 ((0 ∈ ℝ ∧ 𝐷 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
127, 6, 11sylancr 586 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
13 elxrge0 13430 . . . . . . 7 (if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞) ↔ (if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ* ∧ 0 ≤ if(0 ≤ 𝐷, 𝐷, 0)))
1410, 12, 13sylanbrc 582 . . . . . 6 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞))
15 0e0iccpnf 13432 . . . . . . 7 0 ∈ (0[,]+∞)
1615a1i 11 . . . . . 6 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,]+∞))
1714, 16ifclda 4555 . . . . 5 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
1817adantr 480 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
191, 18eqeltrid 2829 . . 3 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ∈ (0[,]+∞))
2019fmpttd 7106 . 2 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)):ℝ⟶(0[,]+∞))
21 reex 11196 . . . . . . . 8 ℝ ∈ V
2221a1i 11 . . . . . . 7 (𝜑 → ℝ ∈ V)
23 ifan 4573 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0)
24 ifcl 4565 . . . . . . . . . . 11 ((𝐵 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
253, 7, 24sylancl 585 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
267a1i 11 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ ℝ)
2725, 26ifclda 4555 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ ℝ)
2823, 27eqeltrid 2829 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
2928adantr 480 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
30 ifan 4573 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0)
31 ifcl 4565 . . . . . . . . . . 11 ((𝐶 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
324, 7, 31sylancl 585 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
3332, 26ifclda 4555 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ ℝ)
3430, 33eqeltrid 2829 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
3534adantr 480 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
36 eqidd 2725 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)))
37 eqidd 2725 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))
3822, 29, 35, 36, 37offval2 7683 . . . . . 6 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))))
39 iftrue 4526 . . . . . . . . 9 (𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
40 ibar 528 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐵 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐵)))
4140ifbid 4543 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐵, 𝐵, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
42 ibar 528 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐶 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐶)))
4342ifbid 4543 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐶, 𝐶, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))
4441, 43oveq12d 7419 . . . . . . . . 9 (𝑥𝐴 → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) = (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))
4539, 44eqtr2d 2765 . . . . . . . 8 (𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
46 00id 11385 . . . . . . . . 9 (0 + 0) = 0
47 simpl 482 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐵) → 𝑥𝐴)
4847con3i 154 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
4948iffalsed 4531 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
50 simpl 482 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐶) → 𝑥𝐴)
5150con3i 154 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐶))
5251iffalsed 4531 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = 0)
5349, 52oveq12d 7419 . . . . . . . . 9 𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = (0 + 0))
54 iffalse 4529 . . . . . . . . 9 𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = 0)
5546, 53, 543eqtr4a 2790 . . . . . . . 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 5243 . . . . . 6 (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
5838, 57eqtrdi 2780 . . . . 5 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
5958fveq2d 6885 . . . 4 (𝜑 → (∫2‘((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) = (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))))
60 ibladd.4 . . . . . . . 8 (𝜑 → (𝑥𝐴𝐵) ∈ MblFn)
6160, 3mbfdm2 25487 . . . . . . 7 (𝜑𝐴 ∈ dom vol)
62 mblss 25381 . . . . . . 7 (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
6361, 62syl 17 . . . . . 6 (𝜑𝐴 ⊆ ℝ)
64 rembl 25390 . . . . . . 7 ℝ ∈ dom vol
6564a1i 11 . . . . . 6 (𝜑 → ℝ ∈ dom vol)
6628adantr 480 . . . . . 6 ((𝜑𝑥𝐴) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
67 eldifn 4119 . . . . . . . . 9 (𝑥 ∈ (ℝ ∖ 𝐴) → ¬ 𝑥𝐴)
6867adantl 481 . . . . . . . 8 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ 𝑥𝐴)
6968intnanrd 489 . . . . . . 7 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
7069iffalsed 4531 . . . . . 6 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
7141mpteq2ia 5241 . . . . . . 7 (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) = (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
723, 60mbfpos 25501 . . . . . . 7 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn)
7371, 72eqeltrrid 2830 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
7463, 65, 66, 70, 73mbfss 25496 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
75 max1 13160 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
767, 3, 75sylancr 586 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
77 elrege0 13427 . . . . . . . . . 10 (if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐵, 𝐵, 0)))
7825, 76, 77sylanbrc 582 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞))
79 0e0icopnf 13431 . . . . . . . . . 10 0 ∈ (0[,)+∞)
8079a1i 11 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,)+∞))
8178, 80ifclda 4555 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ (0[,)+∞))
8223, 81eqeltrid 2829 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8382adantr 480 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8483fmpttd 7106 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)):ℝ⟶(0[,)+∞))
85 ibladd.6 . . . . 5 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) ∈ ℝ)
8634adantr 480 . . . . . 6 ((𝜑𝑥𝐴) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
8768, 52syl 17 . . . . . 6 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = 0)
8843mpteq2ia 5241 . . . . . . 7 (𝑥𝐴 ↦ if(0 ≤ 𝐶, 𝐶, 0)) = (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))
89 ibladd.5 . . . . . . . 8 (𝜑 → (𝑥𝐴𝐶) ∈ MblFn)
904, 89mbfpos 25501 . . . . . . 7 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐶, 𝐶, 0)) ∈ MblFn)
9188, 90eqeltrrid 2830 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) ∈ MblFn)
9263, 65, 86, 87, 91mbfss 25496 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) ∈ MblFn)
93 max1 13160 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
947, 4, 93sylancr 586 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
95 elrege0 13427 . . . . . . . . . 10 (if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐶, 𝐶, 0)))
9632, 94, 95sylanbrc 582 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞))
9796, 80ifclda 4555 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ (0[,)+∞))
9830, 97eqeltrid 2829 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
9998adantr 480 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
10099fmpttd 7106 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)):ℝ⟶(0[,)+∞))
101 ibladd.7 . . . . 5 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) ∈ ℝ)
10274, 84, 85, 92, 100, 101itg2add 25610 . . . 4 (𝜑 → (∫2‘((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
10359, 102eqtr3d 2766 . . 3 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
10485, 101readdcld 11239 . . 3 (𝜑 → ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) ∈ ℝ)
105103, 104eqeltrd 2825 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) ∈ ℝ)
10625, 32readdcld 11239 . . . . . . . 8 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ)
107106rexrd 11260 . . . . . . 7 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ*)
10825, 32, 76, 94addge0d 11786 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
109 elxrge0 13430 . . . . . . 7 ((if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ (0[,]+∞) ↔ ((if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ* ∧ 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
110107, 108, 109sylanbrc 582 . . . . . 6 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ (0[,]+∞))
111110, 16ifclda 4555 . . . . 5 (𝜑 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
112111adantr 480 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
113112fmpttd 7106 . . 3 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)):ℝ⟶(0[,]+∞))
114 max2 13162 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
1157, 3, 114sylancr 586 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
116 max2 13162 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1177, 4, 116sylancr 586 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1183, 4, 25, 32, 115, 117le2addd 11829 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
1192, 118eqbrtrd 5160 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
120 breq1 5141 . . . . . . . . . . 11 (𝐷 = if(0 ≤ 𝐷, 𝐷, 0) → (𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
121 breq1 5141 . . . . . . . . . . 11 (0 = if(0 ≤ 𝐷, 𝐷, 0) → (0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
122120, 121ifboth 4559 . . . . . . . . . 10 ((𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∧ 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))) → if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
123119, 108, 122syl2anc 583 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
124 iftrue 4526 . . . . . . . . . 10 (𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = if(0 ≤ 𝐷, 𝐷, 0))
125124adantl 481 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = if(0 ≤ 𝐷, 𝐷, 0))
12639adantl 481 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
127123, 125, 1263brtr4d 5170 . . . . . . . 8 ((𝜑𝑥𝐴) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
128127ex 412 . . . . . . 7 (𝜑 → (𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
129 0le0 12309 . . . . . . . . 9 0 ≤ 0
130129a1i 11 . . . . . . . 8 𝑥𝐴 → 0 ≤ 0)
131 iffalse 4529 . . . . . . . 8 𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = 0)
132130, 131, 543brtr4d 5170 . . . . . . 7 𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
133128, 132pm2.61d1 180 . . . . . 6 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
1341, 133eqbrtrid 5173 . . . . 5 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
135134ralrimivw 3142 . . . 4 (𝜑 → ∀𝑥 ∈ ℝ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
136 eqidd 2725 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)))
137 eqidd 2725 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
13822, 19, 112, 136, 137ofrfval2 7684 . . . 4 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) ∘r ≤ (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)) ↔ ∀𝑥 ∈ ℝ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
139135, 138mpbird 257 . . 3 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) ∘r ≤ (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
140 itg2le 25590 . . 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))))
14120, 113, 139, 140syl3anc 1368 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))))
142 itg2lecl 25589 . 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))) ∈ ℝ)
14320, 105, 141, 142syl3anc 1368 1 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ∈ ℝ)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395   = wceq 1533  wcel 2098  wral 3053  Vcvv 3466  cdif 3937  wss 3940  ifcif 4520   class class class wbr 5138  cmpt 5221  dom cdm 5666  wf 6529  cfv 6533  (class class class)co 7401  f cof 7661  r cofr 7662  cr 11104  0cc0 11105   + caddc 11108  +∞cpnf 11241  *cxr 11243  cle 11245  [,)cico 13322  [,]cicc 13323  volcvol 25313  MblFncmbf 25464  2citg2 25466
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 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718  ax-inf2 9631  ax-cc 10425  ax-cnex 11161  ax-resscn 11162  ax-1cn 11163  ax-icn 11164  ax-addcl 11165  ax-addrcl 11166  ax-mulcl 11167  ax-mulrcl 11168  ax-mulcom 11169  ax-addass 11170  ax-mulass 11171  ax-distr 11172  ax-i2m1 11173  ax-1ne0 11174  ax-1rid 11175  ax-rnegex 11176  ax-rrecex 11177  ax-cnre 11178  ax-pre-lttri 11179  ax-pre-lttrn 11180  ax-pre-ltadd 11181  ax-pre-mulgt0 11182  ax-pre-sup 11183  ax-addf 11184
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-pss 3959  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-op 4627  df-uni 4900  df-int 4941  df-iun 4989  df-disj 5104  df-br 5139  df-opab 5201  df-mpt 5222  df-tr 5256  df-id 5564  df-eprel 5570  df-po 5578  df-so 5579  df-fr 5621  df-se 5622  df-we 5623  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-isom 6542  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-of 7663  df-ofr 7664  df-om 7849  df-1st 7968  df-2nd 7969  df-frecs 8261  df-wrecs 8292  df-recs 8366  df-rdg 8405  df-1o 8461  df-2o 8462  df-oadd 8465  df-omul 8466  df-er 8698  df-map 8817  df-pm 8818  df-en 8935  df-dom 8936  df-sdom 8937  df-fin 8938  df-fi 9401  df-sup 9432  df-inf 9433  df-oi 9500  df-dju 9891  df-card 9929  df-acn 9932  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-xneg 13088  df-xadd 13089  df-xmul 13090  df-ioo 13324  df-ioc 13325  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-rlim 15429  df-sum 15629  df-rest 17366  df-topgen 17387  df-psmet 21219  df-xmet 21220  df-met 21221  df-bl 21222  df-mopn 21223  df-top 22717  df-topon 22734  df-bases 22770  df-cmp 23212  df-ovol 25314  df-vol 25315  df-mbf 25469  df-itg1 25470  df-itg2 25471  df-0p 25520
This theorem is referenced by:  ibladd  25671
  Copyright terms: Public domain W3C validator