Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  itgioocnicc Structured version   Visualization version   GIF version

Theorem itgioocnicc 39487
Description: The integral of a piecewise continuous function 𝐹 on an open interval is equal to the integral of the continuous function 𝐺, in the corresponding closed interval. 𝐺 is equal to 𝐹 on the open interval, but it is continuous at the two boundaries, also. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
itgioocnicc.a (𝜑𝐴 ∈ ℝ)
itgioocnicc.b (𝜑𝐵 ∈ ℝ)
itgioocnicc.f (𝜑𝐹:dom 𝐹⟶ℂ)
itgioocnicc.fcn (𝜑 → (𝐹 ↾ (𝐴(,)𝐵)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
itgioocnicc.fdom (𝜑 → (𝐴[,]𝐵) ⊆ dom 𝐹)
itgioocnicc.r (𝜑𝑅 ∈ ((𝐹 ↾ (𝐴(,)𝐵)) lim 𝐴))
itgioocnicc.l (𝜑𝐿 ∈ ((𝐹 ↾ (𝐴(,)𝐵)) lim 𝐵))
itgioocnicc.g 𝐺 = (𝑥 ∈ (𝐴[,]𝐵) ↦ if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))))
Assertion
Ref Expression
itgioocnicc (𝜑 → (𝐺 ∈ 𝐿1 ∧ ∫(𝐴[,]𝐵)(𝐺𝑥) d𝑥 = ∫(𝐴[,]𝐵)(𝐹𝑥) d𝑥))
Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝐹   𝑥,𝐿   𝑥,𝑅   𝜑,𝑥
Allowed substitution hint:   𝐺(𝑥)

