iblabsnclem - Mathbox for Brendan Leahy

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

Theorem iblabsnclem 37683

Description: Lemma for iblabsnc 37684; cf. iblabslem 25727. (Contributed by Brendan Leahy, 7-Nov-2017.)

**Hypotheses**
Ref	Expression
iblabsnc.1	⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ 𝑉)
iblabsnc.2	⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈ 𝐿¹)
iblabsnclem.1	⊢ 𝐺 = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
iblabsnclem.2	⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ 𝐿¹)
iblabsnclem.3	⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝐵) ∈ ℝ)

**Assertion**
Ref	Expression
iblabsnclem	⊢ (𝜑 → (𝐺 ∈ MblFn ∧ (∫₂‘𝐺) ∈ ℝ))

Distinct variable groups: 𝑥,𝐴 𝜑,𝑥 Allowed substitution hints: 𝐵(𝑥) 𝐹(𝑥) 𝐺(𝑥) 𝑉(𝑥)

Proof of Theorem iblabsnclem Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		iblabsnclem.1	. . 3 ⊢ 𝐺 = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
2		iblabsnclem.2	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ 𝐿¹)
3		iblabsnclem.3	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝐵) ∈ ℝ)
4	3	iblrelem 25690	. . . . . . . 8 ⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ 𝐿¹ ↔ ((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) ∈ ℝ ∧ (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) ∈ ℝ)))
5	2, 4	mpbid 232	. . . . . . 7 ⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) ∈ ℝ ∧ (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) ∈ ℝ))
6	5	simp1d 1142	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn)
7	6, 3	mbfdm2 25536	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ dom vol)
8		mblss 25430	. . . . 5 ⊢ (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
9	7, 8	syl 17	. . . 4 ⊢ (𝜑 → 𝐴 ⊆ ℝ)
10		rembl 25439	. . . . 5 ⊢ ℝ ∈ dom vol
11	10	a1i 11	. . . 4 ⊢ (𝜑 → ℝ ∈ dom vol)
12	3	recnd 11143	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝐵) ∈ ℂ)
13	12	abscld 15346	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (abs‘(𝐹‘𝐵)) ∈ ℝ)
14		0re 11117	. . . . 5 ⊢ 0 ∈ ℝ
15		ifcl 4522	. . . . 5 ⊢ (((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 0 ∈ ℝ) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) ∈ ℝ)
16	13, 14, 15	sylancl 586	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) ∈ ℝ)
17		eldifn 4083	. . . . . 6 ⊢ (𝑥 ∈ (ℝ ∖ 𝐴) → ¬ 𝑥 ∈ 𝐴)
18	17	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ 𝑥 ∈ 𝐴)
19		iffalse 4485	. . . . 5 ⊢ (¬ 𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = 0)
20	18, 19	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℝ ∖ 𝐴)) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = 0)
21		iftrue 4482	. . . . . 6 ⊢ (𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = (abs‘(𝐹‘𝐵)))
22	21	mpteq2ia 5187	. . . . 5 ⊢ (𝑥 ∈ 𝐴 ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)) = (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵)))
23	13	fmpttd 7049	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))):𝐴⟶ℝ)
24	13	adantlr 715	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (abs‘(𝐹‘𝐵)) ∈ ℝ)
25	24	biantrurd 532	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (abs‘(𝐹‘𝐵)) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 𝑦 < (abs‘(𝐹‘𝐵)))))
26	3	adantlr 715	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝐵) ∈ ℝ)
27		simplr 768	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → 𝑦 ∈ ℝ)
28	26, 27	absled 15340	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ≤ 𝑦 ↔ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦)))
29	28	notbid 318	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (¬ (abs‘(𝐹‘𝐵)) ≤ 𝑦 ↔ ¬ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦)))
30	27, 24	ltnled 11263	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (abs‘(𝐹‘𝐵)) ↔ ¬ (abs‘(𝐹‘𝐵)) ≤ 𝑦))
31		renegcl 11427	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ → -𝑦 ∈ ℝ)
32	31	rexrd 11165	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ → -𝑦 ∈ ℝ^*)
33	32	ad2antlr 727	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → -𝑦 ∈ ℝ^*)
34		elioomnf 13347	. . . . . . . . . . . . . . 15 ⊢ (-𝑦 ∈ ℝ^* → ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (𝐹‘𝐵) < -𝑦)))
35	33, 34	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (𝐹‘𝐵) < -𝑦)))
36	26	biantrurd 532	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) < -𝑦 ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (𝐹‘𝐵) < -𝑦)))
37	27	renegcld 11547	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → -𝑦 ∈ ℝ)
38	26, 37	ltnled 11263	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) < -𝑦 ↔ ¬ -𝑦 ≤ (𝐹‘𝐵)))
39	35, 36, 38	3bitr2d 307	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ↔ ¬ -𝑦 ≤ (𝐹‘𝐵)))
40		rexr 11161	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ℝ^*)
41	40	ad2antlr 727	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → 𝑦 ∈ ℝ^*)
42		elioopnf 13346	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℝ^* → ((𝐹‘𝐵) ∈ (𝑦(,)+∞) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 𝑦 < (𝐹‘𝐵))))
43	41, 42	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (𝑦(,)+∞) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 𝑦 < (𝐹‘𝐵))))
44	26	biantrurd 532	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (𝐹‘𝐵) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 𝑦 < (𝐹‘𝐵))))
45	27, 26	ltnled 11263	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (𝐹‘𝐵) ↔ ¬ (𝐹‘𝐵) ≤ 𝑦))
46	43, 44, 45	3bitr2d 307	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (𝑦(,)+∞) ↔ ¬ (𝐹‘𝐵) ≤ 𝑦))
47	39, 46	orbi12d 918	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞)) ↔ (¬ -𝑦 ≤ (𝐹‘𝐵) ∨ ¬ (𝐹‘𝐵) ≤ 𝑦)))
48		ianor 983	. . . . . . . . . . . 12 ⊢ (¬ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦) ↔ (¬ -𝑦 ≤ (𝐹‘𝐵) ∨ ¬ (𝐹‘𝐵) ≤ 𝑦))
49	47, 48	bitr4di 289	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞)) ↔ ¬ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦)))
50	29, 30, 49	3bitr4rd 312	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞)) ↔ 𝑦 < (abs‘(𝐹‘𝐵))))
51		elioopnf 13346	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ^* → ((abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 𝑦 < (abs‘(𝐹‘𝐵)))))
52	41, 51	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 𝑦 < (abs‘(𝐹‘𝐵)))))
53	25, 50, 52	3bitr4rd 312	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞) ↔ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))))
54	53	rabbidva 3401	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞)} = {𝑥 ∈ 𝐴 ∣ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))})
55		eqid 2729	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) = (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵)))
56	55	mptpreima 6187	. . . . . . . 8 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (𝑦(,)+∞)) = {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞)}
57		eqid 2729	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) = (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵))
58	57	mptpreima 6187	. . . . . . . . . 10 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-∞(,)-𝑦)}
59	57	mptpreima 6187	. . . . . . . . . 10 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞)) = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (𝑦(,)+∞)}
60	58, 59	uneq12i 4117	. . . . . . . . 9 ⊢ ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) = ({𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-∞(,)-𝑦)} ∪ {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (𝑦(,)+∞)})
61		unrab 4266	. . . . . . . . 9 ⊢ ({𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-∞(,)-𝑦)} ∪ {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (𝑦(,)+∞)}) = {𝑥 ∈ 𝐴 ∣ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))}
62	60, 61	eqtri 2752	. . . . . . . 8 ⊢ ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) = {𝑥 ∈ 𝐴 ∣ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))}
63	54, 56, 62	3eqtr4g 2789	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (𝑦(,)+∞)) = ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))))
64		iblmbf 25666	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ 𝐿¹ → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn)
65	2, 64	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn)
66	3	fmpttd 7049	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ)
67		mbfima 25529	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∈ dom vol)
68		mbfima 25529	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞)) ∈ dom vol)
69		unmbl 25436	. . . . . . . . . 10 ⊢ (((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∈ dom vol ∧ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞)) ∈ dom vol) → ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) ∈ dom vol)
70	67, 68, 69	syl2anc 584	. . . . . . . . 9 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) ∈ dom vol)
71	65, 66, 70	syl2anc 584	. . . . . . . 8 ⊢ (𝜑 → ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) ∈ dom vol)
72	71	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) ∈ dom vol)
73	63, 72	eqeltrd 2828	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (𝑦(,)+∞)) ∈ dom vol)
74		elioomnf 13347	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ ℝ^* → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ (abs‘(𝐹‘𝐵)) < 𝑦)))
75	41, 74	syl 17	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ (abs‘(𝐹‘𝐵)) < 𝑦)))
76	24	biantrurd 532	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) < 𝑦 ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ (abs‘(𝐹‘𝐵)) < 𝑦)))
77	26, 27	absltd 15339	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) < 𝑦 ↔ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
78	75, 76, 77	3bitr2d 307	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
79	26	biantrurd 532	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦))))
80	78, 79	bitrd 279	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦))))
81		3anass 1094	. . . . . . . . . . 11 ⊢ (((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
82	80, 81	bitr4di 289	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
83		elioo2 13289	. . . . . . . . . . . 12 ⊢ ((-𝑦 ∈ ℝ^* ∧ 𝑦 ∈ ℝ^*) → ((𝐹‘𝐵) ∈ (-𝑦(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
84	32, 40, 83	syl2anc 584	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ → ((𝐹‘𝐵) ∈ (-𝑦(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
85	84	ad2antlr 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (-𝑦(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
86	82, 85	bitr4d 282	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ (𝐹‘𝐵) ∈ (-𝑦(,)𝑦)))
87	86	rabbidva 3401	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦)} = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-𝑦(,)𝑦)})
88	55	mptpreima 6187	. . . . . . . 8 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (-∞(,)𝑦)) = {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦)}
89	57	mptpreima 6187	. . . . . . . 8 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)) = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-𝑦(,)𝑦)}
90	87, 88, 89	3eqtr4g 2789	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (-∞(,)𝑦)) = (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)))
91		mbfima 25529	. . . . . . . . 9 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)) ∈ dom vol)
92	65, 66, 91	syl2anc 584	. . . . . . . 8 ⊢ (𝜑 → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)) ∈ dom vol)
93	92	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)) ∈ dom vol)
94	90, 93	eqeltrd 2828	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (-∞(,)𝑦)) ∈ dom vol)
95	23, 7, 73, 94	ismbf2d 25539	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) ∈ MblFn)
96	22, 95	eqeltrid 2832	. . . 4 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)) ∈ MblFn)
97	9, 11, 16, 20, 96	mbfss 25545	. . 3 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)) ∈ MblFn)
98	1, 97	eqeltrid 2832	. 2 ⊢ (𝜑 → 𝐺 ∈ MblFn)
99		reex 11100	. . . . . . . . 9 ⊢ ℝ ∈ V
100	99	a1i 11	. . . . . . . 8 ⊢ (𝜑 → ℝ ∈ V)
101		ifan 4530	. . . . . . . . . 10 ⊢ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) = if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0)
102		ifcl 4522	. . . . . . . . . . . . 13 ⊢ (((𝐹‘𝐵) ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ ℝ)
103	3, 14, 102	sylancl 586	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ ℝ)
104		max1 13087	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ (𝐹‘𝐵) ∈ ℝ) → 0 ≤ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
105	14, 3, 104	sylancr 587	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 0 ≤ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
106		elrege0 13357	. . . . . . . . . . . 12 ⊢ (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ (0[,)+∞) ↔ (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0)))
107	103, 105, 106	sylanbrc 583	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ (0[,)+∞))
108		0e0icopnf 13361	. . . . . . . . . . . 12 ⊢ 0 ∈ (0[,)+∞)
109	108	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝑥 ∈ 𝐴) → 0 ∈ (0[,)+∞))
110	107, 109	ifclda 4512	. . . . . . . . . 10 ⊢ (𝜑 → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) ∈ (0[,)+∞))
111	101, 110	eqeltrid 2832	. . . . . . . . 9 ⊢ (𝜑 → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) ∈ (0[,)+∞))
112	111	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) ∈ (0[,)+∞))
113		ifan 4530	. . . . . . . . . 10 ⊢ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0) = if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)
114	3	renegcld 11547	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -(𝐹‘𝐵) ∈ ℝ)
115		ifcl 4522	. . . . . . . . . . . . 13 ⊢ ((-(𝐹‘𝐵) ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ ℝ)
116	114, 14, 115	sylancl 586	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ ℝ)
117		max1 13087	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ -(𝐹‘𝐵) ∈ ℝ) → 0 ≤ if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
118	14, 114, 117	sylancr 587	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 0 ≤ if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
119		elrege0 13357	. . . . . . . . . . . 12 ⊢ (if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ (0[,)+∞) ↔ (if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)))
120	116, 118, 119	sylanbrc 583	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ (0[,)+∞))
121	120, 109	ifclda 4512	. . . . . . . . . 10 ⊢ (𝜑 → if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0) ∈ (0[,)+∞))
122	113, 121	eqeltrid 2832	. . . . . . . . 9 ⊢ (𝜑 → if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0) ∈ (0[,)+∞))
123	122	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0) ∈ (0[,)+∞))
124		eqidd 2730	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) = (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)))
125		eqidd 2730	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)) = (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))
126	100, 112, 123, 124, 125	offval2 7633	. . . . . . 7 ⊢ (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) = (𝑥 ∈ ℝ ↦ (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))))
127	101, 113	oveq12i 7361	. . . . . . . . 9 ⊢ (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)) = (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0))
128		max0add 15217	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝐵) ∈ ℝ → (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) + if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)) = (abs‘(𝐹‘𝐵)))
129	3, 128	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) + if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)) = (abs‘(𝐹‘𝐵)))
130		iftrue 4482	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) = if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
131	130	adantl 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) = if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
132		iftrue 4482	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0) = if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
133	132	adantl 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0) = if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
134	131, 133	oveq12d 7367	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) + if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)))
135	21	adantl 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = (abs‘(𝐹‘𝐵)))
136	129, 134, 135	3eqtr4d 2774	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
137	136	ex 412	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 ∈ 𝐴 → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)))
138		00id 11291	. . . . . . . . . . 11 ⊢ (0 + 0) = 0
139		iffalse 4485	. . . . . . . . . . . 12 ⊢ (¬ 𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) = 0)
140		iffalse 4485	. . . . . . . . . . . 12 ⊢ (¬ 𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0) = 0)
141	139, 140	oveq12d 7367	. . . . . . . . . . 11 ⊢ (¬ 𝑥 ∈ 𝐴 → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = (0 + 0))
142	138, 141, 19	3eqtr4a 2790	. . . . . . . . . 10 ⊢ (¬ 𝑥 ∈ 𝐴 → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
143	137, 142	pm2.61d1 180	. . . . . . . . 9 ⊢ (𝜑 → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
144	127, 143	eqtrid 2776	. . . . . . . 8 ⊢ (𝜑 → (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
145	144	mpteq2dv 5186	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)))
146	126, 145	eqtrd 2764	. . . . . 6 ⊢ (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)))
147	1, 146	eqtr4id 2783	. . . . 5 ⊢ (𝜑 → 𝐺 = ((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))))
148	147	fveq2d 6826	. . . 4 ⊢ (𝜑 → (∫₂‘𝐺) = (∫₂‘((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))))
149	111	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) ∈ (0[,)+∞))
150	101, 139	eqtrid 2776	. . . . . . 7 ⊢ (¬ 𝑥 ∈ 𝐴 → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) = 0)
151	18, 150	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℝ ∖ 𝐴)) → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) = 0)
152		ibar 528	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝐴 → (0 ≤ (𝐹‘𝐵) ↔ (𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵))))
153	152	ifbid 4500	. . . . . . . 8 ⊢ (𝑥 ∈ 𝐴 → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) = if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))
154	153	mpteq2ia 5187	. . . . . . 7 ⊢ (𝑥 ∈ 𝐴 ↦ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0)) = (𝑥 ∈ 𝐴 ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))
155	3, 6	mbfpos 25550	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0)) ∈ MblFn)
156	154, 155	eqeltrrid 2833	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∈ MblFn)
157	9, 11, 149, 151, 156	mbfss 25545	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∈ MblFn)
158	112	fmpttd 7049	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)):ℝ⟶(0[,)+∞))
159	5	simp2d 1143	. . . . 5 ⊢ (𝜑 → (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) ∈ ℝ)
160	123	fmpttd 7049	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)):ℝ⟶(0[,)+∞))
161	5	simp3d 1144	. . . . 5 ⊢ (𝜑 → (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) ∈ ℝ)
162	157, 158, 159, 160, 161	itg2addnc 37674	. . . 4 ⊢ (𝜑 → (∫₂‘((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))) = ((∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) + (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))))
163	148, 162	eqtrd 2764	. . 3 ⊢ (𝜑 → (∫₂‘𝐺) = ((∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) + (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))))
164	159, 161	readdcld 11144	. . 3 ⊢ (𝜑 → ((∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) + (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))) ∈ ℝ)
165	163, 164	eqeltrd 2828	. 2 ⊢ (𝜑 → (∫₂‘𝐺) ∈ ℝ)
166	98, 165	jca 511	1 ⊢ (𝜑 → (𝐺 ∈ MblFn ∧ (∫₂‘𝐺) ∈ ℝ))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∨ wo 847 ∧ w3a 1086 = wceq 1540 ∈ wcel 2109 {crab 3394 Vcvv 3436 ∖ cdif 3900 ∪ cun 3901 ⊆ wss 3903 ifcif 4476 class class class wbr 5092 ↦ cmpt 5173 ^◡ccnv 5618 dom cdm 5619 “ cima 5622 ⟶wf 6478 ‘cfv 6482 (class class class)co 7349 ∘_f cof 7611 ℝcr 11008 0cc0 11009 + caddc 11012 +∞cpnf 11146 -∞cmnf 11147 ℝ^*cxr 11148 < clt 11149 ≤ cle 11150 -cneg 11348 (,)cioo 13248 [,)cico 13250 abscabs 15141 volcvol 25362 MblFncmbf 25513 ∫₂citg2 25515 𝐿¹cibl 25516

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2701 ax-rep 5218 ax-sep 5235 ax-nul 5245 ax-pow 5304 ax-pr 5371 ax-un 7671 ax-inf2 9537 ax-cnex 11065 ax-resscn 11066 ax-1cn 11067 ax-icn 11068 ax-addcl 11069 ax-addrcl 11070 ax-mulcl 11071 ax-mulrcl 11072 ax-mulcom 11073 ax-addass 11074 ax-mulass 11075 ax-distr 11076 ax-i2m1 11077 ax-1ne0 11078 ax-1rid 11079 ax-rnegex 11080 ax-rrecex 11081 ax-cnre 11082 ax-pre-lttri 11083 ax-pre-lttrn 11084 ax-pre-ltadd 11085 ax-pre-mulgt0 11086 ax-pre-sup 11087 ax-addf 11088

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3343 df-reu 3344 df-rab 3395 df-v 3438 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-pss 3923 df-nul 4285 df-if 4477 df-pw 4553 df-sn 4578 df-pr 4580 df-op 4584 df-uni 4859 df-int 4897 df-iun 4943 df-disj 5060 df-br 5093 df-opab 5155 df-mpt 5174 df-tr 5200 df-id 5514 df-eprel 5519 df-po 5527 df-so 5528 df-fr 5572 df-se 5573 df-we 5574 df-xp 5625 df-rel 5626 df-cnv 5627 df-co 5628 df-dm 5629 df-rn 5630 df-res 5631 df-ima 5632 df-pred 6249 df-ord 6310 df-on 6311 df-lim 6312 df-suc 6313 df-iota 6438 df-fun 6484 df-fn 6485 df-f 6486 df-f1 6487 df-fo 6488 df-f1o 6489 df-fv 6490 df-isom 6491 df-riota 7306 df-ov 7352 df-oprab 7353 df-mpo 7354 df-of 7613 df-ofr 7614 df-om 7800 df-1st 7924 df-2nd 7925 df-frecs 8214 df-wrecs 8245 df-recs 8294 df-rdg 8332 df-1o 8388 df-2o 8389 df-er 8625 df-map 8755 df-pm 8756 df-en 8873 df-dom 8874 df-sdom 8875 df-fin 8876 df-fi 9301 df-sup 9332 df-inf 9333 df-oi 9402 df-dju 9797 df-card 9835 df-pnf 11151 df-mnf 11152 df-xr 11153 df-ltxr 11154 df-le 11155 df-sub 11349 df-neg 11350 df-div 11778 df-nn 12129 df-2 12191 df-3 12192 df-n0 12385 df-z 12472 df-uz 12736 df-q 12850 df-rp 12894 df-xneg 13014 df-xadd 13015 df-xmul 13016 df-ioo 13252 df-ico 13254 df-icc 13255 df-fz 13411 df-fzo 13558 df-fl 13696 df-seq 13909 df-exp 13969 df-hash 14238 df-cj 15006 df-re 15007 df-im 15008 df-sqrt 15142 df-abs 15143 df-clim 15395 df-sum 15594 df-rest 17326 df-topgen 17347 df-psmet 21253 df-xmet 21254 df-met 21255 df-bl 21256 df-mopn 21257 df-top 22779 df-topon 22796 df-bases 22831 df-cmp 23272 df-ovol 25363 df-vol 25364 df-mbf 25518 df-itg1 25519 df-itg2 25520 df-ibl 25521 df-0p 25569

This theorem is referenced by: iblabsnc 37684 iblmulc2nc 37685

W3C validator