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

Theorem ftc1anclem5 37810
Description: Lemma for ftc1anc 37814, the existence of a simple function the integral of whose pointwise difference from the function is less than a given positive real. (Contributed by Brendan Leahy, 17-Jun-2018.)
Hypotheses
Ref Expression
ftc1anc.g 𝐺 = (𝑥 ∈ (𝐴[,]𝐵) ↦ ∫(𝐴(,)𝑥)(𝐹𝑡) d𝑡)
ftc1anc.a (𝜑𝐴 ∈ ℝ)
ftc1anc.b (𝜑𝐵 ∈ ℝ)
ftc1anc.le (𝜑𝐴𝐵)
ftc1anc.s (𝜑 → (𝐴(,)𝐵) ⊆ 𝐷)
ftc1anc.d (𝜑𝐷 ⊆ ℝ)
ftc1anc.i (𝜑𝐹 ∈ 𝐿1)
ftc1anc.f (𝜑𝐹:𝐷⟶ℂ)
Assertion
Ref Expression
ftc1anclem5 ((𝜑𝑌 ∈ ℝ+) → ∃𝑓 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) < 𝑌)
Distinct variable groups:   𝑡,𝑓,𝑥,𝐴   𝐵,𝑓,𝑡,𝑥   𝐷,𝑓,𝑡,𝑥   𝑓,𝐹,𝑡,𝑥   𝜑,𝑓,𝑡,𝑥   𝑓,𝐺   𝑓,𝑌,𝑡,𝑥
Allowed substitution hints:   𝐺(𝑥,𝑡)