Proof of Theorem itgioocnicc
StepHypRef Expression
1 itgioocnicc.a . . 3 (𝜑𝐴 ∈ ℝ)
2 itgioocnicc.b . . 3 (𝜑𝐵 ∈ ℝ)
3 itgioocnicc.g . . . . 5 𝐺 = (𝑥 ∈ (𝐴[,]𝐵) ↦ if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))))
4 iftrue 4069 . . . . . . . . 9 (𝑥 = 𝐴 → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = 𝑅)
5 iftrue 4069 . . . . . . . . 9 (𝑥 = 𝐴 → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))) = 𝑅)
64, 5eqtr4d 2663 . . . . . . . 8 (𝑥 = 𝐴 → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))))
76adantl 482 . . . . . . 7 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ 𝑥 = 𝐴) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))))
8 iftrue 4069 . . . . . . . . . . . 12 (𝑥 = 𝐵 → if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)) = 𝐿)
9 iftrue 4069 . . . . . . . . . . . 12 (𝑥 = 𝐵 → if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)) = 𝐿)
108, 9eqtr4d 2663 . . . . . . . . . . 11 (𝑥 = 𝐵 → if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)) = if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)))
1110adantl 482 . . . . . . . . . 10 ((¬ 𝑥 = 𝐴𝑥 = 𝐵) → if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)) = if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)))
1211ifeq2d 4082 . . . . . . . . 9 ((¬ 𝑥 = 𝐴𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))))
1312adantll 749 . . . . . . . 8 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ 𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))))
14 iffalse 4072 . . . . . . . . . 10 𝑥 = 𝐴 → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)))
1514ad2antlr 762 . . . . . . . . 9 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)))
16 iffalse 4072 . . . . . . . . . 10 𝑥 = 𝐵 → if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)) = (𝐹𝑥))
1716adantl 482 . . . . . . . . 9 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)) = (𝐹𝑥))
18 iffalse 4072 . . . . . . . . . . 11 𝑥 = 𝐴 → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))) = if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)))
1918ad2antlr 762 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))) = if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)))
20 iffalse 4072 . . . . . . . . . . 11 𝑥 = 𝐵 → if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)) = ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))
2120adantl 482 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)) = ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))
221adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝐴 ∈ ℝ)
2322rexrd 10034 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝐴 ∈ ℝ*)
2423ad2antrr 761 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → 𝐴 ∈ ℝ*)
252rexrd 10034 . . . . . . . . . . . . 13 (𝜑𝐵 ∈ ℝ*)
2625ad3antrrr 765 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → 𝐵 ∈ ℝ*)
272adantr 481 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝐵 ∈ ℝ)
28 simpr 477 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ (𝐴[,]𝐵))
29 eliccre 39126 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℝ)
3022, 27, 28, 29syl3anc 1323 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ ℝ)
3130ad2antrr 761 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → 𝑥 ∈ ℝ)
321ad2antrr 761 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) → 𝐴 ∈ ℝ)
3330adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) → 𝑥 ∈ ℝ)
3425adantr 481 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝐵 ∈ ℝ*)
35 iccgelb 12169 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*𝑥 ∈ (𝐴[,]𝐵)) → 𝐴𝑥)
3623, 34, 28, 35syl3anc 1323 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝐴𝑥)
3736adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) → 𝐴𝑥)
38 neqne 2804 . . . . . . . . . . . . . . 15 𝑥 = 𝐴𝑥𝐴)
3938adantl 482 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) → 𝑥𝐴)
4032, 33, 37, 39leneltd 10136 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) → 𝐴 < 𝑥)
4140adantr 481 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → 𝐴 < 𝑥)
4230adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐵) → 𝑥 ∈ ℝ)
432ad2antrr 761 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐵) → 𝐵 ∈ ℝ)
44 iccleub 12168 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*𝑥 ∈ (𝐴[,]𝐵)) → 𝑥𝐵)
4523, 34, 28, 44syl3anc 1323 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥𝐵)
4645adantr 481 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐵) → 𝑥𝐵)
47 eqcom 2633 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝐵𝐵 = 𝑥)
4847notbii 310 . . . . . . . . . . . . . . . . 17 𝑥 = 𝐵 ↔ ¬ 𝐵 = 𝑥)
4948biimpi 206 . . . . . . . . . . . . . . . 16 𝑥 = 𝐵 → ¬ 𝐵 = 𝑥)
5049neqned 2803 . . . . . . . . . . . . . . 15 𝑥 = 𝐵𝐵𝑥)
5150adantl 482 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐵) → 𝐵𝑥)
5242, 43, 46, 51leneltd 10136 . . . . . . . . . . . . 13 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐵) → 𝑥 < 𝐵)
5352adantlr 750 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → 𝑥 < 𝐵)
5424, 26, 31, 41, 53eliood 39118 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → 𝑥 ∈ (𝐴(,)𝐵))
55 fvres 6165 . . . . . . . . . . 11 (𝑥 ∈ (𝐴(,)𝐵) → ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥) = (𝐹𝑥))
5654, 55syl 17 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥) = (𝐹𝑥))
5719, 21, 563eqtrrd 2665 . . . . . . . . 9 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → (𝐹𝑥) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))))
5815, 17, 573eqtrd 2664 . . . . . . . 8 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))))
5913, 58pm2.61dan 831 . . . . . . 7 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))))
607, 59pm2.61dan 831 . . . . . 6 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))))
6160mpteq2dva 4709 . . . . 5 (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)))) = (𝑥 ∈ (𝐴[,]𝐵) ↦ if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)))))
623, 61syl5eq 2672 . . . 4 (𝜑𝐺 = (𝑥 ∈ (𝐴[,]𝐵) ↦ if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)))))
63 nfv 1845 . . . . 5 𝑥𝜑
64 eqid 2626 . . . . 5 (𝑥 ∈ (𝐴[,]𝐵) ↦ if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)))) = (𝑥 ∈ (𝐴[,]𝐵) ↦ if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))))
65 itgioocnicc.fcn . . . . 5 (𝜑 → (𝐹 ↾ (𝐴(,)𝐵)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
66 itgioocnicc.l . . . . 5 (𝜑𝐿 ∈ ((𝐹 ↾ (𝐴(,)𝐵)) lim 𝐵))
67 itgioocnicc.r . . . . 5 (𝜑𝑅 ∈ ((𝐹 ↾ (𝐴(,)𝐵)) lim 𝐴))
6863, 64, 1, 2, 65, 66, 67cncfiooicc 39398 . . . 4 (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥)))) ∈ ((𝐴[,]𝐵)–cn→ℂ))
6962, 68eqeltrd 2704 . . 3 (𝜑𝐺 ∈ ((𝐴[,]𝐵)–cn→ℂ))
70 cniccibl 23508 . . 3 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐺 ∈ ((𝐴[,]𝐵)–cn→ℂ)) → 𝐺 ∈ 𝐿1)
711, 2, 69, 70syl3anc 1323 . 2 (𝜑𝐺 ∈ 𝐿1)
724adantl 482 . . . . . . . . 9 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ 𝑥 = 𝐴) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = 𝑅)
73 limccl 23540 . . . . . . . . . . 11 ((𝐹 ↾ (𝐴(,)𝐵)) lim 𝐴) ⊆ ℂ
7473, 67sseldi 3586 . . . . . . . . . 10 (𝜑𝑅 ∈ ℂ)
7574ad2antrr 761 . . . . . . . . 9 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ 𝑥 = 𝐴) → 𝑅 ∈ ℂ)
7672, 75eqeltrd 2704 . . . . . . . 8 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ 𝑥 = 𝐴) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) ∈ ℂ)
7714, 8sylan9eq 2680 . . . . . . . . . . 11 ((¬ 𝑥 = 𝐴𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = 𝐿)
7877adantll 749 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ 𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = 𝐿)
79 limccl 23540 . . . . . . . . . . . 12 ((𝐹 ↾ (𝐴(,)𝐵)) lim 𝐵) ⊆ ℂ
8079, 66sseldi 3586 . . . . . . . . . . 11 (𝜑𝐿 ∈ ℂ)
8180ad3antrrr 765 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ 𝑥 = 𝐵) → 𝐿 ∈ ℂ)
8278, 81eqeltrd 2704 . . . . . . . . 9 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ 𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) ∈ ℂ)
8314, 16sylan9eq 2680 . . . . . . . . . . 11 ((¬ 𝑥 = 𝐴 ∧ ¬ 𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = (𝐹𝑥))
8483adantll 749 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = (𝐹𝑥))
8556eqcomd 2632 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → (𝐹𝑥) = ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥))
86 cncff 22599 . . . . . . . . . . . . . 14 ((𝐹 ↾ (𝐴(,)𝐵)) ∈ ((𝐴(,)𝐵)–cn→ℂ) → (𝐹 ↾ (𝐴(,)𝐵)):(𝐴(,)𝐵)⟶ℂ)
8765, 86syl 17 . . . . . . . . . . . . 13 (𝜑 → (𝐹 ↾ (𝐴(,)𝐵)):(𝐴(,)𝐵)⟶ℂ)
8887ad3antrrr 765 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → (𝐹 ↾ (𝐴(,)𝐵)):(𝐴(,)𝐵)⟶ℂ)
8988, 54ffvelrnd 6317 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → ((𝐹 ↾ (𝐴(,)𝐵))‘𝑥) ∈ ℂ)
9085, 89eqeltrd 2704 . . . . . . . . . 10 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → (𝐹𝑥) ∈ ℂ)
9184, 90eqeltrd 2704 . . . . . . . . 9 ((((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) ∧ ¬ 𝑥 = 𝐵) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) ∈ ℂ)
9282, 91pm2.61dan 831 . . . . . . . 8 (((𝜑𝑥 ∈ (𝐴[,]𝐵)) ∧ ¬ 𝑥 = 𝐴) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) ∈ ℂ)
9376, 92pm2.61dan 831 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) ∈ ℂ)
943fvmpt2 6249 . . . . . . 7 ((𝑥 ∈ (𝐴[,]𝐵) ∧ if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) ∈ ℂ) → (𝐺𝑥) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))))
9528, 93, 94syl2anc 692 . . . . . 6 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (𝐺𝑥) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))))
9695, 93eqeltrd 2704 . . . . 5 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (𝐺𝑥) ∈ ℂ)
971, 2, 96itgioo 23483 . . . 4 (𝜑 → ∫(𝐴(,)𝐵)(𝐺𝑥) d𝑥 = ∫(𝐴[,]𝐵)(𝐺𝑥) d𝑥)
9897eqcomd 2632 . . 3 (𝜑 → ∫(𝐴[,]𝐵)(𝐺𝑥) d𝑥 = ∫(𝐴(,)𝐵)(𝐺𝑥) d𝑥)
99 ioossicc 12198 . . . . . . 7 (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵)
10099sseli 3584 . . . . . 6 (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 ∈ (𝐴[,]𝐵))
101100, 95sylan2 491 . . . . 5 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → (𝐺𝑥) = if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))))
1021adantr 481 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → 𝐴 ∈ ℝ)
103 eliooord 12172 . . . . . . . . . 10 (𝑥 ∈ (𝐴(,)𝐵) → (𝐴 < 𝑥𝑥 < 𝐵))
104103simpld 475 . . . . . . . . 9 (𝑥 ∈ (𝐴(,)𝐵) → 𝐴 < 𝑥)
105104adantl 482 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → 𝐴 < 𝑥)
106102, 105gtned 10117 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → 𝑥𝐴)
107106neneqd 2801 . . . . . 6 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → ¬ 𝑥 = 𝐴)
108107, 14syl 17 . . . . 5 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → if(𝑥 = 𝐴, 𝑅, if(𝑥 = 𝐵, 𝐿, (𝐹𝑥))) = if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)))
109100, 30sylan2 491 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ ℝ)
110103simprd 479 . . . . . . . . 9 (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 < 𝐵)
111110adantl 482 . . . . . . . 8 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 < 𝐵)
112109, 111ltned 10118 . . . . . . 7 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → 𝑥𝐵)
113112neneqd 2801 . . . . . 6 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → ¬ 𝑥 = 𝐵)
114113, 16syl 17 . . . . 5 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → if(𝑥 = 𝐵, 𝐿, (𝐹𝑥)) = (𝐹𝑥))
115101, 108, 1143eqtrd 2664 . . . 4 ((𝜑𝑥 ∈ (𝐴(,)𝐵)) → (𝐺𝑥) = (𝐹𝑥))
116115itgeq2dv 23449 . . 3 (𝜑 → ∫(𝐴(,)𝐵)(𝐺𝑥) d𝑥 = ∫(𝐴(,)𝐵)(𝐹𝑥) d𝑥)
117 itgioocnicc.f . . . . . 6 (𝜑𝐹:dom 𝐹⟶ℂ)
118117adantr 481 . . . . 5 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝐹:dom 𝐹⟶ℂ)
119 itgioocnicc.fdom . . . . . 6 (𝜑 → (𝐴[,]𝐵) ⊆ dom 𝐹)
120119sselda 3588 . . . . 5 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → 𝑥 ∈ dom 𝐹)
121118, 120ffvelrnd 6317 . . . 4 ((𝜑𝑥 ∈ (𝐴[,]𝐵)) → (𝐹𝑥) ∈ ℂ)
1221, 2, 121itgioo 23483 . . 3 (𝜑 → ∫(𝐴(,)𝐵)(𝐹𝑥) d𝑥 = ∫(𝐴[,]𝐵)(𝐹𝑥) d𝑥)
12398, 116, 1223eqtrd 2664 . 2 (𝜑 → ∫(𝐴[,]𝐵)(𝐺𝑥) d𝑥 = ∫(𝐴[,]𝐵)(𝐹𝑥) d𝑥)
12471, 123jca 554 1 (𝜑 → (𝐺 ∈ 𝐿1 ∧ ∫(𝐴[,]𝐵)(𝐺𝑥) d𝑥 = ∫(𝐴[,]𝐵)(𝐹𝑥) d𝑥))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 384   = wceq 1480  wcel 1992  wne 2796  wss 3560  ifcif 4063   class class class wbr 4618  cmpt 4678  dom cdm 5079  cres 5081  wf 5846  cfv 5850  (class class class)co 6605  cc 9879  cr 9880  *cxr 10018   < clt 10019  cle 10020  (,)cioo 12114  [,]cicc 12117  cnccncf 22582  𝐿1cibl 23287  citg 23288   lim climc 23527
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1841  ax-6 1890  ax-7 1937  ax-8 1994  ax-9 2001  ax-10 2021  ax-11 2036  ax-12 2049  ax-13 2250  ax-ext 2606  ax-rep 4736  ax-sep 4746  ax-nul 4754  ax-pow 4808  ax-pr 4872  ax-un 6903  ax-inf2 8483  ax-cc 9202  ax-cnex 9937  ax-resscn 9938  ax-1cn 9939  ax-icn 9940  ax-addcl 9941  ax-addrcl 9942  ax-mulcl 9943  ax-mulrcl 9944  ax-mulcom 9945  ax-addass 9946  ax-mulass 9947  ax-distr 9948  ax-i2m1 9949  ax-1ne0 9950  ax-1rid 9951  ax-rnegex 9952  ax-rrecex 9953  ax-cnre 9954  ax-pre-lttri 9955  ax-pre-lttrn 9956  ax-pre-ltadd 9957  ax-pre-mulgt0 9958  ax-pre-sup 9959  ax-addf 9960  ax-mulf 9961
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-fal 1486  df-ex 1702  df-nf 1707  df-sb 1883  df-eu 2478  df-mo 2479  df-clab 2613  df-cleq 2619  df-clel 2622  df-nfc 2756  df-ne 2797  df-nel 2900  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3193  df-sbc 3423  df-csb 3520  df-dif 3563  df-un 3565  df-in 3567  df-ss 3574  df-pss 3576  df-nul 3897  df-if 4064  df-pw 4137  df-sn 4154  df-pr 4156  df-tp 4158  df-op 4160  df-uni 4408  df-int 4446  df-iun 4492  df-iin 4493  df-disj 4589  df-br 4619  df-opab 4679  df-mpt 4680  df-tr 4718  df-eprel 4990  df-id 4994  df-po 5000  df-so 5001  df-fr 5038  df-se 5039  df-we 5040  df-xp 5085  df-rel 5086  df-cnv 5087  df-co 5088  df-dm 5089  df-rn 5090  df-res 5091  df-ima 5092  df-pred 5642  df-ord 5688  df-on 5689  df-lim 5690  df-suc 5691  df-iota 5813  df-fun 5852  df-fn 5853  df-f 5854  df-f1 5855  df-fo 5856  df-f1o 5857  df-fv 5858  df-isom 5859  df-riota 6566  df-ov 6608  df-oprab 6609  df-mpt2 6610  df-of 6851  df-ofr 6852  df-om 7014  df-1st 7116  df-2nd 7117  df-supp 7242  df-wrecs 7353  df-recs 7414  df-rdg 7452  df-1o 7506  df-2o 7507  df-oadd 7510  df-omul 7511  df-er 7688  df-map 7805  df-pm 7806  df-ixp 7854  df-en 7901  df-dom 7902  df-sdom 7903  df-fin 7904  df-fsupp 8221  df-fi 8262  df-sup 8293  df-inf 8294  df-oi 8360  df-card 8710  df-acn 8713  df-cda 8935  df-pnf 10021  df-mnf 10022  df-xr 10023  df-ltxr 10024  df-le 10025  df-sub 10213  df-neg 10214  df-div 10630  df-nn 10966  df-2 11024  df-3 11025  df-4 11026  df-5 11027  df-6 11028  df-7 11029  df-8 11030  df-9 11031  df-n0 11238  df-z 11323  df-dec 11438  df-uz 11632  df-q 11733  df-rp 11777  df-xneg 11890  df-xadd 11891  df-xmul 11892  df-ioo 12118  df-ioc 12119  df-ico 12120  df-icc 12121  df-fz 12266  df-fzo 12404  df-fl 12530  df-mod 12606  df-seq 12739  df-exp 12798  df-hash 13055  df-cj 13768  df-re 13769  df-im 13770  df-sqrt 13904  df-abs 13905  df-limsup 14131  df-clim 14148  df-rlim 14149  df-sum 14346  df-struct 15778  df-ndx 15779  df-slot 15780  df-base 15781  df-sets 15782  df-ress 15783  df-plusg 15870  df-mulr 15871  df-starv 15872  df-sca 15873  df-vsca 15874  df-ip 15875  df-tset 15876  df-ple 15877  df-ds 15880  df-unif 15881  df-hom 15882  df-cco 15883  df-rest 15999  df-topn 16000  df-0g 16018  df-gsum 16019  df-topgen 16020  df-pt 16021  df-prds 16024  df-xrs 16078  df-qtop 16083  df-imas 16084  df-xps 16086  df-mre 16162  df-mrc 16163  df-acs 16165  df-mgm 17158  df-sgrp 17200  df-mnd 17211  df-submnd 17252  df-mulg 17457  df-cntz 17666  df-cmn 18111  df-psmet 19652  df-xmet 19653  df-met 19654  df-bl 19655  df-mopn 19656  df-cnfld 19661  df-top 20616  df-bases 20617  df-topon 20618  df-topsp 20619  df-cld 20728  df-ntr 20729  df-cls 20730  df-cn 20936  df-cnp 20937  df-cmp 21095  df-tx 21270  df-hmeo 21463  df-xms 22030  df-ms 22031  df-tms 22032  df-cncf 22584  df-ovol 23135  df-vol 23136  df-mbf 23289  df-itg1 23290  df-itg2 23291  df-ibl 23292  df-itg 23293  df-0p 23338  df-limc 23531
This theorem is referenced by:  fourierdlem81  39698
  Copyright terms: Public domain W3C validator