ioombl - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > ioombl		Structured version Visualization version GIF version

Theorem ioombl 25705

Description: An open real interval is measurable. (Contributed by Mario Carneiro, 16-Jun-2014.)

**Assertion**
Ref	Expression
ioombl	⊢ (𝐴(,)𝐵) ∈ dom vol

Proof of Theorem ioombl Dummy variables 𝑥 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		snunioo 13506	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 < 𝐵) → ({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵))
2	1	3expa 1136	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵))
3	2	adantrr 729	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵))
4		lbico1 13428	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 < 𝐵) → 𝐴 ∈ (𝐴[,)𝐵))
5	4	3expa 1136	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → 𝐴 ∈ (𝐴[,)𝐵))
6	5	adantrr 729	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐴 ∈ (𝐴[,)𝐵))
7	6	snssd 4753	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → {𝐴} ⊆ (𝐴[,)𝐵))
8		iccid 13418	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ^* → (𝐴[,]𝐴) = {𝐴})
9	8	ad2antrr 738	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (𝐴[,]𝐴) = {𝐴})
10	9	ineq1d 4173	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ((𝐴[,]𝐴) ∩ (𝐴(,)𝐵)) = ({𝐴} ∩ (𝐴(,)𝐵)))
11		simpll 778	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐴 ∈ ℝ^)
12		simplr 780	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐵 ∈ ℝ^)
13		df-icc 13380	. . . . . . . . . . 11 ⊢ [,] = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 ≤ 𝑦)})
14		df-ioo 13377	. . . . . . . . . . 11 ⊢ (,) = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 < 𝑧 ∧ 𝑧 < 𝑦)})
15		xrltnle 11277	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) → (𝐴 < 𝑤 ↔ ¬ 𝑤 ≤ 𝐴))
16	13, 14, 15	ixxdisj 13388	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → ((𝐴[,]𝐴) ∩ (𝐴(,)𝐵)) = ∅)
17	11, 11, 12, 16	syl3anc 1398	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ((𝐴[,]𝐴) ∩ (𝐴(,)𝐵)) = ∅)
18	10, 17	eqtr3d 2800	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ({𝐴} ∩ (𝐴(,)𝐵)) = ∅)
19		uneqdifeq 4454	. . . . . . . 8 ⊢ (({𝐴} ⊆ (𝐴[,)𝐵) ∧ ({𝐴} ∩ (𝐴(,)𝐵)) = ∅) → (({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵) ↔ ((𝐴[,)𝐵) ∖ {𝐴}) = (𝐴(,)𝐵)))
20	7, 18, 19	syl2anc 595	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵) ↔ ((𝐴[,)𝐵) ∖ {𝐴}) = (𝐴(,)𝐵)))
21	3, 20	mpbid 235	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ((𝐴[,)𝐵) ∖ {𝐴}) = (𝐴(,)𝐵))
22		mnfxr 11267	. . . . . . . . . 10 ⊢ -∞ ∈ ℝ^*
23	22	a1i 11	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → -∞ ∈ ℝ^)
24		simprr 784	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → -∞ < 𝐴)
25		simprl 782	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐴 < 𝐵)
26		xrre2 13197	. . . . . . . . 9 ⊢ (((-∞ ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (-∞ < 𝐴 ∧ 𝐴 < 𝐵)) → 𝐴 ∈ ℝ)
27	23, 11, 12, 24, 25, 26	syl32anc 1405	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐴 ∈ ℝ)
28		icombl 25704	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ^*) → (𝐴[,)𝐵) ∈ dom vol)
29	27, 12, 28	syl2anc 595	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (𝐴[,)𝐵) ∈ dom vol)
30	27	snssd 4753	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → {𝐴} ⊆ ℝ)
31		ovolsn 25635	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ → (vol*‘{𝐴}) = 0)
32	27, 31	syl 18	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (vol‘{𝐴}) = 0)
33		nulmbl 25675	. . . . . . . 8 ⊢ (({𝐴} ⊆ ℝ ∧ (vol*‘{𝐴}) = 0) → {𝐴} ∈ dom vol)
34	30, 32, 33	syl2anc 595	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → {𝐴} ∈ dom vol)
35		difmbl 25683	. . . . . . 7 ⊢ (((𝐴[,)𝐵) ∈ dom vol ∧ {𝐴} ∈ dom vol) → ((𝐴[,)𝐵) ∖ {𝐴}) ∈ dom vol)
36	29, 34, 35	syl2anc 595	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ((𝐴[,)𝐵) ∖ {𝐴}) ∈ dom vol)
37	21, 36	eqeltrrd 2864	. . . . 5 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (𝐴(,)𝐵) ∈ dom vol)
38	37	expr 461	. . . 4 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞ < 𝐴 → (𝐴(,)𝐵) ∈ dom vol))
39		uncom 4113	. . . . . . . . 9 ⊢ ((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = ((-∞(,)𝐵) ∪ (𝐵[,)+∞))
40	22	a1i 11	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ 𝐴 < 𝐵) → -∞ ∈ ℝ^)
41		simplr 780	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ 𝐴 < 𝐵) → 𝐵 ∈ ℝ^)
42		pnfxr 11264	. . . . . . . . . . 11 ⊢ +∞ ∈ ℝ^*
43	42	a1i 11	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ 𝐴 < 𝐵) → +∞ ∈ ℝ^)
44		simpll 778	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ 𝐴 < 𝐵) → 𝐴 ∈ ℝ^)
45		mnfle 13161	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ^* → -∞ ≤ 𝐴)
46	45	ad2antrr 738	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → -∞ ≤ 𝐴)
47		simpr 489	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → 𝐴 < 𝐵)
48	40, 44, 41, 46, 47	xrlelttrd 13186	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → -∞ < 𝐵)
49		pnfge 13156	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ^* → 𝐵 ≤ +∞)
50	41, 49	syl 18	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → 𝐵 ≤ +∞)
51		df-ico 13379	. . . . . . . . . . 11 ⊢ [,) = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 < 𝑦)})
52		xrlenlt 11275	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) → (𝐵 ≤ 𝑤 ↔ ¬ 𝑤 < 𝐵))
53		xrltletr 13183	. . . . . . . . . . 11 ⊢ ((𝑤 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → ((𝑤 < 𝐵 ∧ 𝐵 ≤ +∞) → 𝑤 < +∞))
54		xrltletr 13183	. . . . . . . . . . 11 ⊢ ((-∞ ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) → ((-∞ < 𝐵 ∧ 𝐵 ≤ 𝑤) → -∞ < 𝑤))
55	14, 51, 52, 14, 53, 54	ixxun 13389	. . . . . . . . . 10 ⊢ (((-∞ ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) ∧ (-∞ < 𝐵 ∧ 𝐵 ≤ +∞)) → ((-∞(,)𝐵) ∪ (𝐵[,)+∞)) = (-∞(,)+∞))
56	40, 41, 43, 48, 50, 55	syl32anc 1405	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((-∞(,)𝐵) ∪ (𝐵[,)+∞)) = (-∞(,)+∞))
57	39, 56	eqtrid 2810	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = (-∞(,)+∞))
58		ioomax 13450	. . . . . . . 8 ⊢ (-∞(,)+∞) = ℝ
59	57, 58	eqtrdi 2814	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = ℝ)
60		ssun1 4132	. . . . . . . . 9 ⊢ (𝐵[,)+∞) ⊆ ((𝐵[,)+∞) ∪ (-∞(,)𝐵))
61	60, 59	sseqtrid 3980	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵[,)+∞) ⊆ ℝ)
62		incom 4163	. . . . . . . . 9 ⊢ ((𝐵[,)+∞) ∩ (-∞(,)𝐵)) = ((-∞(,)𝐵) ∩ (𝐵[,)+∞))
63	14, 51, 52	ixxdisj 13388	. . . . . . . . . 10 ⊢ ((-∞ ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → ((-∞(,)𝐵) ∩ (𝐵[,)+∞)) = ∅)
64	40, 41, 43, 63	syl3anc 1398	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((-∞(,)𝐵) ∩ (𝐵[,)+∞)) = ∅)
65	62, 64	eqtrid 2810	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((𝐵[,)+∞) ∩ (-∞(,)𝐵)) = ∅)
66		uneqdifeq 4454	. . . . . . . 8 ⊢ (((𝐵[,)+∞) ⊆ ℝ ∧ ((𝐵[,)+∞) ∩ (-∞(,)𝐵)) = ∅) → (((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = ℝ ↔ (ℝ ∖ (𝐵[,)+∞)) = (-∞(,)𝐵)))
67	61, 65, 66	syl2anc 595	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = ℝ ↔ (ℝ ∖ (𝐵[,)+∞)) = (-∞(,)𝐵)))
68	59, 67	mpbid 235	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (ℝ ∖ (𝐵[,)+∞)) = (-∞(,)𝐵))
69		rembl 25680	. . . . . . 7 ⊢ ℝ ∈ dom vol
70		xrleloe 13170	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → (𝐵 ≤ +∞ ↔ (𝐵 < +∞ ∨ 𝐵 = +∞)))
71	41, 42, 70	sylancl 597	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 ≤ +∞ ↔ (𝐵 < +∞ ∨ 𝐵 = +∞)))
72	50, 71	mpbid 235	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 < +∞ ∨ 𝐵 = +∞))
73		xrre2 13197	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ 𝐵 < +∞)) → 𝐵 ∈ ℝ)
74	73	expr 461	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 < +∞ → 𝐵 ∈ ℝ))
75	42, 74	mp3anl3 1486	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 < +∞ → 𝐵 ∈ ℝ))
76	75	orim1d 981	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((𝐵 < +∞ ∨ 𝐵 = +∞) → (𝐵 ∈ ℝ ∨ 𝐵 = +∞)))
77	72, 76	mpd 16	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 ∈ ℝ ∨ 𝐵 = +∞))
78		icombl1 25703	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ → (𝐵[,)+∞) ∈ dom vol)
79		oveq1 7419	. . . . . . . . . . 11 ⊢ (𝐵 = +∞ → (𝐵[,)+∞) = (+∞[,)+∞))
80		pnfge 13156	. . . . . . . . . . . . 13 ⊢ (+∞ ∈ ℝ^* → +∞ ≤ +∞)
81	42, 80	ax-mp 5	. . . . . . . . . . . 12 ⊢ +∞ ≤ +∞
82		ico0 13419	. . . . . . . . . . . . 13 ⊢ ((+∞ ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → ((+∞[,)+∞) = ∅ ↔ +∞ ≤ +∞))
83	42, 42, 82	mp2an 704	. . . . . . . . . . . 12 ⊢ ((+∞[,)+∞) = ∅ ↔ +∞ ≤ +∞)
84	81, 83	mpbir 234	. . . . . . . . . . 11 ⊢ (+∞[,)+∞) = ∅
85	79, 84	eqtrdi 2814	. . . . . . . . . 10 ⊢ (𝐵 = +∞ → (𝐵[,)+∞) = ∅)
86		0mbl 25679	. . . . . . . . . 10 ⊢ ∅ ∈ dom vol
87	85, 86	eqeltrdi 2871	. . . . . . . . 9 ⊢ (𝐵 = +∞ → (𝐵[,)+∞) ∈ dom vol)
88	78, 87	jaoi 870	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ ∨ 𝐵 = +∞) → (𝐵[,)+∞) ∈ dom vol)
89	77, 88	syl 18	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵[,)+∞) ∈ dom vol)
90		difmbl 25683	. . . . . . 7 ⊢ ((ℝ ∈ dom vol ∧ (𝐵[,)+∞) ∈ dom vol) → (ℝ ∖ (𝐵[,)+∞)) ∈ dom vol)
91	69, 89, 90	sylancr 598	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (ℝ ∖ (𝐵[,)+∞)) ∈ dom vol)
92	68, 91	eqeltrrd 2864	. . . . 5 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞(,)𝐵) ∈ dom vol)
93		oveq1 7419	. . . . . 6 ⊢ (-∞ = 𝐴 → (-∞(,)𝐵) = (𝐴(,)𝐵))
94	93	eleq1d 2848	. . . . 5 ⊢ (-∞ = 𝐴 → ((-∞(,)𝐵) ∈ dom vol ↔ (𝐴(,)𝐵) ∈ dom vol))
95	92, 94	syl5ibcom 248	. . . 4 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞ = 𝐴 → (𝐴(,)𝐵) ∈ dom vol))
96		xrleloe 13170	. . . . . 6 ⊢ ((-∞ ∈ ℝ^* ∧ 𝐴 ∈ ℝ^*) → (-∞ ≤ 𝐴 ↔ (-∞ < 𝐴 ∨ -∞ = 𝐴)))
97	22, 44, 96	sylancr 598	. . . . 5 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞ ≤ 𝐴 ↔ (-∞ < 𝐴 ∨ -∞ = 𝐴)))
98	46, 97	mpbid 235	. . . 4 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞ < 𝐴 ∨ -∞ = 𝐴))
99	38, 95, 98	mpjaod 873	. . 3 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐴(,)𝐵) ∈ dom vol)
100		ioo0 13398	. . . . . 6 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → ((𝐴(,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴))
101		xrlenlt 11275	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^*) → (𝐵 ≤ 𝐴 ↔ ¬ 𝐴 < 𝐵))
102	101	ancoms 463	. . . . . 6 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (𝐵 ≤ 𝐴 ↔ ¬ 𝐴 < 𝐵))
103	100, 102	bitrd 282	. . . . 5 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → ((𝐴(,)𝐵) = ∅ ↔ ¬ 𝐴 < 𝐵))
104	103	biimpar 482	. . . 4 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ ¬ 𝐴 < 𝐵) → (𝐴(,)𝐵) = ∅)
105	104, 86	eqeltrdi 2871	. . 3 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ ¬ 𝐴 < 𝐵) → (𝐴(,)𝐵) ∈ dom vol)
106	99, 105	pm2.61dan 824	. 2 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (𝐴(,)𝐵) ∈ dom vol)
107		ndmioo 13400	. . 3 ⊢ (¬ (𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (𝐴(,)𝐵) = ∅)
108	107, 86	eqeltrdi 2871	. 2 ⊢ (¬ (𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (𝐴(,)𝐵) ∈ dom vol)
109	106, 108	pm2.61i 184	1 ⊢ (𝐴(,)𝐵) ∈ dom vol

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 400 ∨ wo 860 ∧ w3a 1103 = wceq 1570 ∈ wcel 2143 ∖ cdif 3903 ∪ cun 3904 ∩ cin 3905 ⊆ wss 3906 ∅c0 4287 {csn 4590 class class class wbr 5110 dom cdm 5663 ‘cfv 6538 (class class class)co 7412 ℝcr 11100 0cc0 11101 +∞cpnf 11241 -∞cmnf 11242 ℝ^*cxr 11243 < clt 11244 ≤ cle 11245 (,)cioo 13373 [,)cico 13375 [,]cicc 13376 vol*covol 25602 volcvol 25603

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1825 ax-4 1839 ax-5 1940 ax-6 1997 ax-7 2038 ax-8 2145 ax-9 2153 ax-10 2176 ax-11 2192 ax-12 2213 ax-ext 2735 ax-rep 5239 ax-sep 5258 ax-nul 5270 ax-pow 5338 ax-pr 5406 ax-un 7734 ax-inf2 9611 ax-cnex 11157 ax-resscn 11158 ax-1cn 11159 ax-icn 11160 ax-addcl 11161 ax-addrcl 11162 ax-mulcl 11163 ax-mulrcl 11164 ax-mulcom 11165 ax-addass 11166 ax-mulass 11167 ax-distr 11168 ax-i2m1 11169 ax-1ne0 11170 ax-1rid 11171 ax-rnegex 11172 ax-rrecex 11173 ax-cnre 11174 ax-pre-lttri 11175 ax-pre-lttrn 11176 ax-pre-ltadd 11177 ax-pre-mulgt0 11178 ax-pre-sup 11179

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1810 df-nf 1814 df-sb 2097 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2838 df-nfc 2912 df-ne 2959 df-nel 3065 df-ral 3080 df-rex 3090 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3457 df-sbc 3746 df-csb 3855 df-dif 3909 df-un 3911 df-in 3913 df-ss 3923 df-pss 3926 df-nul 4288 df-if 4489 df-pw 4565 df-sn 4591 df-pr 4593 df-op 4597 df-uni 4874 df-int 4914 df-iun 4959 df-br 5111 df-opab 5175 df-mpt 5194 df-tr 5220 df-id 5558 df-eprel 5563 df-po 5571 df-so 5572 df-fr 5616 df-se 5617 df-we 5618 df-xp 5669 df-rel 5670 df-cnv 5671 df-co 5672 df-dm 5673 df-rn 5674 df-res 5675 df-ima 5676 df-pred 6304 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6494 df-fun 6540 df-fn 6541 df-f 6542 df-f1 6543 df-fo 6544 df-f1o 6545 df-fv 6546 df-isom 6547 df-riota 7369 df-ov 7415 df-oprab 7416 df-mpo 7417 df-of 7676 df-om 7864 df-1st 7987 df-2nd 7988 df-frecs 8279 df-wrecs 8310 df-recs 8359 df-rdg 8398 df-1o 8454 df-2o 8455 df-er 8695 df-map 8827 df-pm 8828 df-en 8945 df-dom 8946 df-sdom 8947 df-fin 8948 df-sup 9403 df-inf 9404 df-oi 9473 df-dju 9888 df-card 9926 df-pnf 11246 df-mnf 11247 df-xr 11248 df-ltxr 11249 df-le 11250 df-sub 11444 df-neg 11445 df-div 11873 df-nn 12235 df-2 12304 df-3 12305 df-n0 12506 df-z 12593 df-uz 12864 df-q 12974 df-rp 13018 df-xadd 13139 df-ioo 13377 df-ico 13379 df-icc 13380 df-fz 13537 df-fzo 13685 df-fl 13827 df-seq 14040 df-exp 14100 df-hash 14369 df-cj 15152 df-re 15153 df-im 15154 df-sqrt 15288 df-abs 15289 df-clim 15541 df-rlim 15542 df-sum 15740 df-xmet 21496 df-met 21497 df-ovol 25604 df-vol 25605

This theorem is referenced by: iccmbl 25706 ovolioo 25708 volioo 25709 ioovolcl 25710 uniioovol 25719 uniioombllem4 25726 uniioombllem5 25727 opnmblALT 25743 mbfid 25775 ditgcl 25998 ditgswap 25999 ditgsplitlem 26000 ftc1lem1 26175 ftc1lem2 26176 ftc1a 26177 ftc1lem4 26179 ftc2 26184 ftc2ditglem 26185 itgsubstlem 26188 itgpowd 26190 ftc2re 34963 fdvposlt 34964 fdvposle 34966 itgexpif 34971 circlemeth 35005 itg2gt0cn 38304 ftc1cnnclem 38320 ftc1anclem7 38328 ftc1anclem8 38329 ftc1anc 38330 ftc2nc 38331 areacirc 38342 lcmineqlem10 42783 lcmineqlem12 42785 iocmbl 43920 cnioobibld 43921 lhe4.4ex1a 45019 itgsin0pilem1 46644 iblioosinexp 46647 itgsinexplem1 46648 itgsinexp 46649 itgcoscmulx 46663 volioc 46666 itgsincmulx 46668 iblcncfioo 46672 itgiccshift 46674 itgperiod 46675 itgsbtaddcnst 46676 volico 46677 volioof 46681 wallispilem2 46760 dirkeritg 46796 fourierdlem16 46817 fourierdlem21 46822 fourierdlem22 46823 fourierdlem39 46840 fourierdlem73 46873 fourierdlem83 46883 fourierdlem103 46903 fourierdlem104 46904 fourierdlem111 46911 fourierdlem112 46912 sqwvfoura 46922 sqwvfourb 46923 etransclem18 46946 etransclem23 46951 ovolval4lem1 47343 ovolval5lem1 47346

W3C validator