Proof of Theorem ftc1anclem5
Dummy variable 𝑔 is distinct from all other variables.
StepHypRef Expression
1 iftrue 4482 . . . . . . . . 9 (𝑡 ∈ ℝ → if(𝑡 ∈ ℝ, (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))), 0) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
21mpteq2ia 5190 . . . . . . . 8 (𝑡 ∈ ℝ ↦ if(𝑡 ∈ ℝ, (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))), 0)) = (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
32fveq2i 6834 . . . . . . 7 (∫2‘(𝑡 ∈ ℝ ↦ if(𝑡 ∈ ℝ, (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))), 0))) = (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))))
4 ftc1anc.f . . . . . . . . . . . . . 14 (𝜑𝐹:𝐷⟶ℂ)
54ffvelcdmda 7026 . . . . . . . . . . . . 13 ((𝜑𝑡𝐷) → (𝐹𝑡) ∈ ℂ)
6 0cnd 11116 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ 𝑡𝐷) → 0 ∈ ℂ)
75, 6ifclda 4512 . . . . . . . . . . . 12 (𝜑 → if(𝑡𝐷, (𝐹𝑡), 0) ∈ ℂ)
87recld 15108 . . . . . . . . . . 11 (𝜑 → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ)
98adantr 480 . . . . . . . . . 10 ((𝜑𝑡 ∈ ℝ) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ)
10 ftc1anc.d . . . . . . . . . . 11 (𝜑𝐷 ⊆ ℝ)
11 rembl 25488 . . . . . . . . . . . 12 ℝ ∈ dom vol
1211a1i 11 . . . . . . . . . . 11 (𝜑 → ℝ ∈ dom vol)
138adantr 480 . . . . . . . . . . 11 ((𝜑𝑡𝐷) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ)
14 eldifn 4081 . . . . . . . . . . . . 13 (𝑡 ∈ (ℝ ∖ 𝐷) → ¬ 𝑡𝐷)
1514adantl 481 . . . . . . . . . . . 12 ((𝜑𝑡 ∈ (ℝ ∖ 𝐷)) → ¬ 𝑡𝐷)
16 iffalse 4485 . . . . . . . . . . . . . 14 𝑡𝐷 → if(𝑡𝐷, (𝐹𝑡), 0) = 0)
1716fveq2d 6835 . . . . . . . . . . . . 13 𝑡𝐷 → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) = (ℜ‘0))
18 re0 15066 . . . . . . . . . . . . 13 (ℜ‘0) = 0
1917, 18eqtrdi 2784 . . . . . . . . . . . 12 𝑡𝐷 → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) = 0)
2015, 19syl 17 . . . . . . . . . . 11 ((𝜑𝑡 ∈ (ℝ ∖ 𝐷)) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) = 0)
21 iftrue 4482 . . . . . . . . . . . . . 14 (𝑡𝐷 → if(𝑡𝐷, (𝐹𝑡), 0) = (𝐹𝑡))
2221fveq2d 6835 . . . . . . . . . . . . 13 (𝑡𝐷 → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) = (ℜ‘(𝐹𝑡)))
2322mpteq2ia 5190 . . . . . . . . . . . 12 (𝑡𝐷 ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) = (𝑡𝐷 ↦ (ℜ‘(𝐹𝑡)))
244feqmptd 6899 . . . . . . . . . . . . . . 15 (𝜑𝐹 = (𝑡𝐷 ↦ (𝐹𝑡)))
25 ftc1anc.i . . . . . . . . . . . . . . 15 (𝜑𝐹 ∈ 𝐿1)
2624, 25eqeltrrd 2834 . . . . . . . . . . . . . 14 (𝜑 → (𝑡𝐷 ↦ (𝐹𝑡)) ∈ 𝐿1)
275iblcn 25747 . . . . . . . . . . . . . 14 (𝜑 → ((𝑡𝐷 ↦ (𝐹𝑡)) ∈ 𝐿1 ↔ ((𝑡𝐷 ↦ (ℜ‘(𝐹𝑡))) ∈ 𝐿1 ∧ (𝑡𝐷 ↦ (ℑ‘(𝐹𝑡))) ∈ 𝐿1)))
2826, 27mpbid 232 . . . . . . . . . . . . 13 (𝜑 → ((𝑡𝐷 ↦ (ℜ‘(𝐹𝑡))) ∈ 𝐿1 ∧ (𝑡𝐷 ↦ (ℑ‘(𝐹𝑡))) ∈ 𝐿1))
2928simpld 494 . . . . . . . . . . . 12 (𝜑 → (𝑡𝐷 ↦ (ℜ‘(𝐹𝑡))) ∈ 𝐿1)
3023, 29eqeltrid 2837 . . . . . . . . . . 11 (𝜑 → (𝑡𝐷 ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ 𝐿1)
3110, 12, 13, 20, 30iblss2 25754 . . . . . . . . . 10 (𝜑 → (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ 𝐿1)
328recnd 11151 . . . . . . . . . . . . 13 (𝜑 → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℂ)
3332adantr 480 . . . . . . . . . . . 12 ((𝜑𝑡 ∈ ℝ) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℂ)
34 eqidd 2734 . . . . . . . . . . . 12 (𝜑 → (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) = (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
35 absf 15252 . . . . . . . . . . . . . 14 abs:ℂ⟶ℝ
3635a1i 11 . . . . . . . . . . . . 13 (𝜑 → abs:ℂ⟶ℝ)
3736feqmptd 6899 . . . . . . . . . . . 12 (𝜑 → abs = (𝑥 ∈ ℂ ↦ (abs‘𝑥)))
38 fveq2 6831 . . . . . . . . . . . 12 (𝑥 = (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) → (abs‘𝑥) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
3933, 34, 37, 38fmptco 7071 . . . . . . . . . . 11 (𝜑 → (abs ∘ (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) = (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))))
409fmpttd 7057 . . . . . . . . . . . 12 (𝜑 → (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))):ℝ⟶ℝ)
41 iblmbf 25715 . . . . . . . . . . . . . . . . . 18 (𝐹 ∈ 𝐿1𝐹 ∈ MblFn)
4225, 41syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝐹 ∈ MblFn)
4324, 42eqeltrrd 2834 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑡𝐷 ↦ (𝐹𝑡)) ∈ MblFn)
445ismbfcn2 25586 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝑡𝐷 ↦ (𝐹𝑡)) ∈ MblFn ↔ ((𝑡𝐷 ↦ (ℜ‘(𝐹𝑡))) ∈ MblFn ∧ (𝑡𝐷 ↦ (ℑ‘(𝐹𝑡))) ∈ MblFn)))
4543, 44mpbid 232 . . . . . . . . . . . . . . 15 (𝜑 → ((𝑡𝐷 ↦ (ℜ‘(𝐹𝑡))) ∈ MblFn ∧ (𝑡𝐷 ↦ (ℑ‘(𝐹𝑡))) ∈ MblFn))
4645simpld 494 . . . . . . . . . . . . . 14 (𝜑 → (𝑡𝐷 ↦ (ℜ‘(𝐹𝑡))) ∈ MblFn)
4723, 46eqeltrid 2837 . . . . . . . . . . . . 13 (𝜑 → (𝑡𝐷 ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ MblFn)
4810, 12, 13, 20, 47mbfss 25594 . . . . . . . . . . . 12 (𝜑 → (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ MblFn)
49 ftc1anclem1 37806 . . . . . . . . . . . 12 (((𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))):ℝ⟶ℝ ∧ (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ MblFn) → (abs ∘ (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∈ MblFn)
5040, 48, 49syl2anc 584 . . . . . . . . . . 11 (𝜑 → (abs ∘ (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∈ MblFn)
5139, 50eqeltrrd 2834 . . . . . . . . . 10 (𝜑 → (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∈ MblFn)
529, 31, 51iblabsnc 37797 . . . . . . . . 9 (𝜑 → (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∈ 𝐿1)
5332abscld 15353 . . . . . . . . . . 11 (𝜑 → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ ℝ)
5453adantr 480 . . . . . . . . . 10 ((𝜑𝑡 ∈ ℝ) → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ ℝ)
5532absge0d 15361 . . . . . . . . . . 11 (𝜑 → 0 ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
5655adantr 480 . . . . . . . . . 10 ((𝜑𝑡 ∈ ℝ) → 0 ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
5754, 56iblpos 25741 . . . . . . . . 9 (𝜑 → ((𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∈ 𝐿1 ↔ ((𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∈ MblFn ∧ (∫2‘(𝑡 ∈ ℝ ↦ if(𝑡 ∈ ℝ, (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))), 0))) ∈ ℝ)))
5852, 57mpbid 232 . . . . . . . 8 (𝜑 → ((𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∈ MblFn ∧ (∫2‘(𝑡 ∈ ℝ ↦ if(𝑡 ∈ ℝ, (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))), 0))) ∈ ℝ))
5958simprd 495 . . . . . . 7 (𝜑 → (∫2‘(𝑡 ∈ ℝ ↦ if(𝑡 ∈ ℝ, (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))), 0))) ∈ ℝ)
603, 59eqeltrrid 2838 . . . . . 6 (𝜑 → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ∈ ℝ)
61 ltsubrp 12934 . . . . . 6 (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ∈ ℝ ∧ 𝑌 ∈ ℝ+) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))))
6260, 61sylan 580 . . . . 5 ((𝜑𝑌 ∈ ℝ+) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))))
63 rpre 12905 . . . . . . 7 (𝑌 ∈ ℝ+𝑌 ∈ ℝ)
64 resubcl 11436 . . . . . . 7 (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ∈ ℝ ∧ 𝑌 ∈ ℝ) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) ∈ ℝ)
6560, 63, 64syl2an 596 . . . . . 6 ((𝜑𝑌 ∈ ℝ+) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) ∈ ℝ)
6660adantr 480 . . . . . 6 ((𝜑𝑌 ∈ ℝ+) → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ∈ ℝ)
6765, 66ltnled 11271 . . . . 5 ((𝜑𝑌 ∈ ℝ+) → (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ↔ ¬ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)))
6862, 67mpbid 232 . . . 4 ((𝜑𝑌 ∈ ℝ+) → ¬ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌))
6953rexrd 11173 . . . . . . . . 9 (𝜑 → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ ℝ*)
70 elxrge0 13364 . . . . . . . . 9 ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ (0[,]+∞) ↔ ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ ℝ* ∧ 0 ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))))
7169, 55, 70sylanbrc 583 . . . . . . . 8 (𝜑 → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ (0[,]+∞))
7271adantr 480 . . . . . . 7 ((𝜑𝑡 ∈ ℝ) → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ (0[,]+∞))
7372fmpttd 7057 . . . . . 6 (𝜑 → (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))):ℝ⟶(0[,]+∞))
7473adantr 480 . . . . 5 ((𝜑𝑌 ∈ ℝ+) → (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))):ℝ⟶(0[,]+∞))
7565rexrd 11173 . . . . 5 ((𝜑𝑌 ∈ ℝ+) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) ∈ ℝ*)
76 itg2leub 25682 . . . . 5 (((𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))):ℝ⟶(0[,]+∞) ∧ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) ∈ ℝ*) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) ↔ ∀𝑔 ∈ dom ∫1(𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌))))
7774, 75, 76syl2anc 584 . . . 4 ((𝜑𝑌 ∈ ℝ+) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) ↔ ∀𝑔 ∈ dom ∫1(𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌))))
7868, 77mtbid 324 . . 3 ((𝜑𝑌 ∈ ℝ+) → ¬ ∀𝑔 ∈ dom ∫1(𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)))
79 rexanali 3087 . . 3 (∃𝑔 ∈ dom ∫1(𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) ↔ ¬ ∀𝑔 ∈ dom ∫1(𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)))
8078, 79sylibr 234 . 2 ((𝜑𝑌 ∈ ℝ+) → ∃𝑔 ∈ dom ∫1(𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)))
8165ad2antrr 726 . . . . . . . 8 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) ∈ ℝ)
82 itg1cl 25633 . . . . . . . . 9 (𝑔 ∈ dom ∫1 → (∫1𝑔) ∈ ℝ)
8382ad2antlr 727 . . . . . . . 8 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) → (∫1𝑔) ∈ ℝ)
84 eqid 2733 . . . . . . . . . . . 12 (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
8584i1fpos 25654 . . . . . . . . . . 11 (𝑔 ∈ dom ∫1 → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1)
86 0re 11125 . . . . . . . . . . . . . 14 0 ∈ ℝ
87 i1ff 25624 . . . . . . . . . . . . . . 15 (𝑔 ∈ dom ∫1𝑔:ℝ⟶ℝ)
8887ffvelcdmda 7026 . . . . . . . . . . . . . 14 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → (𝑔𝑡) ∈ ℝ)
89 max1 13091 . . . . . . . . . . . . . 14 ((0 ∈ ℝ ∧ (𝑔𝑡) ∈ ℝ) → 0 ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
9086, 88, 89sylancr 587 . . . . . . . . . . . . 13 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → 0 ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
9190ralrimiva 3125 . . . . . . . . . . . 12 (𝑔 ∈ dom ∫1 → ∀𝑡 ∈ ℝ 0 ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
92 ax-resscn 11074 . . . . . . . . . . . . . . 15 ℝ ⊆ ℂ
9392a1i 11 . . . . . . . . . . . . . 14 (𝑔 ∈ dom ∫1 → ℝ ⊆ ℂ)
94 fvex 6844 . . . . . . . . . . . . . . . . 17 (𝑔𝑡) ∈ V
95 c0ex 11117 . . . . . . . . . . . . . . . . 17 0 ∈ V
9694, 95ifex 4527 . . . . . . . . . . . . . . . 16 if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ V
9796, 84fnmpti 6632 . . . . . . . . . . . . . . 15 (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) Fn ℝ
9897a1i 11 . . . . . . . . . . . . . 14 (𝑔 ∈ dom ∫1 → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) Fn ℝ)
9993, 980pledm 25621 . . . . . . . . . . . . 13 (𝑔 ∈ dom ∫1 → (0𝑝r ≤ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ↔ (ℝ × {0}) ∘r ≤ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
100 reex 11108 . . . . . . . . . . . . . . 15 ℝ ∈ V
101100a1i 11 . . . . . . . . . . . . . 14 (𝑔 ∈ dom ∫1 → ℝ ∈ V)
10295a1i 11 . . . . . . . . . . . . . 14 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → 0 ∈ V)
103 ifcl 4522 . . . . . . . . . . . . . . 15 (((𝑔𝑡) ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℝ)
10488, 86, 103sylancl 586 . . . . . . . . . . . . . 14 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℝ)
105 fconstmpt 5683 . . . . . . . . . . . . . . 15 (ℝ × {0}) = (𝑡 ∈ ℝ ↦ 0)
106105a1i 11 . . . . . . . . . . . . . 14 (𝑔 ∈ dom ∫1 → (ℝ × {0}) = (𝑡 ∈ ℝ ↦ 0))
107 eqidd 2734 . . . . . . . . . . . . . 14 (𝑔 ∈ dom ∫1 → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
108101, 102, 104, 106, 107ofrfval2 7640 . . . . . . . . . . . . 13 (𝑔 ∈ dom ∫1 → ((ℝ × {0}) ∘r ≤ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ↔ ∀𝑡 ∈ ℝ 0 ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
10999, 108bitrd 279 . . . . . . . . . . . 12 (𝑔 ∈ dom ∫1 → (0𝑝r ≤ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ↔ ∀𝑡 ∈ ℝ 0 ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
11091, 109mpbird 257 . . . . . . . . . . 11 (𝑔 ∈ dom ∫1 → 0𝑝r ≤ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
111 itg2itg1 25684 . . . . . . . . . . 11 (((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1 ∧ 0𝑝r ≤ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) → (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = (∫1‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
11285, 110, 111syl2anc 584 . . . . . . . . . 10 (𝑔 ∈ dom ∫1 → (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = (∫1‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
113 itg1cl 25633 . . . . . . . . . . 11 ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1 → (∫1‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℝ)
11485, 113syl 17 . . . . . . . . . 10 (𝑔 ∈ dom ∫1 → (∫1‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℝ)
115112, 114eqeltrd 2833 . . . . . . . . 9 (𝑔 ∈ dom ∫1 → (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℝ)
116115ad2antlr 727 . . . . . . . 8 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) → (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℝ)
117 ltnle 11203 . . . . . . . . . 10 ((((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) ∈ ℝ ∧ (∫1𝑔) ∈ ℝ) → (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫1𝑔) ↔ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)))
11865, 82, 117syl2an 596 . . . . . . . . 9 (((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) → (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫1𝑔) ↔ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)))
119118biimpar 477 . . . . . . . 8 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫1𝑔))
120 max2 13093 . . . . . . . . . . . . . 14 ((0 ∈ ℝ ∧ (𝑔𝑡) ∈ ℝ) → (𝑔𝑡) ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
12186, 88, 120sylancr 587 . . . . . . . . . . . . 13 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → (𝑔𝑡) ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
122121ralrimiva 3125 . . . . . . . . . . . 12 (𝑔 ∈ dom ∫1 → ∀𝑡 ∈ ℝ (𝑔𝑡) ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
12387feqmptd 6899 . . . . . . . . . . . . 13 (𝑔 ∈ dom ∫1𝑔 = (𝑡 ∈ ℝ ↦ (𝑔𝑡)))
124101, 88, 104, 123, 107ofrfval2 7640 . . . . . . . . . . . 12 (𝑔 ∈ dom ∫1 → (𝑔r ≤ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ↔ ∀𝑡 ∈ ℝ (𝑔𝑡) ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
125122, 124mpbird 257 . . . . . . . . . . 11 (𝑔 ∈ dom ∫1𝑔r ≤ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
126 itg1le 25661 . . . . . . . . . . 11 ((𝑔 ∈ dom ∫1 ∧ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1𝑔r ≤ (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) → (∫1𝑔) ≤ (∫1‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
12785, 125, 126mpd3an23 1465 . . . . . . . . . 10 (𝑔 ∈ dom ∫1 → (∫1𝑔) ≤ (∫1‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
128127, 112breqtrrd 5123 . . . . . . . . 9 (𝑔 ∈ dom ∫1 → (∫1𝑔) ≤ (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
129128ad2antlr 727 . . . . . . . 8 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) → (∫1𝑔) ≤ (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
13081, 83, 116, 119, 129ltletrd 11284 . . . . . . 7 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
131130adantrl 716 . . . . . 6 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ (𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌))) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
132 i1fmbf 25623 . . . . . . . . . . . . . . . 16 ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1 → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ MblFn)
13385, 132syl 17 . . . . . . . . . . . . . . 15 (𝑔 ∈ dom ∫1 → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ MblFn)
134133adantl 481 . . . . . . . . . . . . . 14 ((𝜑𝑔 ∈ dom ∫1) → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ MblFn)
135 elrege0 13361 . . . . . . . . . . . . . . . . 17 (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ (0[,)+∞) ↔ (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
136104, 90, 135sylanbrc 583 . . . . . . . . . . . . . . . 16 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ (0[,)+∞))
137136fmpttd 7057 . . . . . . . . . . . . . . 15 (𝑔 ∈ dom ∫1 → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)):ℝ⟶(0[,)+∞))
138137adantl 481 . . . . . . . . . . . . . 14 ((𝜑𝑔 ∈ dom ∫1) → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)):ℝ⟶(0[,)+∞))
139115adantl 481 . . . . . . . . . . . . . 14 ((𝜑𝑔 ∈ dom ∫1) → (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℝ)
140104recnd 11151 . . . . . . . . . . . . . . . . . . . 20 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℂ)
141140negcld 11470 . . . . . . . . . . . . . . . . . . . 20 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℂ)
142140, 141ifcld 4523 . . . . . . . . . . . . . . . . . . 19 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ ℂ)
143 subcl 11370 . . . . . . . . . . . . . . . . . . 19 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℂ ∧ if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ ℂ) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℂ)
14432, 142, 143syl2an 596 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℂ)
145144anassrs 467 . . . . . . . . . . . . . . . . 17 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑡 ∈ ℝ) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℂ)
146145abscld 15353 . . . . . . . . . . . . . . . 16 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑡 ∈ ℝ) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) ∈ ℝ)
147145absge0d 15361 . . . . . . . . . . . . . . . 16 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑡 ∈ ℝ) → 0 ≤ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))
148 elrege0 13361 . . . . . . . . . . . . . . . 16 ((abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) ∈ (0[,)+∞) ↔ ((abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) ∈ ℝ ∧ 0 ≤ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))
149146, 147, 148sylanbrc 583 . . . . . . . . . . . . . . 15 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑡 ∈ ℝ) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) ∈ (0[,)+∞))
150149fmpttd 7057 . . . . . . . . . . . . . 14 ((𝜑𝑔 ∈ dom ∫1) → (𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))):ℝ⟶(0[,)+∞))
151 eleq1w 2816 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑡 → (𝑥𝐷𝑡𝐷))
152 fveq2 6831 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑡 → (𝐹𝑥) = (𝐹𝑡))
153151, 152ifbieq1d 4501 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = 𝑡 → if(𝑥𝐷, (𝐹𝑥), 0) = if(𝑡𝐷, (𝐹𝑡), 0))
154153fveq2d 6835 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑡 → (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)) = (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
155 eqid 2733 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))) = (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)))
156 fvex 6844 . . . . . . . . . . . . . . . . . . . 20 (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ V
157154, 155, 156fvmpt 6938 . . . . . . . . . . . . . . . . . . 19 (𝑡 ∈ ℝ → ((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)))‘𝑡) = (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
158154breq2d 5107 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = 𝑡 → (0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)) ↔ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
159 fveq2 6831 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 = 𝑡 → (𝑔𝑥) = (𝑔𝑡))
160159breq2d 5107 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 = 𝑡 → (0 ≤ (𝑔𝑥) ↔ 0 ≤ (𝑔𝑡)))
161160, 159ifbieq1d 4501 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = 𝑡 → if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) = if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
162161negeqd 11365 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 = 𝑡 → -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) = -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
163158, 161, 162ifbieq12d 4505 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑡 → if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)) = if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
164 eqid 2733 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))
165 negex 11369 . . . . . . . . . . . . . . . . . . . . 21 -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ V
16696, 165ifex 4527 . . . . . . . . . . . . . . . . . . . 20 if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ V
167163, 164, 166fvmpt 6938 . . . . . . . . . . . . . . . . . . 19 (𝑡 ∈ ℝ → ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))‘𝑡) = if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
168157, 167oveq12d 7373 . . . . . . . . . . . . . . . . . 18 (𝑡 ∈ ℝ → (((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)))‘𝑡) − ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))‘𝑡)) = ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
169168fveq2d 6835 . . . . . . . . . . . . . . . . 17 (𝑡 ∈ ℝ → (abs‘(((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)))‘𝑡) − ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))‘𝑡))) = (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))
170169mpteq2ia 5190 . . . . . . . . . . . . . . . 16 (𝑡 ∈ ℝ ↦ (abs‘(((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)))‘𝑡) − ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))‘𝑡)))) = (𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))
171170fveq2i 6834 . . . . . . . . . . . . . . 15 (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)))‘𝑡) − ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))‘𝑡))))) = (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))
172100a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ℝ ∈ V)
173 fvex 6844 . . . . . . . . . . . . . . . . . . . . . 22 (𝑔𝑥) ∈ V
174173, 95ifex 4527 . . . . . . . . . . . . . . . . . . . . 21 if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) ∈ V
175174, 95ifex 4527 . . . . . . . . . . . . . . . . . . . 20 if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0) ∈ V
176175a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑥 ∈ ℝ) → if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0) ∈ V)
177 ovex 7388 . . . . . . . . . . . . . . . . . . . . 21 (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)) ∈ V
17895, 177ifex 4527 . . . . . . . . . . . . . . . . . . . 20 if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∈ V
179178a1i 11 . . . . . . . . . . . . . . . . . . 19 ((𝜑𝑥 ∈ ℝ) → if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∈ V)
180 ffn 6659 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝐹:𝐷⟶ℂ → 𝐹 Fn 𝐷)
181 frn 6666 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝐹:𝐷⟶ℂ → ran 𝐹 ⊆ ℂ)
182 ref 15026 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ℜ:ℂ⟶ℝ
183 ffn 6659 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (ℜ:ℂ⟶ℝ → ℜ Fn ℂ)
184182, 183ax-mp 5 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ℜ Fn ℂ
185 fnco 6607 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((ℜ Fn ℂ ∧ 𝐹 Fn 𝐷 ∧ ran 𝐹 ⊆ ℂ) → (ℜ ∘ 𝐹) Fn 𝐷)
186184, 185mp3an1 1450 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝐹 Fn 𝐷 ∧ ran 𝐹 ⊆ ℂ) → (ℜ ∘ 𝐹) Fn 𝐷)
187180, 181, 186syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝐹:𝐷⟶ℂ → (ℜ ∘ 𝐹) Fn 𝐷)
188 elpreima 7000 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((ℜ ∘ 𝐹) Fn 𝐷 → (𝑥 ∈ ((ℜ ∘ 𝐹) “ (0[,)+∞)) ↔ (𝑥𝐷 ∧ ((ℜ ∘ 𝐹)‘𝑥) ∈ (0[,)+∞))))
1894, 187, 1883syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑥 ∈ ((ℜ ∘ 𝐹) “ (0[,)+∞)) ↔ (𝑥𝐷 ∧ ((ℜ ∘ 𝐹)‘𝑥) ∈ (0[,)+∞))))
190 fco 6683 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((ℜ:ℂ⟶ℝ ∧ 𝐹:𝐷⟶ℂ) → (ℜ ∘ 𝐹):𝐷⟶ℝ)
191182, 4, 190sylancr 587 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑 → (ℜ ∘ 𝐹):𝐷⟶ℝ)
192191ffvelcdmda 7026 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑥𝐷) → ((ℜ ∘ 𝐹)‘𝑥) ∈ ℝ)
193192biantrurd 532 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑥𝐷) → (0 ≤ ((ℜ ∘ 𝐹)‘𝑥) ↔ (((ℜ ∘ 𝐹)‘𝑥) ∈ ℝ ∧ 0 ≤ ((ℜ ∘ 𝐹)‘𝑥))))
194 elrege0 13361 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((ℜ ∘ 𝐹)‘𝑥) ∈ (0[,)+∞) ↔ (((ℜ ∘ 𝐹)‘𝑥) ∈ ℝ ∧ 0 ≤ ((ℜ ∘ 𝐹)‘𝑥)))
195193, 194bitr4di 289 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑥𝐷) → (0 ≤ ((ℜ ∘ 𝐹)‘𝑥) ↔ ((ℜ ∘ 𝐹)‘𝑥) ∈ (0[,)+∞)))
196 fvco3 6930 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐹:𝐷⟶ℂ ∧ 𝑥𝐷) → ((ℜ ∘ 𝐹)‘𝑥) = (ℜ‘(𝐹𝑥)))
1974, 196sylan 580 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑥𝐷) → ((ℜ ∘ 𝐹)‘𝑥) = (ℜ‘(𝐹𝑥)))
198197breq2d 5107 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑥𝐷) → (0 ≤ ((ℜ ∘ 𝐹)‘𝑥) ↔ 0 ≤ (ℜ‘(𝐹𝑥))))
199195, 198bitr3d 281 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑥𝐷) → (((ℜ ∘ 𝐹)‘𝑥) ∈ (0[,)+∞) ↔ 0 ≤ (ℜ‘(𝐹𝑥))))
200199pm5.32da 579 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → ((𝑥𝐷 ∧ ((ℜ ∘ 𝐹)‘𝑥) ∈ (0[,)+∞)) ↔ (𝑥𝐷 ∧ 0 ≤ (ℜ‘(𝐹𝑥)))))
201189, 200bitrd 279 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝑥 ∈ ((ℜ ∘ 𝐹) “ (0[,)+∞)) ↔ (𝑥𝐷 ∧ 0 ≤ (ℜ‘(𝐹𝑥)))))
202201adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑥 ∈ ℝ) → (𝑥 ∈ ((ℜ ∘ 𝐹) “ (0[,)+∞)) ↔ (𝑥𝐷 ∧ 0 ≤ (ℜ‘(𝐹𝑥)))))
203 eldif 3908 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑥 ∈ (ℝ ∖ 𝐷) ↔ (𝑥 ∈ ℝ ∧ ¬ 𝑥𝐷))
204203baibr 536 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 ∈ ℝ → (¬ 𝑥𝐷𝑥 ∈ (ℝ ∖ 𝐷)))
205 0le0 12237 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 0 ≤ 0
206205, 18breqtrri 5122 . . . . . . . . . . . . . . . . . . . . . . . . . 26 0 ≤ (ℜ‘0)
207206biantru 529 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑥𝐷 ↔ (¬ 𝑥𝐷 ∧ 0 ≤ (ℜ‘0)))
208204, 207bitr3di 286 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ℝ → (𝑥 ∈ (ℝ ∖ 𝐷) ↔ (¬ 𝑥𝐷 ∧ 0 ≤ (ℜ‘0))))
209208adantl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑥 ∈ ℝ) → (𝑥 ∈ (ℝ ∖ 𝐷) ↔ (¬ 𝑥𝐷 ∧ 0 ≤ (ℜ‘0))))
210202, 209orbi12d 918 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑥 ∈ ℝ) → ((𝑥 ∈ ((ℜ ∘ 𝐹) “ (0[,)+∞)) ∨ 𝑥 ∈ (ℝ ∖ 𝐷)) ↔ ((𝑥𝐷 ∧ 0 ≤ (ℜ‘(𝐹𝑥))) ∨ (¬ 𝑥𝐷 ∧ 0 ≤ (ℜ‘0)))))
211 elun 4102 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)) ↔ (𝑥 ∈ ((ℜ ∘ 𝐹) “ (0[,)+∞)) ∨ 𝑥 ∈ (ℝ ∖ 𝐷)))
212 fveq2 6831 . . . . . . . . . . . . . . . . . . . . . . . 24 (if(𝑥𝐷, (𝐹𝑥), 0) = (𝐹𝑥) → (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)) = (ℜ‘(𝐹𝑥)))
213212breq2d 5107 . . . . . . . . . . . . . . . . . . . . . . 23 (if(𝑥𝐷, (𝐹𝑥), 0) = (𝐹𝑥) → (0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)) ↔ 0 ≤ (ℜ‘(𝐹𝑥))))
214 fveq2 6831 . . . . . . . . . . . . . . . . . . . . . . . 24 (if(𝑥𝐷, (𝐹𝑥), 0) = 0 → (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)) = (ℜ‘0))
215214breq2d 5107 . . . . . . . . . . . . . . . . . . . . . . 23 (if(𝑥𝐷, (𝐹𝑥), 0) = 0 → (0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)) ↔ 0 ≤ (ℜ‘0)))
216213, 215elimif 4514 . . . . . . . . . . . . . . . . . . . . . 22 (0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)) ↔ ((𝑥𝐷 ∧ 0 ≤ (ℜ‘(𝐹𝑥))) ∨ (¬ 𝑥𝐷 ∧ 0 ≤ (ℜ‘0))))
217210, 211, 2163bitr4g 314 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑥 ∈ ℝ) → (𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)) ↔ 0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))))
218217ifbid 4500 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑥 ∈ ℝ) → if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0) = if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0))
219218mpteq2dva 5188 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0)) = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0)))
220217ifbid 4500 . . . . . . . . . . . . . . . . . . . 20 ((𝜑𝑥 ∈ ℝ) → if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) = if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))
221220mpteq2dva 5188 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))) = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))))
222172, 176, 179, 219, 221offval2 7639 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0)) ∘f + (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))) = (𝑥 ∈ ℝ ↦ (if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0) + if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))))
223 ovif12 7455 . . . . . . . . . . . . . . . . . . . 20 (if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0) + if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))) = if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), (if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) + 0), (0 + (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))
22487ffvelcdmda 7026 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → (𝑔𝑥) ∈ ℝ)
225224recnd 11151 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → (𝑔𝑥) ∈ ℂ)
226 0cn 11115 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℂ
227 ifcl 4522 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑔𝑥) ∈ ℂ ∧ 0 ∈ ℂ) → if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) ∈ ℂ)
228225, 226, 227sylancl 586 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) ∈ ℂ)
229228addridd 11324 . . . . . . . . . . . . . . . . . . . . 21 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → (if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) + 0) = if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))
230228mulm1d 11580 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)) = -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))
231230oveq2d 7371 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → (0 + (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) = (0 + -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))
232228negcld 11470 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) ∈ ℂ)
233232addlidd 11325 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → (0 + -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)) = -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))
234231, 233eqtrd 2768 . . . . . . . . . . . . . . . . . . . . 21 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → (0 + (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) = -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))
235229, 234ifeq12d 4498 . . . . . . . . . . . . . . . . . . . 20 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), (if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) + 0), (0 + (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))) = if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))
236223, 235eqtrid 2780 . . . . . . . . . . . . . . . . . . 19 ((𝑔 ∈ dom ∫1𝑥 ∈ ℝ) → (if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0) + if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))) = if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))
237236mpteq2dva 5188 . . . . . . . . . . . . . . . . . 18 (𝑔 ∈ dom ∫1 → (𝑥 ∈ ℝ ↦ (if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0) + if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))) = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))
238222, 237sylan9eq 2788 . . . . . . . . . . . . . . . . 17 ((𝜑𝑔 ∈ dom ∫1) → ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0)) ∘f + (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))) = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))
239 0xr 11170 . . . . . . . . . . . . . . . . . . . . . . 23 0 ∈ ℝ*
240 pnfxr 11177 . . . . . . . . . . . . . . . . . . . . . . 23 +∞ ∈ ℝ*
241 0ltpnf 13027 . . . . . . . . . . . . . . . . . . . . . . 23 0 < +∞
242 snunioo 13385 . . . . . . . . . . . . . . . . . . . . . . 23 ((0 ∈ ℝ* ∧ +∞ ∈ ℝ* ∧ 0 < +∞) → ({0} ∪ (0(,)+∞)) = (0[,)+∞))
243239, 240, 241, 242mp3an 1463 . . . . . . . . . . . . . . . . . . . . . 22 ({0} ∪ (0(,)+∞)) = (0[,)+∞)
244243imaeq2i 6014 . . . . . . . . . . . . . . . . . . . . 21 ((ℜ ∘ 𝐹) “ ({0} ∪ (0(,)+∞))) = ((ℜ ∘ 𝐹) “ (0[,)+∞))
245 imaundi 6104 . . . . . . . . . . . . . . . . . . . . 21 ((ℜ ∘ 𝐹) “ ({0} ∪ (0(,)+∞))) = (((ℜ ∘ 𝐹) “ {0}) ∪ ((ℜ ∘ 𝐹) “ (0(,)+∞)))
246244, 245eqtr3i 2758 . . . . . . . . . . . . . . . . . . . 20 ((ℜ ∘ 𝐹) “ (0[,)+∞)) = (((ℜ ∘ 𝐹) “ {0}) ∪ ((ℜ ∘ 𝐹) “ (0(,)+∞)))
247 ismbfcn 25577 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝐹:𝐷⟶ℂ → (𝐹 ∈ MblFn ↔ ((ℜ ∘ 𝐹) ∈ MblFn ∧ (ℑ ∘ 𝐹) ∈ MblFn)))
2484, 247syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑 → (𝐹 ∈ MblFn ↔ ((ℜ ∘ 𝐹) ∈ MblFn ∧ (ℑ ∘ 𝐹) ∈ MblFn)))
24942, 248mpbid 232 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((ℜ ∘ 𝐹) ∈ MblFn ∧ (ℑ ∘ 𝐹) ∈ MblFn))
250249simpld 494 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (ℜ ∘ 𝐹) ∈ MblFn)
251 mbfimasn 25580 . . . . . . . . . . . . . . . . . . . . . . 23 (((ℜ ∘ 𝐹) ∈ MblFn ∧ (ℜ ∘ 𝐹):𝐷⟶ℝ ∧ 0 ∈ ℝ) → ((ℜ ∘ 𝐹) “ {0}) ∈ dom vol)
25286, 251mp3an3 1452 . . . . . . . . . . . . . . . . . . . . . 22 (((ℜ ∘ 𝐹) ∈ MblFn ∧ (ℜ ∘ 𝐹):𝐷⟶ℝ) → ((ℜ ∘ 𝐹) “ {0}) ∈ dom vol)
253 mbfima 25578 . . . . . . . . . . . . . . . . . . . . . 22 (((ℜ ∘ 𝐹) ∈ MblFn ∧ (ℜ ∘ 𝐹):𝐷⟶ℝ) → ((ℜ ∘ 𝐹) “ (0(,)+∞)) ∈ dom vol)
254 unmbl 25485 . . . . . . . . . . . . . . . . . . . . . 22 ((((ℜ ∘ 𝐹) “ {0}) ∈ dom vol ∧ ((ℜ ∘ 𝐹) “ (0(,)+∞)) ∈ dom vol) → (((ℜ ∘ 𝐹) “ {0}) ∪ ((ℜ ∘ 𝐹) “ (0(,)+∞))) ∈ dom vol)
255252, 253, 254syl2anc 584 . . . . . . . . . . . . . . . . . . . . 21 (((ℜ ∘ 𝐹) ∈ MblFn ∧ (ℜ ∘ 𝐹):𝐷⟶ℝ) → (((ℜ ∘ 𝐹) “ {0}) ∪ ((ℜ ∘ 𝐹) “ (0(,)+∞))) ∈ dom vol)
256250, 191, 255syl2anc 584 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → (((ℜ ∘ 𝐹) “ {0}) ∪ ((ℜ ∘ 𝐹) “ (0(,)+∞))) ∈ dom vol)
257246, 256eqeltrid 2837 . . . . . . . . . . . . . . . . . . 19 (𝜑 → ((ℜ ∘ 𝐹) “ (0[,)+∞)) ∈ dom vol)
2584fdmd 6669 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → dom 𝐹 = 𝐷)
259 mbfdm 25574 . . . . . . . . . . . . . . . . . . . . . 22 (𝐹 ∈ MblFn → dom 𝐹 ∈ dom vol)
26042, 259syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → dom 𝐹 ∈ dom vol)
261258, 260eqeltrrd 2834 . . . . . . . . . . . . . . . . . . . 20 (𝜑𝐷 ∈ dom vol)
262 difmbl 25491 . . . . . . . . . . . . . . . . . . . 20 ((ℝ ∈ dom vol ∧ 𝐷 ∈ dom vol) → (ℝ ∖ 𝐷) ∈ dom vol)
26311, 261, 262sylancr 587 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (ℝ ∖ 𝐷) ∈ dom vol)
264 unmbl 25485 . . . . . . . . . . . . . . . . . . 19 ((((ℜ ∘ 𝐹) “ (0[,)+∞)) ∈ dom vol ∧ (ℝ ∖ 𝐷) ∈ dom vol) → (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)) ∈ dom vol)
265257, 263, 264syl2anc 584 . . . . . . . . . . . . . . . . . 18 (𝜑 → (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)) ∈ dom vol)
266 fveq2 6831 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑡 = 𝑥 → (𝑔𝑡) = (𝑔𝑥))
267266breq2d 5107 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑡 = 𝑥 → (0 ≤ (𝑔𝑡) ↔ 0 ≤ (𝑔𝑥)))
268267, 266ifbieq1d 4501 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑡 = 𝑥 → if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) = if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))
269268, 84, 174fvmpt 6938 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 ∈ ℝ → ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))‘𝑥) = if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))
270269eqcomd 2739 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ℝ → if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0) = ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))‘𝑥))
271270ifeq1d 4496 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ ℝ → if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0) = if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))‘𝑥), 0))
272271mpteq2ia 5190 . . . . . . . . . . . . . . . . . . . 20 (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0)) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))‘𝑥), 0))
273272i1fres 25653 . . . . . . . . . . . . . . . . . . 19 (((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1 ∧ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)) ∈ dom vol) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0)) ∈ dom ∫1)
274 id 22 . . . . . . . . . . . . . . . . . . . . 21 ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1 → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1)
275 neg1rr 12122 . . . . . . . . . . . . . . . . . . . . . 22 -1 ∈ ℝ
276275a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1 → -1 ∈ ℝ)
277274, 276i1fmulc 25651 . . . . . . . . . . . . . . . . . . . 20 ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1 → ((ℝ × {-1}) ∘f · (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ dom ∫1)
278 cmmbl 25482 . . . . . . . . . . . . . . . . . . . 20 ((((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)) ∈ dom vol → (ℝ ∖ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷))) ∈ dom vol)
279 ifnot 4529 . . . . . . . . . . . . . . . . . . . . . . 23 if(¬ 𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)), 0) = if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))
280 eldif 3908 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 ∈ (ℝ ∖ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷))) ↔ (𝑥 ∈ ℝ ∧ ¬ 𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷))))
281280baibr 536 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ℝ → (¬ 𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)) ↔ 𝑥 ∈ (ℝ ∖ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)))))
282 tru 1545 . . . . . . . . . . . . . . . . . . . . . . . . . 26
283 negex 11369 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 -1 ∈ V
284283fconst 6717 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (ℝ × {-1}):ℝ⟶{-1}
285 ffn 6659 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((ℝ × {-1}):ℝ⟶{-1} → (ℝ × {-1}) Fn ℝ)
286284, 285mp1i 13 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (⊤ → (ℝ × {-1}) Fn ℝ)
28797a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (⊤ → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) Fn ℝ)
288100a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (⊤ → ℝ ∈ V)
289 inidm 4176 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (ℝ ∩ ℝ) = ℝ
290283fvconst2 7147 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑥 ∈ ℝ → ((ℝ × {-1})‘𝑥) = -1)
291290adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((⊤ ∧ 𝑥 ∈ ℝ) → ((ℝ × {-1})‘𝑥) = -1)
292269adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((⊤ ∧ 𝑥 ∈ ℝ) → ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))‘𝑥) = if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))
293286, 287, 288, 288, 289, 291, 292ofval 7630 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((⊤ ∧ 𝑥 ∈ ℝ) → (((ℝ × {-1}) ∘f · (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))‘𝑥) = (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))
294282, 293mpan 690 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑥 ∈ ℝ → (((ℝ × {-1}) ∘f · (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))‘𝑥) = (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))
295294eqcomd 2739 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑥 ∈ ℝ → (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)) = (((ℝ × {-1}) ∘f · (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))‘𝑥))
296281, 295ifbieq1d 4501 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑥 ∈ ℝ → if(¬ 𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)), 0) = if(𝑥 ∈ (ℝ ∖ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷))), (((ℝ × {-1}) ∘f · (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))‘𝑥), 0))
297279, 296eqtr3id 2782 . . . . . . . . . . . . . . . . . . . . . 22 (𝑥 ∈ ℝ → if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) = if(𝑥 ∈ (ℝ ∖ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷))), (((ℝ × {-1}) ∘f · (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))‘𝑥), 0))
298297mpteq2ia 5190 . . . . . . . . . . . . . . . . . . . . 21 (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (ℝ ∖ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷))), (((ℝ × {-1}) ∘f · (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))‘𝑥), 0))
299298i1fres 25653 . . . . . . . . . . . . . . . . . . . 20 ((((ℝ × {-1}) ∘f · (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ dom ∫1 ∧ (ℝ ∖ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷))) ∈ dom vol) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))) ∈ dom ∫1)
300277, 278, 299syl2an 596 . . . . . . . . . . . . . . . . . . 19 (((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1 ∧ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)) ∈ dom vol) → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))) ∈ dom ∫1)
301273, 300i1fadd 25643 . . . . . . . . . . . . . . . . . 18 (((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ dom ∫1 ∧ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)) ∈ dom vol) → ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0)) ∘f + (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))) ∈ dom ∫1)
30285, 265, 301syl2anr 597 . . . . . . . . . . . . . . . . 17 ((𝜑𝑔 ∈ dom ∫1) → ((𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), 0)) ∘f + (𝑥 ∈ ℝ ↦ if(𝑥 ∈ (((ℜ ∘ 𝐹) “ (0[,)+∞)) ∪ (ℝ ∖ 𝐷)), 0, (-1 · if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))))) ∈ dom ∫1)
303238, 302eqeltrrd 2834 . . . . . . . . . . . . . . . 16 ((𝜑𝑔 ∈ dom ∫1) → (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∈ dom ∫1)
304154cbvmptv 5199 . . . . . . . . . . . . . . . . . . 19 (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))) = (𝑡 ∈ ℝ ↦ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
305304, 31eqeltrid 2837 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))) ∈ 𝐿1)
3069, 304fmptd 7056 . . . . . . . . . . . . . . . . . 18 (𝜑 → (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))):ℝ⟶ℝ)
307305, 306jca 511 . . . . . . . . . . . . . . . . 17 (𝜑 → ((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))) ∈ 𝐿1 ∧ (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))):ℝ⟶ℝ))
308307adantr 480 . . . . . . . . . . . . . . . 16 ((𝜑𝑔 ∈ dom ∫1) → ((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))) ∈ 𝐿1 ∧ (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))):ℝ⟶ℝ))
309 ftc1anclem4 37809 . . . . . . . . . . . . . . . . 17 (((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∈ dom ∫1 ∧ (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))) ∈ 𝐿1 ∧ (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))):ℝ⟶ℝ) → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)))‘𝑡) − ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))‘𝑡))))) ∈ ℝ)
3103093expb 1120 . . . . . . . . . . . . . . . 16 (((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∈ dom ∫1 ∧ ((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))) ∈ 𝐿1 ∧ (𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0))):ℝ⟶ℝ)) → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)))‘𝑡) − ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))‘𝑡))))) ∈ ℝ)
311303, 308, 310syl2anc 584 . . . . . . . . . . . . . . 15 ((𝜑𝑔 ∈ dom ∫1) → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(((𝑥 ∈ ℝ ↦ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)))‘𝑡) − ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))‘𝑡))))) ∈ ℝ)
312171, 311eqeltrrid 2838 . . . . . . . . . . . . . 14 ((𝜑𝑔 ∈ dom ∫1) → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) ∈ ℝ)
313134, 138, 139, 150, 312itg2addnc 37787 . . . . . . . . . . . . 13 ((𝜑𝑔 ∈ dom ∫1) → (∫2‘((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∘f + (𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) = ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))))
314100a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑔 ∈ dom ∫1) → ℝ ∈ V)
31596a1i 11 . . . . . . . . . . . . . . 15 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑡 ∈ ℝ) → if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ V)
316 eqidd 2734 . . . . . . . . . . . . . . 15 ((𝜑𝑔 ∈ dom ∫1) → (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = (𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
317 eqidd 2734 . . . . . . . . . . . . . . 15 ((𝜑𝑔 ∈ dom ∫1) → (𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))) = (𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))
318314, 315, 146, 316, 317offval2 7639 . . . . . . . . . . . . . 14 ((𝜑𝑔 ∈ dom ∫1) → ((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∘f + (𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) = (𝑡 ∈ ℝ ↦ (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))))
319318fveq2d 6835 . . . . . . . . . . . . 13 ((𝜑𝑔 ∈ dom ∫1) → (∫2‘((𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∘f + (𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) = (∫2‘(𝑡 ∈ ℝ ↦ (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))))
320313, 319eqtr3d 2770 . . . . . . . . . . . 12 ((𝜑𝑔 ∈ dom ∫1) → ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) = (∫2‘(𝑡 ∈ ℝ ↦ (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))))
321320adantr 480 . . . . . . . . . . 11 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) = (∫2‘(𝑡 ∈ ℝ ↦ (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))))
322 nfv 1915 . . . . . . . . . . . . . 14 𝑡(𝜑𝑔 ∈ dom ∫1)
323 nfcv 2895 . . . . . . . . . . . . . . 15 𝑡𝑔
324 nfcv 2895 . . . . . . . . . . . . . . 15 𝑡r
325 nfmpt1 5194 . . . . . . . . . . . . . . 15 𝑡(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
326323, 324, 325nfbr 5142 . . . . . . . . . . . . . 14 𝑡 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
327322, 326nfan 1900 . . . . . . . . . . . . 13 𝑡((𝜑𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))))
328 anass 468 . . . . . . . . . . . . . . 15 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑡 ∈ ℝ) ↔ (𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)))
32987ffnd 6660 . . . . . . . . . . . . . . . . . . . 20 (𝑔 ∈ dom ∫1𝑔 Fn ℝ)
330 fvex 6844 . . . . . . . . . . . . . . . . . . . . . 22 (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ V
331 eqid 2733 . . . . . . . . . . . . . . . . . . . . . 22 (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) = (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
332330, 331fnmpti 6632 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) Fn ℝ
333332a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑔 ∈ dom ∫1 → (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) Fn ℝ)
334 eqidd 2734 . . . . . . . . . . . . . . . . . . . 20 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → (𝑔𝑡) = (𝑔𝑡))
335331fvmpt2 6949 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑡 ∈ ℝ ∧ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ V) → ((𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))‘𝑡) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
336330, 335mpan2 691 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 ∈ ℝ → ((𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))‘𝑡) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
337336adantl 481 . . . . . . . . . . . . . . . . . . . 20 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → ((𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))‘𝑡) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
338329, 333, 101, 101, 289, 334, 337ofrval 7631 . . . . . . . . . . . . . . . . . . 19 ((𝑔 ∈ dom ∫1𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 𝑡 ∈ ℝ) → (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
3393383com23 1126 . . . . . . . . . . . . . . . . . 18 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
3403393expa 1118 . . . . . . . . . . . . . . . . 17 (((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
341340adantll 714 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
342 resubcl 11436 . . . . . . . . . . . . . . . . . . . . . . 23 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℝ) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ ℝ)
3438, 104, 342syl2an 596 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ ℝ)
344343ad2antrr 726 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ ℝ)
345 absid 15210 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) = (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
3468, 345sylan 580 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑 ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) = (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
347346breq2d 5107 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → ((𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ↔ (𝑔𝑡) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
348347biimpa 476 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (𝑔𝑡) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
349348an32s 652 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑 ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (𝑔𝑡) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
350349adantllr 719 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (𝑔𝑡) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
351 breq1 5098 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑔𝑡) = if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) → ((𝑔𝑡) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ↔ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
352 breq1 5098 . . . . . . . . . . . . . . . . . . . . . . . 24 (0 = if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) → (0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ↔ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
353351, 352ifboth 4516 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑔𝑡) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
354350, 353sylancom 588 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
355 subge0 11641 . . . . . . . . . . . . . . . . . . . . . . . 24 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℝ) → (0 ≤ ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ↔ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
3568, 104, 355syl2an 596 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) → (0 ≤ ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ↔ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
357356ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (0 ≤ ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ↔ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
358354, 357mpbird 257 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → 0 ≤ ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
359344, 358absidd 15337 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
360 iftrue 4482 . . . . . . . . . . . . . . . . . . . . . . 23 (0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) → if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
361360oveq2d 7371 . . . . . . . . . . . . . . . . . . . . . 22 (0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
362361fveq2d 6835 . . . . . . . . . . . . . . . . . . . . 21 (0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) = (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
363362adantl 481 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) = (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
3648ad2antrr 726 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ)
365345oveq1d 7370 . . . . . . . . . . . . . . . . . . . . 21 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
366364, 365sylan 580 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
367359, 363, 3663eqtr4d 2778 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) = ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
368104renegcld 11555 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑔 ∈ dom ∫1𝑡 ∈ ℝ) → -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℝ)
369 resubcl 11436 . . . . . . . . . . . . . . . . . . . . . . . 24 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℝ) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ ℝ)
3708, 368, 369syl2an 596 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ ℝ)
371370ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ∈ ℝ)
37288ad3antlr 731 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (𝑔𝑡) ∈ ℝ)
3738ad3antrrr 730 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ)
3748adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ)
375 ltnle 11203 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ 0 ∈ ℝ) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) < 0 ↔ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
37686, 375mpan2 691 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) < 0 ↔ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
377 ltle 11212 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ 0 ∈ ℝ) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) < 0 → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0))
37886, 377mpan2 691 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) < 0 → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0))
379376, 378sylbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ → (¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0))
380379imp 406 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0)
381 absnid 15212 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0) → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) = -(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
382380, 381syldan 591 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) = -(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
383382breq2d 5107 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → ((𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ↔ (𝑔𝑡) ≤ -(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
384383biimpa 476 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (𝑔𝑡) ≤ -(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
385384an32s 652 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (𝑔𝑡) ≤ -(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
386374, 385sylanl1 680 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (𝑔𝑡) ≤ -(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
387372, 373, 386lenegcon2d 11711 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -(𝑔𝑡))
388 simpll 766 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → 𝜑)
38986a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → 0 ∈ ℝ)
3908, 389ltnled 11271 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) < 0 ↔ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
3918, 86, 377sylancl 586 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) < 0 → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0))
392390, 391sylbird 260 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → (¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0))
393392imp 406 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑 ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0)
394388, 393sylan 580 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0)
395 negeq 11363 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑔𝑡) = if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) → -(𝑔𝑡) = -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
396395breq2d 5107 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑔𝑡) = if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -(𝑔𝑡) ↔ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
397 neg0 11418 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 -0 = 0
398 negeq 11363 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (0 = if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) → -0 = -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
399397, 398eqtr3id 2782 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (0 = if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) → 0 = -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
400399breq2d 5107 . . . . . . . . . . . . . . . . . . . . . . . . 25 (0 = if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0 ↔ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
401396, 400ifboth 4516 . . . . . . . . . . . . . . . . . . . . . . . 24 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -(𝑔𝑡) ∧ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
402387, 394, 401syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
403 suble0 11642 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℝ ∧ -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℝ) → (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ≤ 0 ↔ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
4048, 368, 403syl2an 596 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) → (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ≤ 0 ↔ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
405404ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ≤ 0 ↔ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
406402, 405mpbird 257 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) ≤ 0)
407371, 406absnidd 15328 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = -((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
408 subneg 11421 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℂ ∧ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℂ) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) + if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
409408negeqd 11365 . . . . . . . . . . . . . . . . . . . . . . . 24 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℂ ∧ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℂ) → -((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = -((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) + if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
410 negdi2 11430 . . . . . . . . . . . . . . . . . . . . . . . 24 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℂ ∧ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℂ) → -((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) + if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = (-(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
411409, 410eqtrd 2768 . . . . . . . . . . . . . . . . . . . . . . 23 (((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ∈ ℂ ∧ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℂ) → -((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = (-(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
41232, 140, 411syl2an 596 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) → -((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = (-(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
413412ad2antrr 726 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → -((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = (-(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
414407, 413eqtrd 2768 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = (-(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
415 iffalse 4485 . . . . . . . . . . . . . . . . . . . . . . 23 (¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) → if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))
416415oveq2d 7371 . . . . . . . . . . . . . . . . . . . . . 22 (¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
417416fveq2d 6835 . . . . . . . . . . . . . . . . . . . . 21 (¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) = (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
418417adantl 481 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) = (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
4198, 381sylan 580 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) ≤ 0) → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) = -(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
420393, 419syldan 591 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) = -(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))
421420oveq1d 7370 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = (-(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
422388, 421sylan 580 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)) = (-(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
423414, 418, 4223eqtr4d 2778 . . . . . . . . . . . . . . . . . . 19 ((((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ 0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) = ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
424367, 423pm2.61dan 812 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))) = ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
425424oveq2d 7371 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))) = (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
42653recnd 11151 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ ℂ)
427 pncan3 11379 . . . . . . . . . . . . . . . . . . 19 ((if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) ∈ ℂ ∧ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) ∈ ℂ) → (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
428140, 426, 427syl2anr 597 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) → (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
429428adantr 480 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + ((abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))) − if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
430425, 429eqtrd 2768 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ (𝑔𝑡) ≤ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) → (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
431341, 430syldan 591 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑔 ∈ dom ∫1𝑡 ∈ ℝ)) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
432328, 431sylanb 581 . . . . . . . . . . . . . 14 ((((𝜑𝑔 ∈ dom ∫1) ∧ 𝑡 ∈ ℝ) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
433432an32s 652 . . . . . . . . . . . . 13 ((((𝜑𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ∧ 𝑡 ∈ ℝ) → (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))) = (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))
434327, 433mpteq2da 5187 . . . . . . . . . . . 12 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (𝑡 ∈ ℝ ↦ (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) = (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))))
435434fveq2d 6835 . . . . . . . . . . 11 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (∫2‘(𝑡 ∈ ℝ ↦ (if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0) + (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) = (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))))
436321, 435eqtrd 2768 . . . . . . . . . 10 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) = (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))))
437436breq1d 5105 . . . . . . . . 9 (((𝜑𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌) ↔ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌)))
438437adantllr 719 . . . . . . . 8 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌) ↔ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌)))
439312adantlr 715 . . . . . . . . . 10 (((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) ∈ ℝ)
44063ad2antlr 727 . . . . . . . . . 10 (((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) → 𝑌 ∈ ℝ)
441115adantl 481 . . . . . . . . . 10 (((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) → (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℝ)
442439, 440, 441ltadd2d 11280 . . . . . . . . 9 (((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌 ↔ ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌)))
443442adantr 480 . . . . . . . 8 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌 ↔ ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌)))
444 ltsubadd 11598 . . . . . . . . . . 11 (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) ∈ ℝ ∧ 𝑌 ∈ ℝ ∧ (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ∈ ℝ) → (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ↔ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌)))
44560, 63, 115, 444syl3an 1160 . . . . . . . . . 10 ((𝜑𝑌 ∈ ℝ+𝑔 ∈ dom ∫1) → (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ↔ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌)))
4464453expa 1118 . . . . . . . . 9 (((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) → (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ↔ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌)))
447446adantr 480 . . . . . . . 8 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → (((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) ↔ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) < ((∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))) + 𝑌)))
448438, 443, 4473bitr4d 311 . . . . . . 7 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ 𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌 ↔ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))
449448adantrr 717 . . . . . 6 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ (𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌))) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌 ↔ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌) < (∫2‘(𝑡 ∈ ℝ ↦ if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))
450131, 449mpbird 257 . . . . 5 ((((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) ∧ (𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌))) → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌)
451450ex 412 . . . 4 (((𝜑𝑌 ∈ ℝ+) ∧ 𝑔 ∈ dom ∫1) → ((𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌))
452451reximdva 3146 . . 3 ((𝜑𝑌 ∈ ℝ+) → (∃𝑔 ∈ dom ∫1(𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) → ∃𝑔 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌))
453 fveq1 6830 . . . . . . . . . . . . . 14 (𝑓 = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) → (𝑓𝑡) = ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0)))‘𝑡))
454453, 167sylan9eq 2788 . . . . . . . . . . . . 13 ((𝑓 = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∧ 𝑡 ∈ ℝ) → (𝑓𝑡) = if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))
455454oveq2d 7371 . . . . . . . . . . . 12 ((𝑓 = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∧ 𝑡 ∈ ℝ) → ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡)) = ((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))
456455fveq2d 6835 . . . . . . . . . . 11 ((𝑓 = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∧ 𝑡 ∈ ℝ) → (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))) = (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))
457456mpteq2dva 5188 . . . . . . . . . 10 (𝑓 = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) → (𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡)))) = (𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0))))))
458457fveq2d 6835 . . . . . . . . 9 (𝑓 = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) → (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) = (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))))
459458breq1d 5105 . . . . . . . 8 (𝑓 = (𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) < 𝑌 ↔ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌))
460459rspcev 3573 . . . . . . 7 (((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∈ dom ∫1 ∧ (∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌) → ∃𝑓 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) < 𝑌)
461460ex 412 . . . . . 6 ((𝑥 ∈ ℝ ↦ if(0 ≤ (ℜ‘if(𝑥𝐷, (𝐹𝑥), 0)), if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0), -if(0 ≤ (𝑔𝑥), (𝑔𝑥), 0))) ∈ dom ∫1 → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌 → ∃𝑓 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) < 𝑌))
462303, 461syl 17 . . . . 5 ((𝜑𝑔 ∈ dom ∫1) → ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌 → ∃𝑓 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) < 𝑌))
463462rexlimdva 3134 . . . 4 (𝜑 → (∃𝑔 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌 → ∃𝑓 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) < 𝑌))
464463adantr 480 . . 3 ((𝜑𝑌 ∈ ℝ+) → (∃𝑔 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − if(0 ≤ (ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)), if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0), -if(0 ≤ (𝑔𝑡), (𝑔𝑡), 0)))))) < 𝑌 → ∃𝑓 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) < 𝑌))
465452, 464syld 47 . 2 ((𝜑𝑌 ∈ ℝ+) → (∃𝑔 ∈ dom ∫1(𝑔r ≤ (𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)))) ∧ ¬ (∫1𝑔) ≤ ((∫2‘(𝑡 ∈ ℝ ↦ (abs‘(ℜ‘if(𝑡𝐷, (𝐹𝑡), 0))))) − 𝑌)) → ∃𝑓 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) < 𝑌))
46680, 465mpd 15 1 ((𝜑𝑌 ∈ ℝ+) → ∃𝑓 ∈ dom ∫1(∫2‘(𝑡 ∈ ℝ ↦ (abs‘((ℜ‘if(𝑡𝐷, (𝐹𝑡), 0)) − (𝑓𝑡))))) < 𝑌)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 847   = wceq 1541  wtru 1542  wcel 2113  wral 3048  wrex 3057  Vcvv 3437  cdif 3895  cun 3896  wss 3898  ifcif 4476  {csn 4577   class class class wbr 5095  cmpt 5176   × cxp 5619  ccnv 5620  dom cdm 5621  ran crn 5622  cima 5624  ccom 5625   Fn wfn 6484  wf 6485  cfv 6489  (class class class)co 7355  f cof 7617  r cofr 7618  cc 11015  cr 11016  0cc0 11017  1c1 11018   + caddc 11020   · cmul 11022  +∞cpnf 11154  *cxr 11156   < clt 11157  cle 11158  cmin 11355  -cneg 11356  +crp 12896  (,)cioo 13252  [,)cico 13254  [,]cicc 13255  cre 15011  cim 15012  abscabs 15148  volcvol 25411  MblFncmbf 25562  1citg1 25563  2citg2 25564  𝐿1cibl 25565  citg 25566  0𝑝c0p 25617
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 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2182  ax-ext 2705  ax-rep 5221  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7677  ax-inf2 9542  ax-cnex 11073  ax-resscn 11074  ax-1cn 11075  ax-icn 11076  ax-addcl 11077  ax-addrcl 11078  ax-mulcl 11079  ax-mulrcl 11080  ax-mulcom 11081  ax-addass 11082  ax-mulass 11083  ax-distr 11084  ax-i2m1 11085  ax-1ne0 11086  ax-1rid 11087  ax-rnegex 11088  ax-rrecex 11089  ax-cnre 11090  ax-pre-lttri 11091  ax-pre-lttrn 11092  ax-pre-ltadd 11093  ax-pre-mulgt0 11094  ax-pre-sup 11095  ax-addf 11096
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2725  df-clel 2808  df-nfc 2882  df-ne 2930  df-nel 3034  df-ral 3049  df-rex 3058  df-rmo 3347  df-reu 3348  df-rab 3397  df-v 3439  df-sbc 3738  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4283  df-if 4477  df-pw 4553  df-sn 4578  df-pr 4580  df-op 4584  df-uni 4861  df-int 4900  df-iun 4945  df-disj 5063  df-br 5096  df-opab 5158  df-mpt 5177  df-tr 5203  df-id 5516  df-eprel 5521  df-po 5529  df-so 5530  df-fr 5574  df-se 5575  df-we 5576  df-xp 5627  df-rel 5628  df-cnv 5629  df-co 5630  df-dm 5631  df-rn 5632  df-res 5633  df-ima 5634  df-pred 6256  df-ord 6317  df-on 6318  df-lim 6319  df-suc 6320  df-iota 6445  df-fun 6491  df-fn 6492  df-f 6493  df-f1 6494  df-fo 6495  df-f1o 6496  df-fv 6497  df-isom 6498  df-riota 7312  df-ov 7358  df-oprab 7359  df-mpo 7360  df-of 7619  df-ofr 7620  df-om 7806  df-1st 7930  df-2nd 7931  df-frecs 8220  df-wrecs 8251  df-recs 8300  df-rdg 8338  df-1o 8394  df-2o 8395  df-er 8631  df-map 8761  df-pm 8762  df-en 8880  df-dom 8881  df-sdom 8882  df-fin 8883  df-fi 9306  df-sup 9337  df-inf 9338  df-oi 9407  df-dju 9805  df-card 9843  df-pnf 11159  df-mnf 11160  df-xr 11161  df-ltxr 11162  df-le 11163  df-sub 11357  df-neg 11358  df-div 11786  df-nn 12137  df-2 12199  df-3 12200  df-4 12201  df-n0 12393  df-z 12480  df-uz 12743  df-q 12853  df-rp 12897  df-xneg 13017  df-xadd 13018  df-xmul 13019  df-ioo 13256  df-ico 13258  df-icc 13259  df-fz 13415  df-fzo 13562  df-fl 13703  df-mod 13781  df-seq 13916  df-exp 13976  df-hash 14245  df-cj 15013  df-re 15014  df-im 15015  df-sqrt 15149  df-abs 15150  df-clim 15402  df-sum 15601  df-rest 17333  df-topgen 17354  df-psmet 21292  df-xmet 21293  df-met 21294  df-bl 21295  df-mopn 21296  df-top 22829  df-topon 22846  df-bases 22881  df-cmp 23322  df-ovol 25412  df-vol 25413  df-mbf 25567  df-itg1 25568  df-itg2 25569  df-ibl 25570  df-0p 25618
This theorem is referenced by:  ftc1anclem6  37811
  Copyright terms: Public domain W3C validator