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

Theorem ibladdlem 25792
Description: Lemma for ibladd 25793. (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 4535 . . . 4 if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) = if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0)
2 ibladd.3 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 = (𝐵 + 𝐶))
3 ibladd.1 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐵 ∈ ℝ)
4 ibladd.2 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → 𝐶 ∈ ℝ)
53, 4readdcld 11173 . . . . . . . . . 10 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ∈ ℝ)
62, 5eqeltrd 2837 . . . . . . . . 9 ((𝜑𝑥𝐴) → 𝐷 ∈ ℝ)
7 0re 11146 . . . . . . . . 9 0 ∈ ℝ
8 ifcl 4527 . . . . . . . . 9 ((𝐷 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
96, 7, 8sylancl 587 . . . . . . . 8 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ)
109rexrd 11194 . . . . . . 7 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ*)
11 max1 13112 . . . . . . . 8 ((0 ∈ ℝ ∧ 𝐷 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
127, 6, 11sylancr 588 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐷, 𝐷, 0))
13 elxrge0 13385 . . . . . . 7 (if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞) ↔ (if(0 ≤ 𝐷, 𝐷, 0) ∈ ℝ* ∧ 0 ≤ if(0 ≤ 𝐷, 𝐷, 0)))
1410, 12, 13sylanbrc 584 . . . . . 6 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ∈ (0[,]+∞))
15 0e0iccpnf 13387 . . . . . . 7 0 ∈ (0[,]+∞)
1615a1i 11 . . . . . 6 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,]+∞))
1714, 16ifclda 4517 . . . . 5 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
1817adantr 480 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) ∈ (0[,]+∞))
191, 18eqeltrid 2841 . . 3 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ∈ (0[,]+∞))
2019fmpttd 7069 . 2 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)):ℝ⟶(0[,]+∞))
21 reex 11129 . . . . . . . 8 ℝ ∈ V
2221a1i 11 . . . . . . 7 (𝜑 → ℝ ∈ V)
23 ifan 4535 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0)
24 ifcl 4527 . . . . . . . . . . 11 ((𝐵 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
253, 7, 24sylancl 587 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ)
267a1i 11 . . . . . . . . . 10 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ ℝ)
2725, 26ifclda 4517 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ ℝ)
2823, 27eqeltrid 2841 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
2928adantr 480 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
30 ifan 4535 . . . . . . . . 9 if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0)
31 ifcl 4527 . . . . . . . . . . 11 ((𝐶 ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
324, 7, 31sylancl 587 . . . . . . . . . 10 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ)
3332, 26ifclda 4517 . . . . . . . . 9 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ ℝ)
3430, 33eqeltrid 2841 . . . . . . . 8 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ ℝ)
3534adantr 480 . . . . . . 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 7652 . . . . . 6 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))))
39 iftrue 4487 . . . . . . . . 9 (𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
40 ibar 528 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐵 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐵)))
4140ifbid 4505 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐵, 𝐵, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
42 ibar 528 . . . . . . . . . . 11 (𝑥𝐴 → (0 ≤ 𝐶 ↔ (𝑥𝐴 ∧ 0 ≤ 𝐶)))
4342ifbid 4505 . . . . . . . . . 10 (𝑥𝐴 → if(0 ≤ 𝐶, 𝐶, 0) = if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))
4441, 43oveq12d 7386 . . . . . . . . 9 (𝑥𝐴 → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) = (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))
4539, 44eqtr2d 2773 . . . . . . . 8 (𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
46 00id 11320 . . . . . . . . 9 (0 + 0) = 0
47 simpl 482 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐵) → 𝑥𝐴)
4847con3i 154 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
4948iffalsed 4492 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
50 simpl 482 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ 0 ≤ 𝐶) → 𝑥𝐴)
5150con3i 154 . . . . . . . . . . 11 𝑥𝐴 → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐶))
5251iffalsed 4492 . . . . . . . . . 10 𝑥𝐴 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) = 0)
5349, 52oveq12d 7386 . . . . . . . . 9 𝑥𝐴 → (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) = (0 + 0))
54 iffalse 4490 . . . . . . . . 9 𝑥𝐴 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) = 0)
5546, 53, 543eqtr4a 2798 . . . . . . . 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 5196 . . . . . 6 (𝑥 ∈ ℝ ↦ (if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) + if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
5838, 57eqtrdi 2788 . . . . 5 (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
5958fveq2d 6846 . . . 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 25609 . . . . . . 7 (𝜑𝐴 ∈ dom vol)
62 mblss 25503 . . . . . . 7 (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
6361, 62syl 17 . . . . . 6 (𝜑𝐴 ⊆ ℝ)
64 rembl 25512 . . . . . . 7 ℝ ∈ dom vol
6564a1i 11 . . . . . 6 (𝜑 → ℝ ∈ dom vol)
6628adantr 480 . . . . . 6 ((𝜑𝑥𝐴) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ ℝ)
67 eldifn 4086 . . . . . . . . 9 (𝑥 ∈ (ℝ ∖ 𝐴) → ¬ 𝑥𝐴)
6867adantl 481 . . . . . . . 8 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ 𝑥𝐴)
6968intnanrd 489 . . . . . . 7 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ (𝑥𝐴 ∧ 0 ≤ 𝐵))
7069iffalsed 4492 . . . . . 6 ((𝜑𝑥 ∈ (ℝ ∖ 𝐴)) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) = 0)
7141mpteq2ia 5195 . . . . . . 7 (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) = (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))
723, 60mbfpos 25623 . . . . . . 7 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐵, 𝐵, 0)) ∈ MblFn)
7371, 72eqeltrrid 2842 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
7463, 65, 66, 70, 73mbfss 25618 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∈ MblFn)
75 max1 13112 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
767, 3, 75sylancr 588 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐵, 𝐵, 0))
77 elrege0 13382 . . . . . . . . . 10 (if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐵, 𝐵, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐵, 𝐵, 0)))
7825, 76, 77sylanbrc 584 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐵, 𝐵, 0) ∈ (0[,)+∞))
79 0e0icopnf 13386 . . . . . . . . . 10 0 ∈ (0[,)+∞)
8079a1i 11 . . . . . . . . 9 ((𝜑 ∧ ¬ 𝑥𝐴) → 0 ∈ (0[,)+∞))
8178, 80ifclda 4517 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐵, 𝐵, 0), 0) ∈ (0[,)+∞))
8223, 81eqeltrid 2841 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8382adantr 480 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0) ∈ (0[,)+∞))
8483fmpttd 7069 . . . . 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 5195 . . . . . . 7 (𝑥𝐴 ↦ if(0 ≤ 𝐶, 𝐶, 0)) = (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))
89 ibladd.5 . . . . . . . 8 (𝜑 → (𝑥𝐴𝐶) ∈ MblFn)
904, 89mbfpos 25623 . . . . . . 7 (𝜑 → (𝑥𝐴 ↦ if(0 ≤ 𝐶, 𝐶, 0)) ∈ MblFn)
9188, 90eqeltrrid 2842 . . . . . 6 (𝜑 → (𝑥𝐴 ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) ∈ MblFn)
9263, 65, 86, 87, 91mbfss 25618 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)) ∈ MblFn)
93 max1 13112 . . . . . . . . . . 11 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
947, 4, 93sylancr 588 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 0 ≤ if(0 ≤ 𝐶, 𝐶, 0))
95 elrege0 13382 . . . . . . . . . 10 (if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞) ↔ (if(0 ≤ 𝐶, 𝐶, 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ 𝐶, 𝐶, 0)))
9632, 94, 95sylanbrc 584 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐶, 𝐶, 0) ∈ (0[,)+∞))
9796, 80ifclda 4517 . . . . . . . 8 (𝜑 → if(𝑥𝐴, if(0 ≤ 𝐶, 𝐶, 0), 0) ∈ (0[,)+∞))
9830, 97eqeltrid 2841 . . . . . . 7 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
9998adantr 480 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0) ∈ (0[,)+∞))
10099fmpttd 7069 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)):ℝ⟶(0[,)+∞))
101 ibladd.7 . . . . 5 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0))) ∈ ℝ)
10274, 84, 85, 92, 100, 101itg2add 25731 . . . 4 (𝜑 → (∫2‘((𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0)) ∘f + (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
10359, 102eqtr3d 2774 . . 3 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) = ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))))
10485, 101readdcld 11173 . . 3 (𝜑 → ((∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐵), 𝐵, 0))) + (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐶), 𝐶, 0)))) ∈ ℝ)
105103, 104eqeltrd 2837 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))) ∈ ℝ)
10625, 32readdcld 11173 . . . . . . . 8 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ)
107106rexrd 11194 . . . . . . 7 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ*)
10825, 32, 76, 94addge0d 11725 . . . . . . 7 ((𝜑𝑥𝐴) → 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
109 elxrge0 13385 . . . . . . 7 ((if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ (0[,]+∞) ↔ ((if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ ℝ* ∧ 0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
110107, 108, 109sylanbrc 584 . . . . . 6 ((𝜑𝑥𝐴) → (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ∈ (0[,]+∞))
111110, 16ifclda 4517 . . . . 5 (𝜑 → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
112111adantr 480 . . . 4 ((𝜑𝑥 ∈ ℝ) → if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0) ∈ (0[,]+∞))
113112fmpttd 7069 . . 3 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)):ℝ⟶(0[,]+∞))
114 max2 13114 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐵 ∈ ℝ) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
1157, 3, 114sylancr 588 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐵 ≤ if(0 ≤ 𝐵, 𝐵, 0))
116 max2 13114 . . . . . . . . . . . . 13 ((0 ∈ ℝ ∧ 𝐶 ∈ ℝ) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1177, 4, 116sylancr 588 . . . . . . . . . . . 12 ((𝜑𝑥𝐴) → 𝐶 ≤ if(0 ≤ 𝐶, 𝐶, 0))
1183, 4, 25, 32, 115, 117le2addd 11768 . . . . . . . . . . 11 ((𝜑𝑥𝐴) → (𝐵 + 𝐶) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
1192, 118eqbrtrd 5122 . . . . . . . . . 10 ((𝜑𝑥𝐴) → 𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
120 breq1 5103 . . . . . . . . . . 11 (𝐷 = if(0 ≤ 𝐷, 𝐷, 0) → (𝐷 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
121 breq1 5103 . . . . . . . . . . 11 (0 = if(0 ≤ 𝐷, 𝐷, 0) → (0 ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)) ↔ if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0))))
122120, 121ifboth 4521 . . . . . . . . . 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 585 . . . . . . . . 9 ((𝜑𝑥𝐴) → if(0 ≤ 𝐷, 𝐷, 0) ≤ (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)))
124 iftrue 4487 . . . . . . . . . 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 5132 . . . . . . . 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 12258 . . . . . . . . 9 0 ≤ 0
130129a1i 11 . . . . . . . 8 𝑥𝐴 → 0 ≤ 0)
131 iffalse 4490 . . . . . . . 8 𝑥𝐴 → if(𝑥𝐴, if(0 ≤ 𝐷, 𝐷, 0), 0) = 0)
132130, 131, 543brtr4d 5132 . . . . . . 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 5135 . . . . 5 (𝜑 → if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
135134ralrimivw 3134 . . . 4 (𝜑 → ∀𝑥 ∈ ℝ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0) ≤ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))
136 eqidd 2738 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)) = (𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0)))
137 eqidd 2738 . . . . 5 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0)))
13822, 19, 112, 136, 137ofrfval2 7653 . . . 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 25711 . . 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 1374 . 2 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ≤ (∫2‘(𝑥 ∈ ℝ ↦ if(𝑥𝐴, (if(0 ≤ 𝐵, 𝐵, 0) + if(0 ≤ 𝐶, 𝐶, 0)), 0))))
142 itg2lecl 25710 . 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 1374 1 (𝜑 → (∫2‘(𝑥 ∈ ℝ ↦ if((𝑥𝐴 ∧ 0 ≤ 𝐷), 𝐷, 0))) ∈ ℝ)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395   = wceq 1542  wcel 2114  wral 3052  Vcvv 3442  cdif 3900  wss 3903  ifcif 4481   class class class wbr 5100  cmpt 5181  dom cdm 5632  wf 6496  cfv 6500  (class class class)co 7368  f cof 7630  r cofr 7631  cr 11037  0cc0 11038   + caddc 11041  +∞cpnf 11175  *cxr 11177  cle 11179  [,)cico 13275  [,]cicc 13276  volcvol 25435  MblFncmbf 25586  2citg2 25588
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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-inf2 9562  ax-cc 10357  ax-cnex 11094  ax-resscn 11095  ax-1cn 11096  ax-icn 11097  ax-addcl 11098  ax-addrcl 11099  ax-mulcl 11100  ax-mulrcl 11101  ax-mulcom 11102  ax-addass 11103  ax-mulass 11104  ax-distr 11105  ax-i2m1 11106  ax-1ne0 11107  ax-1rid 11108  ax-rnegex 11109  ax-rrecex 11110  ax-cnre 11111  ax-pre-lttri 11112  ax-pre-lttrn 11113  ax-pre-ltadd 11114  ax-pre-mulgt0 11115  ax-pre-sup 11116  ax-addf 11117
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-disj 5068  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-se 5586  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-isom 6509  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-of 7632  df-ofr 7633  df-om 7819  df-1st 7943  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-2o 8408  df-oadd 8411  df-omul 8412  df-er 8645  df-map 8777  df-pm 8778  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-fi 9326  df-sup 9357  df-inf 9358  df-oi 9427  df-dju 9825  df-card 9863  df-acn 9866  df-pnf 11180  df-mnf 11181  df-xr 11182  df-ltxr 11183  df-le 11184  df-sub 11378  df-neg 11379  df-div 11807  df-nn 12158  df-2 12220  df-3 12221  df-n0 12414  df-z 12501  df-uz 12764  df-q 12874  df-rp 12918  df-xneg 13038  df-xadd 13039  df-xmul 13040  df-ioo 13277  df-ioc 13278  df-ico 13279  df-icc 13280  df-fz 13436  df-fzo 13583  df-fl 13724  df-seq 13937  df-exp 13997  df-hash 14266  df-cj 15034  df-re 15035  df-im 15036  df-sqrt 15170  df-abs 15171  df-clim 15423  df-rlim 15424  df-sum 15622  df-rest 17354  df-topgen 17375  df-psmet 21316  df-xmet 21317  df-met 21318  df-bl 21319  df-mopn 21320  df-top 22853  df-topon 22870  df-bases 22905  df-cmp 23346  df-ovol 25436  df-vol 25437  df-mbf 25591  df-itg1 25592  df-itg2 25593  df-0p 25642
This theorem is referenced by:  ibladd  25793
  Copyright terms: Public domain W3C validator