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 38497

Description: Lemma for iblabsnc 38498; cf. iblabslem 26087. (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 26050	. . . . . . . 8 ⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ 𝐿¹ ↔ ((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) ∈ ℝ ∧ (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) ∈ ℝ)))
5	2, 4	mpbid 235	. . . . . . 7 ⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) ∈ ℝ ∧ (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) ∈ ℝ))
6	5	simp1d 1160	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn)
7	6, 3	mbfdm2 25897	. . . . 5 ⊢ (𝜑 → 𝐴 ∈ dom vol)
8		mblss 25791	. . . . 5 ⊢ (𝐴 ∈ dom vol → 𝐴 ⊆ ℝ)
9	7, 8	syl 18	. . . 4 ⊢ (𝜑 → 𝐴 ⊆ ℝ)
10		rembl 25800	. . . . 5 ⊢ ℝ ∈ dom vol
11	10	a1i 11	. . . 4 ⊢ (𝜑 → ℝ ∈ dom vol)
12	3	recnd 11286	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝐵) ∈ ℂ)
13	12	abscld 15551	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (abs‘(𝐹‘𝐵)) ∈ ℝ)
14		0re 11259	. . . . 5 ⊢ 0 ∈ ℝ
15		ifcl 4528	. . . . 5 ⊢ (((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 0 ∈ ℝ) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) ∈ ℝ)
16	13, 14, 15	sylancl 598	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) ∈ ℝ)
17		eldifn 4079	. . . . . 6 ⊢ (𝑥 ∈ (ℝ ∖ 𝐴) → ¬ 𝑥 ∈ 𝐴)
18	17	adantl 487	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℝ ∖ 𝐴)) → ¬ 𝑥 ∈ 𝐴)
19		iffalse 4491	. . . . 5 ⊢ (¬ 𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = 0)
20	18, 19	syl 18	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℝ ∖ 𝐴)) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = 0)
21		iftrue 4488	. . . . . 6 ⊢ (𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = (abs‘(𝐹‘𝐵)))
22	21	mpteq2ia 5200	. . . . 5 ⊢ (𝑥 ∈ 𝐴 ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)) = (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵)))
23	13	fmpttd 7111	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))):𝐴⟶ℝ)
24	13	adantlr 728	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (abs‘(𝐹‘𝐵)) ∈ ℝ)
25	24	biantrurd 542	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (abs‘(𝐹‘𝐵)) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 𝑦 < (abs‘(𝐹‘𝐵)))))
26	3	adantlr 728	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝐹‘𝐵) ∈ ℝ)
27		simplr 781	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → 𝑦 ∈ ℝ)
28	26, 27	absled 15545	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ≤ 𝑦 ↔ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦)))
29	28	notbid 321	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (¬ (abs‘(𝐹‘𝐵)) ≤ 𝑦 ↔ ¬ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦)))
30	27, 24	ltnled 11406	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (abs‘(𝐹‘𝐵)) ↔ ¬ (abs‘(𝐹‘𝐵)) ≤ 𝑦))
31		renegcl 11570	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ ℝ → -𝑦 ∈ ℝ)
32	31	rexrd 11308	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ → -𝑦 ∈ ℝ^*)
33	32	ad2antlr 740	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → -𝑦 ∈ ℝ^*)
34		elioomnf 13522	. . . . . . . . . . . . . . 15 ⊢ (-𝑦 ∈ ℝ^* → ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (𝐹‘𝐵) < -𝑦)))
35	33, 34	syl 18	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (𝐹‘𝐵) < -𝑦)))
36	26	biantrurd 542	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) < -𝑦 ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (𝐹‘𝐵) < -𝑦)))
37	27	renegcld 11690	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → -𝑦 ∈ ℝ)
38	26, 37	ltnled 11406	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) < -𝑦 ↔ ¬ -𝑦 ≤ (𝐹‘𝐵)))
39	35, 36, 38	3bitr2d 310	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ↔ ¬ -𝑦 ≤ (𝐹‘𝐵)))
40		rexr 11304	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 ∈ ℝ → 𝑦 ∈ ℝ^*)
41	40	ad2antlr 740	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → 𝑦 ∈ ℝ^*)
42		elioopnf 13521	. . . . . . . . . . . . . . 15 ⊢ (𝑦 ∈ ℝ^* → ((𝐹‘𝐵) ∈ (𝑦(,)+∞) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 𝑦 < (𝐹‘𝐵))))
43	41, 42	syl 18	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (𝑦(,)+∞) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 𝑦 < (𝐹‘𝐵))))
44	26	biantrurd 542	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (𝐹‘𝐵) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ 𝑦 < (𝐹‘𝐵))))
45	27, 26	ltnled 11406	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (𝑦 < (𝐹‘𝐵) ↔ ¬ (𝐹‘𝐵) ≤ 𝑦))
46	43, 44, 45	3bitr2d 310	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (𝑦(,)+∞) ↔ ¬ (𝐹‘𝐵) ≤ 𝑦))
47	39, 46	orbi12d 932	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞)) ↔ (¬ -𝑦 ≤ (𝐹‘𝐵) ∨ ¬ (𝐹‘𝐵) ≤ 𝑦)))
48		ianor 997	. . . . . . . . . . . 12 ⊢ (¬ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦) ↔ (¬ -𝑦 ≤ (𝐹‘𝐵) ∨ ¬ (𝐹‘𝐵) ≤ 𝑦))
49	47, 48	bitr4di 292	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞)) ↔ ¬ (-𝑦 ≤ (𝐹‘𝐵) ∧ (𝐹‘𝐵) ≤ 𝑦)))
50	29, 30, 49	3bitr4rd 315	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → (((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞)) ↔ 𝑦 < (abs‘(𝐹‘𝐵))))
51		elioopnf 13521	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ^* → ((abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 𝑦 < (abs‘(𝐹‘𝐵)))))
52	41, 51	syl 18	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ 𝑦 < (abs‘(𝐹‘𝐵)))))
53	25, 50, 52	3bitr4rd 315	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞) ↔ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))))
54	53	rabbidva 3418	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞)} = {𝑥 ∈ 𝐴 ∣ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))})
55		eqid 2760	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) = (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵)))
56	55	mptpreima 6236	. . . . . . . 8 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (𝑦(,)+∞)) = {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (𝑦(,)+∞)}
57		eqid 2760	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) = (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵))
58	57	mptpreima 6236	. . . . . . . . . 10 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-∞(,)-𝑦)}
59	57	mptpreima 6236	. . . . . . . . . 10 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞)) = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (𝑦(,)+∞)}
60	58, 59	uneq12i 4113	. . . . . . . . 9 ⊢ ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) = ({𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-∞(,)-𝑦)} ∪ {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (𝑦(,)+∞)})
61		unrab 4261	. . . . . . . . 9 ⊢ ({𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-∞(,)-𝑦)} ∪ {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (𝑦(,)+∞)}) = {𝑥 ∈ 𝐴 ∣ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))}
62	60, 61	eqtri 2783	. . . . . . . 8 ⊢ ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) = {𝑥 ∈ 𝐴 ∣ ((𝐹‘𝐵) ∈ (-∞(,)-𝑦) ∨ (𝐹‘𝐵) ∈ (𝑦(,)+∞))}
63	54, 56, 62	3eqtr4g 2820	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (𝑦(,)+∞)) = ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))))
64		iblmbf 26027	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ 𝐿¹ → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn)
65	2, 64	syl 18	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn)
66	3	fmpttd 7111	. . . . . . . . 9 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ)
67		mbfima 25890	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∈ dom vol)
68		mbfima 25890	. . . . . . . . . 10 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞)) ∈ dom vol)
69		unmbl 25797	. . . . . . . . . 10 ⊢ (((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∈ dom vol ∧ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞)) ∈ dom vol) → ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) ∈ dom vol)
70	67, 68, 69	syl2anc 596	. . . . . . . . 9 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) ∈ dom vol)
71	65, 66, 70	syl2anc 596	. . . . . . . 8 ⊢ (𝜑 → ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) ∈ dom vol)
72	71	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → ((^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-∞(,)-𝑦)) ∪ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (𝑦(,)+∞))) ∈ dom vol)
73	63, 72	eqeltrd 2860	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (𝑦(,)+∞)) ∈ dom vol)
74		elioomnf 13522	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ ℝ^* → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ (abs‘(𝐹‘𝐵)) < 𝑦)))
75	41, 74	syl 18	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ (abs‘(𝐹‘𝐵)) < 𝑦)))
76	24	biantrurd 542	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) < 𝑦 ↔ ((abs‘(𝐹‘𝐵)) ∈ ℝ ∧ (abs‘(𝐹‘𝐵)) < 𝑦)))
77	26, 27	absltd 15544	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) < 𝑦 ↔ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
78	75, 76, 77	3bitr2d 310	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
79	26	biantrurd 542	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦))))
80	78, 79	bitrd 282	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦))))
81		3anass 1111	. . . . . . . . . . 11 ⊢ (((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ (-𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
82	80, 81	bitr4di 292	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
83		elioo2 13464	. . . . . . . . . . . 12 ⊢ ((-𝑦 ∈ ℝ^* ∧ 𝑦 ∈ ℝ^*) → ((𝐹‘𝐵) ∈ (-𝑦(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
84	32, 40, 83	syl2anc 596	. . . . . . . . . . 11 ⊢ (𝑦 ∈ ℝ → ((𝐹‘𝐵) ∈ (-𝑦(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
85	84	ad2antlr 740	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((𝐹‘𝐵) ∈ (-𝑦(,)𝑦) ↔ ((𝐹‘𝐵) ∈ ℝ ∧ -𝑦 < (𝐹‘𝐵) ∧ (𝐹‘𝐵) < 𝑦)))
86	82, 85	bitr4d 285	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑥 ∈ 𝐴) → ((abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦) ↔ (𝐹‘𝐵) ∈ (-𝑦(,)𝑦)))
87	86	rabbidva 3418	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦)} = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-𝑦(,)𝑦)})
88	55	mptpreima 6236	. . . . . . . 8 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (-∞(,)𝑦)) = {𝑥 ∈ 𝐴 ∣ (abs‘(𝐹‘𝐵)) ∈ (-∞(,)𝑦)}
89	57	mptpreima 6236	. . . . . . . 8 ⊢ (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)) = {𝑥 ∈ 𝐴 ∣ (𝐹‘𝐵) ∈ (-𝑦(,)𝑦)}
90	87, 88, 89	3eqtr4g 2820	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (-∞(,)𝑦)) = (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)))
91		mbfima 25890	. . . . . . . . 9 ⊢ (((𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) ∈ MblFn ∧ (𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)):𝐴⟶ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)) ∈ dom vol)
92	65, 66, 91	syl2anc 596	. . . . . . . 8 ⊢ (𝜑 → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)) ∈ dom vol)
93	92	adantr 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (𝐹‘𝐵)) “ (-𝑦(,)𝑦)) ∈ dom vol)
94	90, 93	eqeltrd 2860	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (^◡(𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) “ (-∞(,)𝑦)) ∈ dom vol)
95	23, 7, 73, 94	ismbf2d 25900	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (abs‘(𝐹‘𝐵))) ∈ MblFn)
96	22, 95	eqeltrid 2864	. . . 4 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)) ∈ MblFn)
97	9, 11, 16, 20, 96	mbfss 25906	. . 3 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)) ∈ MblFn)
98	1, 97	eqeltrid 2864	. 2 ⊢ (𝜑 → 𝐺 ∈ MblFn)
99		reex 11240	. . . . . . . . 9 ⊢ ℝ ∈ V
100	99	a1i 11	. . . . . . . 8 ⊢ (𝜑 → ℝ ∈ V)
101		ifan 4536	. . . . . . . . . 10 ⊢ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) = if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0)
102		ifcl 4528	. . . . . . . . . . . . 13 ⊢ (((𝐹‘𝐵) ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ ℝ)
103	3, 14, 102	sylancl 598	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ ℝ)
104		max1 13262	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ (𝐹‘𝐵) ∈ ℝ) → 0 ≤ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
105	14, 3, 104	sylancr 599	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 0 ≤ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
106		elrege0 13532	. . . . . . . . . . . 12 ⊢ (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ (0[,)+∞) ↔ (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0)))
107	103, 105, 106	sylanbrc 595	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) ∈ (0[,)+∞))
108		0e0icopnf 13536	. . . . . . . . . . . 12 ⊢ 0 ∈ (0[,)+∞)
109	108	a1i 11	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝑥 ∈ 𝐴) → 0 ∈ (0[,)+∞))
110	107, 109	ifclda 4518	. . . . . . . . . 10 ⊢ (𝜑 → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) ∈ (0[,)+∞))
111	101, 110	eqeltrid 2864	. . . . . . . . 9 ⊢ (𝜑 → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) ∈ (0[,)+∞))
112	111	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) ∈ (0[,)+∞))
113		ifan 4536	. . . . . . . . . 10 ⊢ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0) = if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)
114	3	renegcld 11690	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -(𝐹‘𝐵) ∈ ℝ)
115		ifcl 4528	. . . . . . . . . . . . 13 ⊢ ((-(𝐹‘𝐵) ∈ ℝ ∧ 0 ∈ ℝ) → if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ ℝ)
116	114, 14, 115	sylancl 598	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ ℝ)
117		max1 13262	. . . . . . . . . . . . 13 ⊢ ((0 ∈ ℝ ∧ -(𝐹‘𝐵) ∈ ℝ) → 0 ≤ if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
118	14, 114, 117	sylancr 599	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 0 ≤ if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
119		elrege0 13532	. . . . . . . . . . . 12 ⊢ (if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ (0[,)+∞) ↔ (if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ ℝ ∧ 0 ≤ if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)))
120	116, 118, 119	sylanbrc 595	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0) ∈ (0[,)+∞))
121	120, 109	ifclda 4518	. . . . . . . . . 10 ⊢ (𝜑 → if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0) ∈ (0[,)+∞))
122	113, 121	eqeltrid 2864	. . . . . . . . 9 ⊢ (𝜑 → if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0) ∈ (0[,)+∞))
123	122	adantr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0) ∈ (0[,)+∞))
124		eqidd 2761	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) = (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)))
125		eqidd 2761	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)) = (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))
126	100, 112, 123, 124, 125	offval2 7704	. . . . . . 7 ⊢ (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) = (𝑥 ∈ ℝ ↦ (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))))
127	101, 113	oveq12i 7428	. . . . . . . . 9 ⊢ (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)) = (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0))
128		max0add 15422	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝐵) ∈ ℝ → (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) + if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)) = (abs‘(𝐹‘𝐵)))
129	3, 128	syl 18	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) + if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)) = (abs‘(𝐹‘𝐵)))
130		iftrue 4488	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) = if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
131	130	adantl 487	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) = if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0))
132		iftrue 4488	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0) = if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
133	132	adantl 487	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0) = if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0))
134	131, 133	oveq12d 7434	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = (if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) + if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0)))
135	21	adantl 487	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0) = (abs‘(𝐹‘𝐵)))
136	129, 134, 135	3eqtr4d 2805	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
137	136	ex 418	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 ∈ 𝐴 → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)))
138		00id 11434	. . . . . . . . . . 11 ⊢ (0 + 0) = 0
139		iffalse 4491	. . . . . . . . . . . 12 ⊢ (¬ 𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) = 0)
140		iffalse 4491	. . . . . . . . . . . 12 ⊢ (¬ 𝑥 ∈ 𝐴 → if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0) = 0)
141	139, 140	oveq12d 7434	. . . . . . . . . . 11 ⊢ (¬ 𝑥 ∈ 𝐴 → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = (0 + 0))
142	138, 141, 19	3eqtr4a 2821	. . . . . . . . . 10 ⊢ (¬ 𝑥 ∈ 𝐴 → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
143	137, 142	pm2.61d1 182	. . . . . . . . 9 ⊢ (𝜑 → (if(𝑥 ∈ 𝐴, if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0), 0) + if(𝑥 ∈ 𝐴, if(0 ≤ -(𝐹‘𝐵), -(𝐹‘𝐵), 0), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
144	127, 143	eqtrid 2807	. . . . . . . 8 ⊢ (𝜑 → (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)) = if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0))
145	144	mpteq2dv 5199	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ (if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) + if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)))
146	126, 145	eqtrd 2795	. . . . . 6 ⊢ (𝜑 → ((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) = (𝑥 ∈ ℝ ↦ if(𝑥 ∈ 𝐴, (abs‘(𝐹‘𝐵)), 0)))
147	1, 146	eqtr4id 2814	. . . . 5 ⊢ (𝜑 → 𝐺 = ((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))))
148	147	fveq2d 6885	. . . 4 ⊢ (𝜑 → (∫₂‘𝐺) = (∫₂‘((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))))
149	111	adantr 486	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) ∈ (0[,)+∞))
150	101, 139	eqtrid 2807	. . . . . . 7 ⊢ (¬ 𝑥 ∈ 𝐴 → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) = 0)
151	18, 150	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (ℝ ∖ 𝐴)) → if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0) = 0)
152		ibar 538	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝐴 → (0 ≤ (𝐹‘𝐵) ↔ (𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵))))
153	152	ifbid 4506	. . . . . . . 8 ⊢ (𝑥 ∈ 𝐴 → if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0) = if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))
154	153	mpteq2ia 5200	. . . . . . 7 ⊢ (𝑥 ∈ 𝐴 ↦ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0)) = (𝑥 ∈ 𝐴 ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))
155	3, 6	mbfpos 25911	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ if(0 ≤ (𝐹‘𝐵), (𝐹‘𝐵), 0)) ∈ MblFn)
156	154, 155	eqeltrrid 2865	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∈ MblFn)
157	9, 11, 149, 151, 156	mbfss 25906	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∈ MblFn)
158	112	fmpttd 7111	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)):ℝ⟶(0[,)+∞))
159	5	simp2d 1161	. . . . 5 ⊢ (𝜑 → (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) ∈ ℝ)
160	123	fmpttd 7111	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)):ℝ⟶(0[,)+∞))
161	5	simp3d 1162	. . . . 5 ⊢ (𝜑 → (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0))) ∈ ℝ)
162	157, 158, 159, 160, 161	itg2addnc 38488	. . . 4 ⊢ (𝜑 → (∫₂‘((𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0)) ∘_f + (𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))) = ((∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) + (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))))
163	148, 162	eqtrd 2795	. . 3 ⊢ (𝜑 → (∫₂‘𝐺) = ((∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) + (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))))
164	159, 161	readdcld 11287	. . 3 ⊢ (𝜑 → ((∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ (𝐹‘𝐵)), (𝐹‘𝐵), 0))) + (∫₂‘(𝑥 ∈ ℝ ↦ if((𝑥 ∈ 𝐴 ∧ 0 ≤ -(𝐹‘𝐵)), -(𝐹‘𝐵), 0)))) ∈ ℝ)
165	163, 164	eqeltrd 2860	. 2 ⊢ (𝜑 → (∫₂‘𝐺) ∈ ℝ)
166	98, 165	jca 521	1 ⊢ (𝜑 → (𝐺 ∈ MblFn ∧ (∫₂‘𝐺) ∈ ℝ))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 ∧ w3a 1103 = wceq 1570 ∈ wcel 2145 {crab 3412 Vcvv 3450 ∖ cdif 3896 ∪ cun 3897 ⊆ wss 3899 ifcif 4482 class class class wbr 5103 ↦ cmpt 5186 ^◡ccnv 5654 dom cdm 5655 “ cima 5658 ⟶wf 6531 ‘cfv 6535 (class class class)co 7416 ∘_f cof 7682 ℝcr 11148 0cc0 11149 + caddc 11152 +∞cpnf 11289 -∞cmnf 11290 ℝ^*cxr 11291 < clt 11292 ≤ cle 11293 -cneg 11491 (,)cioo 13423 [,)cico 13425 abscabs 15346 volcvol 25723 MblFncmbf 25874 ∫₂citg2 25876 𝐿¹cibl 25877

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2732 ax-rep 5232 ax-sep 5251 ax-nul 5263 ax-pow 5330 ax-pr 5398 ax-un 7742 ax-inf2 9627 ax-cnex 11205 ax-resscn 11206 ax-1cn 11207 ax-icn 11208 ax-addcl 11209 ax-addrcl 11210 ax-mulcl 11211 ax-mulrcl 11212 ax-mulcom 11213 ax-addass 11214 ax-mulass 11215 ax-distr 11216 ax-i2m1 11217 ax-1ne0 11218 ax-1rid 11219 ax-rnegex 11220 ax-rrecex 11221 ax-cnre 11222 ax-pre-lttri 11223 ax-pre-lttrn 11224 ax-pre-ltadd 11225 ax-pre-mulgt0 11226 ax-pre-sup 11227 ax-addf 11228

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-disj 5071 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5550 df-eprel 5555 df-po 5563 df-so 5564 df-fr 5608 df-se 5609 df-we 5610 df-xp 5661 df-rel 5662 df-cnv 5663 df-co 5664 df-dm 5665 df-rn 5666 df-res 5667 df-ima 5668 df-pred 6301 df-ord 6362 df-on 6363 df-lim 6364 df-suc 6365 df-iota 6491 df-fun 6537 df-fn 6538 df-f 6539 df-f1 6540 df-fo 6541 df-f1o 6542 df-fv 6543 df-isom 6544 df-riota 7373 df-ov 7419 df-oprab 7420 df-mpo 7421 df-of 7684 df-ofr 7685 df-om 7869 df-1st 7992 df-2nd 7993 df-frecs 8285 df-wrecs 8316 df-recs 8365 df-rdg 8404 df-1o 8462 df-2o 8463 df-er 8703 df-map 8835 df-pm 8836 df-en 8960 df-dom 8961 df-sdom 8962 df-fin 8963 df-fi 9388 df-sup 9419 df-inf 9420 df-oi 9489 df-dju 9931 df-card 9969 df-pnf 11294 df-mnf 11295 df-xr 11296 df-ltxr 11297 df-le 11298 df-sub 11492 df-neg 11493 df-div 11921 df-nn 12283 df-2 12352 df-3 12353 df-n0 12554 df-z 12641 df-uz 12913 df-q 13023 df-rp 13068 df-xneg 13188 df-xadd 13189 df-xmul 13190 df-ioo 13427 df-ico 13429 df-icc 13430 df-fz 13587 df-fzo 13735 df-fl 13878 df-seq 14091 df-exp 14151 df-hash 14420 df-cj 15211 df-re 15212 df-im 15213 df-sqrt 15347 df-abs 15348 df-clim 15600 df-sum 15799 df-rest 17532 df-topgen 17553 df-psmet 21609 df-xmet 21610 df-met 21611 df-bl 21612 df-mopn 21613 df-top 23151 df-topon 23168 df-bases 23203 df-cmp 23644 df-ovol 25724 df-vol 25725 df-mbf 25879 df-itg1 25880 df-itg2 25881 df-ibl 25882 df-0p 25930

This theorem is used by: iblabsnc 38498 iblmulc2nc 38499

W3C validator