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

Theorem ibladdlem 24420
Description: Lemma for ibladd 24421. (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 4518 . . . 4 if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) = if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0)
2 ibladd.3 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 = (𝐵 + 𝐶))
3 ibladd.1 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐵 ∈ ℝ)
4 ibladd.2 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐶 ∈ ℝ)
53, 4readdcld 10670 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ∈ ℝ)
62, 5eqeltrd 2913 . . . . . . . . 9 ((𝜑𝑥𝐴) → 𝐷 ∈ ℝ)
7 0re 10643 . . . . . . . . 9 0 ∈ ℝ
8 ifcl 4511 . . . . . . . . 9 ((𝐷 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
96, 7, 8sylancl 588 . . . . . . . 8 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
109rexrd 10691 . . . . . . 7 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ*)
11 max1 12579 . . . . . . . 8 ((0 ∈ ℝ ∧ 𝐷 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
127, 6, 11sylancr 589 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
13 elxrge0 12846 . . . . . . 7 (if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞) ↔ (if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ* ∧ 0 ≤ if(0 ≤ 𝐷, 𝐷, 0)))
1410, 12, 13sylanbrc 585 . . . . . 6 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞))
15 0e0iccpnf 12848 . . . . . . 7 0 ∈ (0[,]+∞)
1615a1i 11 . . . . . 6 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,]+∞))
1714, 16ifclda 4501 . . . . 5 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
1817adantr 483 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
191, 18eqeltrid 2917 . . 3 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ∈ (0[,]+∞))
2019fmpttd 6879 . 2 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)):ℝ⟶(0[,]+∞))
21 reex 10628 . . . . . . . 8 ℝ ∈ V
2221a1i 11 . . . . . . 7 (𝜑 → ℝ ∈ V)
23 ifan 4518 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0)
24 ifcl 4511 . . . . . . . . . . 11 ((𝐵 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
253, 7, 24sylancl 588 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
267a1i 11 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ ℝ)
2725, 26ifclda 4501 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ ℝ)
2823, 27eqeltrid 2917 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
2928adantr 483 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
30 ifan 4518 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0)
31 ifcl 4511 . . . . . . . . . . 11 ((𝐶 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
324, 7, 31sylancl 588 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
3332, 26ifclda 4501 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ ℝ)
3430, 33eqeltrid 2917 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
3534adantr 483 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
36 eqidd 2822 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)))
37 eqidd 2822 . . . . . . 7 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))
3822, 29, 35, 36, 37offval2 7426 . . . . . 6 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))))
39 iftrue 4473 . . . . . . . . 9 (𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
40 ibar 531 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐵 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐵)))
4140ifbid 4489 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐵, 𝐵, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
42 ibar 531 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐶 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐶)))
4342ifbid 4489 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐶, 𝐶, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))
4441, 43oveq12d 7174 . . . . . . . . 9 (𝑥𝐴 → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) = (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))
4539, 44eqtr2d 2857 . . . . . . . 8 (𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
46 00id 10815 . . . . . . . . 9 (0 + 0) = 0
47 simpl 485 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐵) → 𝑥𝐴)
4847con3i 157 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
4948iffalsed 4478 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
50 simpl 485 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐶) → 𝑥𝐴)
5150con3i 157 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐶))
5251iffalsed 4478 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = 0)
5349, 52oveq12d 7174 . . . . . . . . 9 𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = (0 + 0))
54 iffalse 4476 . . . . . . . . 9 𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = 0)
5546, 53, 543eqtr4a 2882 . . . . . . . 8 𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
5645, 55pm2.61i 184 . . . . . . 7 (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)
5756mpteq2i 5158 . . . . . 6 (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
5838, 57syl6eq 2872 . . . . 5 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
5958fveq2d 6674 . . . 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 24238 . . . . . . 7 (𝜑𝐴 ∈ dom vol)
62 mblss 24132 . . . . . . 7 (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
6361, 62syl 17 . . . . . 6 (𝜑𝐴 ⊆ ℝ)
64 rembl 24141 . . . . . . 7 ℝ ∈ dom vol
6564a1i 11 . . . . . 6 (𝜑 → ℝ ∈ dom vol)
6628adantr 483 . . . . . 6 ((𝜑𝑥𝐴) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
67 eldifn 4104 . . . . . . . . 9 (𝑥 ∈ (ℝ ∖ 𝐴) → ¬ 𝑥𝐴)
6867adantl 484 . . . . . . . 8 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ 𝑥𝐴)
6968intnanrd 492 . . . . . . 7 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
7069iffalsed 4478 . . . . . 6 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
7141mpteq2ia 5157 . . . . . . 7 (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) = (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
723, 60mbfpos 24252 . . . . . . 7 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn)
7371, 72eqeltrrid 2918 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
7463, 65, 66, 70, 73mbfss 24247 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
75 max1 12579 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
767, 3, 75sylancr 589 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
77 elrege0 12843 . . . . . . . . . 10 (if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐵, 𝐵, 0)))
7825, 76, 77sylanbrc 585 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞))
79 0e0icopnf 12847 . . . . . . . . . 10 0 ∈ (0[,)+∞)
8079a1i 11 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,)+∞))
8178, 80ifclda 4501 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ (0[,)+∞))
8223, 81eqeltrid 2917 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8382adantr 483 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8483fmpttd 6879 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)):ℝ⟶(0[,)+∞))
85 ibladd.6 . . . . 5 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) ∈ ℝ)
8634adantr 483 . . . . . 6 ((𝜑𝑥𝐴) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
8768, 52syl 17 . . . . . 6 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = 0)
8843mpteq2ia 5157 . . . . . . 7 (𝑥𝐴 ↦ if(0 ≤ 𝐶, 𝐶, 0)) = (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))
89 ibladd.5 . . . . . . . 8 (𝜑 → (𝑥𝐴𝐶) ∈ MblFn)
904, 89mbfpos 24252 . . . . . . 7 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐶, 𝐶, 0)) ∈ MblFn)
9188, 90eqeltrrid 2918 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) ∈ MblFn)
9263, 65, 86, 87, 91mbfss 24247 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) ∈ MblFn)
93 max1 12579 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
947, 4, 93sylancr 589 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
95 elrege0 12843 . . . . . . . . . 10 (if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐶, 𝐶, 0)))
9632, 94, 95sylanbrc 585 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞))
9796, 80ifclda 4501 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ (0[,)+∞))
9830, 97eqeltrid 2917 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
9998adantr 483 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
10099fmpttd 6879 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)):ℝ⟶(0[,)+∞))
101 ibladd.7 . . . . 5 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) ∈ ℝ)
10274, 84, 85, 92, 100, 101itg2add 24360 . . . 4 (𝜑 → (∫2‘((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
10359, 102eqtr3d 2858 . . 3 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
10485, 101readdcld 10670 . . 3 (𝜑 → ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) ∈ ℝ)
105103, 104eqeltrd 2913 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) ∈ ℝ)
10625, 32readdcld 10670 . . . . . . . 8 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ)
107106rexrd 10691 . . . . . . 7 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ*)
10825, 32, 76, 94addge0d 11216 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
109 elxrge0 12846 . . . . . . 7 ((if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ (0[,]+∞) ↔ ((if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ* ∧ 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
110107, 108, 109sylanbrc 585 . . . . . 6 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ (0[,]+∞))
111110, 16ifclda 4501 . . . . 5 (𝜑 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
112111adantr 483 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
113112fmpttd 6879 . . 3 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)):ℝ⟶(0[,]+∞))
114 max2 12581 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
1157, 3, 114sylancr 589 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
116 max2 12581 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1177, 4, 116sylancr 589 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1183, 4, 25, 32, 115, 117le2addd 11259 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
1192, 118eqbrtrd 5088 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
120 breq1 5069 . . . . . . . . . . 11 (𝐷 = if(0 ≤ 𝐷, 𝐷, 0) → (𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
121 breq1 5069 . . . . . . . . . . 11 (0 = if(0 ≤ 𝐷, 𝐷, 0) → (0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
122120, 121ifboth 4505 . . . . . . . . . 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 586 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
124 iftrue 4473 . . . . . . . . . 10 (𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = if(0 ≤ 𝐷, 𝐷, 0))
125124adantl 484 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = if(0 ≤ 𝐷, 𝐷, 0))
12639adantl 484 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
127123, 125, 1263brtr4d 5098 . . . . . . . 8 ((𝜑𝑥𝐴) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
128127ex 415 . . . . . . 7 (𝜑 → (𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
129 0le0 11739 . . . . . . . . 9 0 ≤ 0
130129a1i 11 . . . . . . . 8 𝑥𝐴 → 0 ≤ 0)
131 iffalse 4476 . . . . . . . 8 𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = 0)
132130, 131, 543brtr4d 5098 . . . . . . 7 𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
133128, 132pm2.61d1 182 . . . . . 6 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
1341, 133eqbrtrid 5101 . . . . 5 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
135134ralrimivw 3183 . . . 4 (𝜑 → ∀𝑥 ∈ ℝ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
136 eqidd 2822 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)))
137 eqidd 2822 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
13822, 19, 112, 136, 137ofrfval2 7427 . . . 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 259 . . 3 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) ∘r ≤ (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
140 itg2le 24340 . . 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 1367 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))))
142 itg2lecl 24339 . 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 1367 1 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ∈ ℝ)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 398   = wceq 1537  wcel 2114  wral 3138  Vcvv 3494  cdif 3933  wss 3936  ifcif 4467   class class class wbr 5066  cmpt 5146  dom cdm 5555  wf 6351  cfv 6355  (class class class)co 7156  f cof 7407  r cofr 7408  cr 10536  0cc0 10537   + caddc 10540  +∞cpnf 10672  *cxr 10674  cle 10676  [,)cico 12741  [,]cicc 12742  volcvol 24064  MblFncmbf 24215  2citg2 24217
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461  ax-inf2 9104  ax-cc 9857  ax-cnex 10593  ax-resscn 10594  ax-1cn 10595  ax-icn 10596  ax-addcl 10597  ax-addrcl 10598  ax-mulcl 10599  ax-mulrcl 10600  ax-mulcom 10601  ax-addass 10602  ax-mulass 10603  ax-distr 10604  ax-i2m1 10605  ax-1ne0 10606  ax-1rid 10607  ax-rnegex 10608  ax-rrecex 10609  ax-cnre 10610  ax-pre-lttri 10611  ax-pre-lttrn 10612  ax-pre-ltadd 10613  ax-pre-mulgt0 10614  ax-pre-sup 10615  ax-addf 10616
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-fal 1550  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-pss 3954  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4839  df-int 4877  df-iun 4921  df-disj 5032  df-br 5067  df-opab 5129  df-mpt 5147  df-tr 5173  df-id 5460  df-eprel 5465  df-po 5474  df-so 5475  df-fr 5514  df-se 5515  df-we 5516  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-pred 6148  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-isom 6364  df-riota 7114  df-ov 7159  df-oprab 7160  df-mpo 7161  df-of 7409  df-ofr 7410  df-om 7581  df-1st 7689  df-2nd 7690  df-wrecs 7947  df-recs 8008  df-rdg 8046  df-1o 8102  df-2o 8103  df-oadd 8106  df-omul 8107  df-er 8289  df-map 8408  df-pm 8409  df-en 8510  df-dom 8511  df-sdom 8512  df-fin 8513  df-fi 8875  df-sup 8906  df-inf 8907  df-oi 8974  df-dju 9330  df-card 9368  df-acn 9371  df-pnf 10677  df-mnf 10678  df-xr 10679  df-ltxr 10680  df-le 10681  df-sub 10872  df-neg 10873  df-div 11298  df-nn 11639  df-2 11701  df-3 11702  df-n0 11899  df-z 11983  df-uz 12245  df-q 12350  df-rp 12391  df-xneg 12508  df-xadd 12509  df-xmul 12510  df-ioo 12743  df-ioc 12744  df-ico 12745  df-icc 12746  df-fz 12894  df-fzo 13035  df-fl 13163  df-seq 13371  df-exp 13431  df-hash 13692  df-cj 14458  df-re 14459  df-im 14460  df-sqrt 14594  df-abs 14595  df-clim 14845  df-rlim 14846  df-sum 15043  df-rest 16696  df-topgen 16717  df-psmet 20537  df-xmet 20538  df-met 20539  df-bl 20540  df-mopn 20541  df-top 21502  df-topon 21519  df-bases 21554  df-cmp 21995  df-ovol 24065  df-vol 24066  df-mbf 24220  df-itg1 24221  df-itg2 24222  df-0p 24271
This theorem is referenced by:  ibladd  24421
  Copyright terms: Public domain W3C validator