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 37680

Description: Lemma for iblabsnc 37681; cf. iblabslem 25710. (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 25673	. . . . . . . 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 25519	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ dom vol)
8		mblss 25413	. . . . 5 ⊢ (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
9	7, 8	syl 17	. . . 4 ⊢ (𝜑 → 𝐴 ⊆ ℝ)
10		rembl 25422	. . . . 5 ⊢ ℝ ∈ dom vol
11	10	a1i 11	. . . 4 ⊢ (𝜑 → ℝ ∈ dom vol)
12	3	recnd 11131	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝐵) ∈ ℂ)
13	12	abscld 15333	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (abs‘(𝐹‘𝐵)) ∈ ℝ)
14		0re 11105	. . . . 5 ⊢ 0 ∈ ℝ
15		ifcl 4518	. . . . 5 ⊢ (((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 0 ∈ ℝ) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) ∈ ℝ)
16	13, 14, 15	sylancl 586	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) ∈ ℝ)
17		eldifn 4079	. . . . . 6 ⊢ (𝑥 ∈ (ℝ ∖ 𝐴) → ¬ 𝑥 ∈ 𝐴)
18	17	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ 𝑥 ∈ 𝐴)
19		iffalse 4481	. . . . 5 ⊢ (¬ 𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = 0)
20	18, 19	syl 17	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℝ ∖ 𝐴)) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = 0)
21		iftrue 4478	. . . . . 6 ⊢ (𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = (abs‘(𝐹‘𝐵)))
22	21	mpteq2ia 5183	. . . . 5 ⊢ (𝑥 ∈ 𝐴 ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)) = (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵)))
23	13	fmpttd 7042	. . . . . 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 15327	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ≤ 𝑦 ↔ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦)))
29	28	notbid 318	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (¬ (abs‘(𝐹‘𝐵)) ≤ 𝑦 ↔ ¬ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦)))
30	27, 24	ltnled 11251	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (abs‘(𝐹‘𝐵)) ↔ ¬ (abs‘(𝐹‘𝐵)) ≤ 𝑦))
31		renegcl 11415	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ → -𝑦 ∈ ℝ)
32	31	rexrd 11153	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ → -𝑦 ∈ ℝ^*)
33	32	ad2antlr 727	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → -𝑦 ∈ ℝ^*)
34		elioomnf 13335	. . . . . . . . . . . . . . 15 ⊢ (-𝑦 ∈ ℝ^* → ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (𝐹‘𝐵) < -𝑦)))
35	33, 34	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (𝐹‘𝐵) < -𝑦)))
36	26	biantrurd 532	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) < -𝑦 ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (𝐹‘𝐵) < -𝑦)))
37	27	renegcld 11535	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → -𝑦 ∈ ℝ)
38	26, 37	ltnled 11251	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) < -𝑦 ↔ ¬ -𝑦 ≤ (𝐹‘𝐵)))
39	35, 36, 38	3bitr2d 307	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ↔ ¬ -𝑦 ≤ (𝐹‘𝐵)))
40		rexr 11149	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ℝ^*)
41	40	ad2antlr 727	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → 𝑦 ∈ ℝ^*)
42		elioopnf 13334	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℝ^* → ((𝐹‘𝐵) ∈ (𝑦(,)+∞) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 𝑦 < (𝐹‘𝐵))))
43	41, 42	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (𝑦(,)+∞) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 𝑦 < (𝐹‘𝐵))))
44	26	biantrurd 532	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (𝐹‘𝐵) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 𝑦 < (𝐹‘𝐵))))
45	27, 26	ltnled 11251	. . . . . . . . . . . . . 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 13334	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ^* → ((abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 𝑦 < (abs‘(𝐹‘𝐵)))))
52	41, 51	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 𝑦 < (abs‘(𝐹‘𝐵)))))
53	25, 50, 52	3bitr4rd 312	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞) ↔ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))))
54	53	rabbidva 3398	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞)} = {𝑥 ∈ 𝐴 ∣ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))})
55		eqid 2729	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) = (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵)))
56	55	mptpreima 6181	. . . . . . . 8 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (𝑦(,)+∞)) = {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞)}
57		eqid 2729	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) = (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵))
58	57	mptpreima 6181	. . . . . . . . . 10 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-∞(,)-𝑦)}
59	57	mptpreima 6181	. . . . . . . . . 10 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞)) = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (𝑦(,)+∞)}
60	58, 59	uneq12i 4113	. . . . . . . . 9 ⊢ ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) = ({𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-∞(,)-𝑦)} ∪ {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (𝑦(,)+∞)})
61		unrab 4262	. . . . . . . . 9 ⊢ ({𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-∞(,)-𝑦)} ∪ {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (𝑦(,)+∞)}) = {𝑥 ∈ 𝐴 ∣ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))}
62	60, 61	eqtri 2752	. . . . . . . 8 ⊢ ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) = {𝑥 ∈ 𝐴 ∣ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))}
63	54, 56, 62	3eqtr4g 2789	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (𝑦(,)+∞)) = ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))))
64		iblmbf 25649	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ 𝐿¹ → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn)
65	2, 64	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn)
66	3	fmpttd 7042	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ)
67		mbfima 25512	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∈ dom vol)
68		mbfima 25512	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞)) ∈ dom vol)
69		unmbl 25419	. . . . . . . . . 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 13335	. . . . . . . . . . . . . 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 15326	. . . . . . . . . . . . 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 13277	. . . . . . . . . . . 12 ⊢ ((-𝑦 ∈ ℝ^* ∧ 𝑦 ∈ ℝ^*) → ((𝐹‘𝐵) ∈ (-𝑦(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
84	32, 40, 83	syl2anc 584	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ → ((𝐹‘𝐵) ∈ (-𝑦(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
85	84	ad2antlr 727	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (-𝑦(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
86	82, 85	bitr4d 282	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ (𝐹‘𝐵) ∈ (-𝑦(,)𝑦)))
87	86	rabbidva 3398	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦)} = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-𝑦(,)𝑦)})
88	55	mptpreima 6181	. . . . . . . 8 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (-∞(,)𝑦)) = {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦)}
89	57	mptpreima 6181	. . . . . . . 8 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)) = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-𝑦(,)𝑦)}
90	87, 88, 89	3eqtr4g 2789	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (-∞(,)𝑦)) = (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)))
91		mbfima 25512	. . . . . . . . 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 25522	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) ∈ MblFn)
96	22, 95	eqeltrid 2832	. . . 4 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)) ∈ MblFn)
97	9, 11, 16, 20, 96	mbfss 25528	. . 3 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)) ∈ MblFn)
98	1, 97	eqeltrid 2832	. 2 ⊢ (𝜑 → 𝐺 ∈ MblFn)
99		reex 11088	. . . . . . . . 9 ⊢ ℝ ∈ V
100	99	a1i 11	. . . . . . . 8 ⊢ (𝜑 → ℝ ∈ V)
101		ifan 4526	. . . . . . . . . 10 ⊢ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) = if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0)
102		ifcl 4518	. . . . . . . . . . . . 13 ⊢ (((𝐹‘𝐵) ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ ℝ)
103	3, 14, 102	sylancl 586	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ ℝ)
104		max1 13075	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ (𝐹‘𝐵) ∈ ℝ) → 0 ≤ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
105	14, 3, 104	sylancr 587	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 0 ≤ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
106		elrege0 13345	. . . . . . . . . . . 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 13349	. . . . . . . . . . . 12 ⊢ 0 ∈ (0[,)+∞)
109	108	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝑥 ∈ 𝐴) → 0 ∈ (0[,)+∞))
110	107, 109	ifclda 4508	. . . . . . . . . 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 4526	. . . . . . . . . 10 ⊢ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0) = if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)
114	3	renegcld 11535	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -(𝐹‘𝐵) ∈ ℝ)
115		ifcl 4518	. . . . . . . . . . . . 13 ⊢ ((-(𝐹‘𝐵) ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ ℝ)
116	114, 14, 115	sylancl 586	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ ℝ)
117		max1 13075	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ -(𝐹‘𝐵) ∈ ℝ) → 0 ≤ if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
118	14, 114, 117	sylancr 587	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 0 ≤ if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
119		elrege0 13345	. . . . . . . . . . . 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 4508	. . . . . . . . . 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 7624	. . . . . . 7 ⊢ (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) = (𝑥 ∈ ℝ ↦ (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))))
127	101, 113	oveq12i 7352	. . . . . . . . 9 ⊢ (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)) = (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0))
128		max0add 15204	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝐵) ∈ ℝ → (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) + if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)) = (abs‘(𝐹‘𝐵)))
129	3, 128	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) + if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)) = (abs‘(𝐹‘𝐵)))
130		iftrue 4478	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) = if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
131	130	adantl 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) = if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
132		iftrue 4478	. . . . . . . . . . . . . 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 7358	. . . . . . . . . . . 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 11279	. . . . . . . . . . 11 ⊢ (0 + 0) = 0
139		iffalse 4481	. . . . . . . . . . . 12 ⊢ (¬ 𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) = 0)
140		iffalse 4481	. . . . . . . . . . . 12 ⊢ (¬ 𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0) = 0)
141	139, 140	oveq12d 7358	. . . . . . . . . . 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 5182	. . . . . . 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 6820	. . . 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 4496	. . . . . . . 8 ⊢ (𝑥 ∈ 𝐴 → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) = if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))
154	153	mpteq2ia 5183	. . . . . . 7 ⊢ (𝑥 ∈ 𝐴 ↦ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0)) = (𝑥 ∈ 𝐴 ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))
155	3, 6	mbfpos 25533	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0)) ∈ MblFn)
156	154, 155	eqeltrrid 2833	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∈ MblFn)
157	9, 11, 149, 151, 156	mbfss 25528	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∈ MblFn)
158	112	fmpttd 7042	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)):ℝ⟶(0[,)+∞))
159	5	simp2d 1143	. . . . 5 ⊢ (𝜑 → (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) ∈ ℝ)
160	123	fmpttd 7042	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)):ℝ⟶(0[,)+∞))
161	5	simp3d 1144	. . . . 5 ⊢ (𝜑 → (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) ∈ ℝ)
162	157, 158, 159, 160, 161	itg2addnc 37671	. . . 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 11132	. . 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 3392 Vcvv 3433 ∖ cdif 3896 ∪ cun 3897 ⊆ wss 3899 ifcif 4472 class class class wbr 5088 ↦ cmpt 5169 ^◡ccnv 5612 dom cdm 5613 “ cima 5616 ⟶wf 6472 ‘cfv 6476 (class class class)co 7340 ∘_f cof 7602 ℝcr 10996 0cc0 10997 + caddc 11000 +∞cpnf 11134 -∞cmnf 11135 ℝ^*cxr 11136 < clt 11137 ≤ cle 11138 -cneg 11336 (,)cioo 13236 [,)cico 13238 abscabs 15128 volcvol 25345 MblFncmbf 25496 ∫₂citg2 25498 𝐿¹cibl 25499

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 5214 ax-sep 5231 ax-nul 5241 ax-pow 5300 ax-pr 5367 ax-un 7662 ax-inf2 9525 ax-cnex 11053 ax-resscn 11054 ax-1cn 11055 ax-icn 11056 ax-addcl 11057 ax-addrcl 11058 ax-mulcl 11059 ax-mulrcl 11060 ax-mulcom 11061 ax-addass 11062 ax-mulass 11063 ax-distr 11064 ax-i2m1 11065 ax-1ne0 11066 ax-1rid 11067 ax-rnegex 11068 ax-rrecex 11069 ax-cnre 11070 ax-pre-lttri 11071 ax-pre-lttrn 11072 ax-pre-ltadd 11073 ax-pre-mulgt0 11074 ax-pre-sup 11075 ax-addf 11076

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 3393 df-v 3435 df-sbc 3739 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4281 df-if 4473 df-pw 4549 df-sn 4574 df-pr 4576 df-op 4580 df-uni 4857 df-int 4895 df-iun 4940 df-disj 5056 df-br 5089 df-opab 5151 df-mpt 5170 df-tr 5196 df-id 5508 df-eprel 5513 df-po 5521 df-so 5522 df-fr 5566 df-se 5567 df-we 5568 df-xp 5619 df-rel 5620 df-cnv 5621 df-co 5622 df-dm 5623 df-rn 5624 df-res 5625 df-ima 5626 df-pred 6243 df-ord 6304 df-on 6305 df-lim 6306 df-suc 6307 df-iota 6432 df-fun 6478 df-fn 6479 df-f 6480 df-f1 6481 df-fo 6482 df-f1o 6483 df-fv 6484 df-isom 6485 df-riota 7297 df-ov 7343 df-oprab 7344 df-mpo 7345 df-of 7604 df-ofr 7605 df-om 7791 df-1st 7915 df-2nd 7916 df-frecs 8205 df-wrecs 8236 df-recs 8285 df-rdg 8323 df-1o 8379 df-2o 8380 df-er 8616 df-map 8746 df-pm 8747 df-en 8864 df-dom 8865 df-sdom 8866 df-fin 8867 df-fi 9289 df-sup 9320 df-inf 9321 df-oi 9390 df-dju 9785 df-card 9823 df-pnf 11139 df-mnf 11140 df-xr 11141 df-ltxr 11142 df-le 11143 df-sub 11337 df-neg 11338 df-div 11766 df-nn 12117 df-2 12179 df-3 12180 df-n0 12373 df-z 12460 df-uz 12724 df-q 12838 df-rp 12882 df-xneg 13002 df-xadd 13003 df-xmul 13004 df-ioo 13240 df-ico 13242 df-icc 13243 df-fz 13399 df-fzo 13546 df-fl 13684 df-seq 13897 df-exp 13957 df-hash 14226 df-cj 14993 df-re 14994 df-im 14995 df-sqrt 15129 df-abs 15130 df-clim 15382 df-sum 15581 df-rest 17313 df-topgen 17334 df-psmet 21237 df-xmet 21238 df-met 21239 df-bl 21240 df-mopn 21241 df-top 22763 df-topon 22780 df-bases 22815 df-cmp 23256 df-ovol 25346 df-vol 25347 df-mbf 25501 df-itg1 25502 df-itg2 25503 df-ibl 25504 df-0p 25552

This theorem is referenced by: iblabsnc 37681 iblmulc2nc 37682

W3C validator