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 25082

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 13455	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 < 𝐵) → ({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵))
2	1	3expa 1119	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵))
3	2	adantrr 716	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵))
4		lbico1 13378	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝐴 < 𝐵) → 𝐴 ∈ (𝐴[,)𝐵))
5	4	3expa 1119	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → 𝐴 ∈ (𝐴[,)𝐵))
6	5	adantrr 716	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐴 ∈ (𝐴[,)𝐵))
7	6	snssd 4813	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → {𝐴} ⊆ (𝐴[,)𝐵))
8		iccid 13369	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℝ^* → (𝐴[,]𝐴) = {𝐴})
9	8	ad2antrr 725	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (𝐴[,]𝐴) = {𝐴})
10	9	ineq1d 4212	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ((𝐴[,]𝐴) ∩ (𝐴(,)𝐵)) = ({𝐴} ∩ (𝐴(,)𝐵)))
11		simpll 766	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐴 ∈ ℝ^)
12		simplr 768	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐵 ∈ ℝ^)
13		df-icc 13331	. . . . . . . . . . 11 ⊢ [,] = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 ≤ 𝑦)})
14		df-ioo 13328	. . . . . . . . . . 11 ⊢ (,) = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 < 𝑧 ∧ 𝑧 < 𝑦)})
15		xrltnle 11281	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) → (𝐴 < 𝑤 ↔ ¬ 𝑤 ≤ 𝐴))
16	13, 14, 15	ixxdisj 13339	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → ((𝐴[,]𝐴) ∩ (𝐴(,)𝐵)) = ∅)
17	11, 11, 12, 16	syl3anc 1372	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ((𝐴[,]𝐴) ∩ (𝐴(,)𝐵)) = ∅)
18	10, 17	eqtr3d 2775	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ({𝐴} ∩ (𝐴(,)𝐵)) = ∅)
19		uneqdifeq 4493	. . . . . . . 8 ⊢ (({𝐴} ⊆ (𝐴[,)𝐵) ∧ ({𝐴} ∩ (𝐴(,)𝐵)) = ∅) → (({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵) ↔ ((𝐴[,)𝐵) ∖ {𝐴}) = (𝐴(,)𝐵)))
20	7, 18, 19	syl2anc 585	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (({𝐴} ∪ (𝐴(,)𝐵)) = (𝐴[,)𝐵) ↔ ((𝐴[,)𝐵) ∖ {𝐴}) = (𝐴(,)𝐵)))
21	3, 20	mpbid 231	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ((𝐴[,)𝐵) ∖ {𝐴}) = (𝐴(,)𝐵))
22		mnfxr 11271	. . . . . . . . . 10 ⊢ -∞ ∈ ℝ^*
23	22	a1i 11	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → -∞ ∈ ℝ^)
24		simprr 772	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → -∞ < 𝐴)
25		simprl 770	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐴 < 𝐵)
26		xrre2 13149	. . . . . . . . 9 ⊢ (((-∞ ∈ ℝ^* ∧ 𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (-∞ < 𝐴 ∧ 𝐴 < 𝐵)) → 𝐴 ∈ ℝ)
27	23, 11, 12, 24, 25, 26	syl32anc 1379	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → 𝐴 ∈ ℝ)
28		icombl 25081	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ^*) → (𝐴[,)𝐵) ∈ dom vol)
29	27, 12, 28	syl2anc 585	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (𝐴[,)𝐵) ∈ dom vol)
30	27	snssd 4813	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → {𝐴} ⊆ ℝ)
31		ovolsn 25012	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ → (vol*‘{𝐴}) = 0)
32	27, 31	syl 17	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (vol‘{𝐴}) = 0)
33		nulmbl 25052	. . . . . . . 8 ⊢ (({𝐴} ⊆ ℝ ∧ (vol*‘{𝐴}) = 0) → {𝐴} ∈ dom vol)
34	30, 32, 33	syl2anc 585	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → {𝐴} ∈ dom vol)
35		difmbl 25060	. . . . . . 7 ⊢ (((𝐴[,)𝐵) ∈ dom vol ∧ {𝐴} ∈ dom vol) → ((𝐴[,)𝐵) ∖ {𝐴}) ∈ dom vol)
36	29, 34, 35	syl2anc 585	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → ((𝐴[,)𝐵) ∖ {𝐴}) ∈ dom vol)
37	21, 36	eqeltrrd 2835	. . . . 5 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ -∞ < 𝐴)) → (𝐴(,)𝐵) ∈ dom vol)
38	37	expr 458	. . . 4 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞ < 𝐴 → (𝐴(,)𝐵) ∈ dom vol))
39		uncom 4154	. . . . . . . . 9 ⊢ ((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = ((-∞(,)𝐵) ∪ (𝐵[,)+∞))
40	22	a1i 11	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ 𝐴 < 𝐵) → -∞ ∈ ℝ^)
41		simplr 768	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ 𝐴 < 𝐵) → 𝐵 ∈ ℝ^)
42		pnfxr 11268	. . . . . . . . . . 11 ⊢ +∞ ∈ ℝ^*
43	42	a1i 11	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ 𝐴 < 𝐵) → +∞ ∈ ℝ^)
44		simpll 766	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^) ∧ 𝐴 < 𝐵) → 𝐴 ∈ ℝ^)
45		mnfle 13114	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ ℝ^* → -∞ ≤ 𝐴)
46	45	ad2antrr 725	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → -∞ ≤ 𝐴)
47		simpr 486	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → 𝐴 < 𝐵)
48	40, 44, 41, 46, 47	xrlelttrd 13139	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → -∞ < 𝐵)
49		pnfge 13110	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ^* → 𝐵 ≤ +∞)
50	41, 49	syl 17	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → 𝐵 ≤ +∞)
51		df-ico 13330	. . . . . . . . . . 11 ⊢ [,) = (𝑥 ∈ ℝ^, 𝑦 ∈ ℝ^ ↦ {𝑧 ∈ ℝ^* ∣ (𝑥 ≤ 𝑧 ∧ 𝑧 < 𝑦)})
52		xrlenlt 11279	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) → (𝐵 ≤ 𝑤 ↔ ¬ 𝑤 < 𝐵))
53		xrltletr 13136	. . . . . . . . . . 11 ⊢ ((𝑤 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → ((𝑤 < 𝐵 ∧ 𝐵 ≤ +∞) → 𝑤 < +∞))
54		xrltletr 13136	. . . . . . . . . . 11 ⊢ ((-∞ ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝑤 ∈ ℝ^*) → ((-∞ < 𝐵 ∧ 𝐵 ≤ 𝑤) → -∞ < 𝑤))
55	14, 51, 52, 14, 53, 54	ixxun 13340	. . . . . . . . . 10 ⊢ (((-∞ ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) ∧ (-∞ < 𝐵 ∧ 𝐵 ≤ +∞)) → ((-∞(,)𝐵) ∪ (𝐵[,)+∞)) = (-∞(,)+∞))
56	40, 41, 43, 48, 50, 55	syl32anc 1379	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((-∞(,)𝐵) ∪ (𝐵[,)+∞)) = (-∞(,)+∞))
57	39, 56	eqtrid 2785	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = (-∞(,)+∞))
58		ioomax 13399	. . . . . . . 8 ⊢ (-∞(,)+∞) = ℝ
59	57, 58	eqtrdi 2789	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = ℝ)
60		ssun1 4173	. . . . . . . . 9 ⊢ (𝐵[,)+∞) ⊆ ((𝐵[,)+∞) ∪ (-∞(,)𝐵))
61	60, 59	sseqtrid 4035	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵[,)+∞) ⊆ ℝ)
62		incom 4202	. . . . . . . . 9 ⊢ ((𝐵[,)+∞) ∩ (-∞(,)𝐵)) = ((-∞(,)𝐵) ∩ (𝐵[,)+∞))
63	14, 51, 52	ixxdisj 13339	. . . . . . . . . 10 ⊢ ((-∞ ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → ((-∞(,)𝐵) ∩ (𝐵[,)+∞)) = ∅)
64	40, 41, 43, 63	syl3anc 1372	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((-∞(,)𝐵) ∩ (𝐵[,)+∞)) = ∅)
65	62, 64	eqtrid 2785	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((𝐵[,)+∞) ∩ (-∞(,)𝐵)) = ∅)
66		uneqdifeq 4493	. . . . . . . 8 ⊢ (((𝐵[,)+∞) ⊆ ℝ ∧ ((𝐵[,)+∞) ∩ (-∞(,)𝐵)) = ∅) → (((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = ℝ ↔ (ℝ ∖ (𝐵[,)+∞)) = (-∞(,)𝐵)))
67	61, 65, 66	syl2anc 585	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (((𝐵[,)+∞) ∪ (-∞(,)𝐵)) = ℝ ↔ (ℝ ∖ (𝐵[,)+∞)) = (-∞(,)𝐵)))
68	59, 67	mpbid 231	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (ℝ ∖ (𝐵[,)+∞)) = (-∞(,)𝐵))
69		rembl 25057	. . . . . . 7 ⊢ ℝ ∈ dom vol
70		xrleloe 13123	. . . . . . . . . . 11 ⊢ ((𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → (𝐵 ≤ +∞ ↔ (𝐵 < +∞ ∨ 𝐵 = +∞)))
71	41, 42, 70	sylancl 587	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 ≤ +∞ ↔ (𝐵 < +∞ ∨ 𝐵 = +∞)))
72	50, 71	mpbid 231	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 < +∞ ∨ 𝐵 = +∞))
73		xrre2 13149	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) ∧ (𝐴 < 𝐵 ∧ 𝐵 < +∞)) → 𝐵 ∈ ℝ)
74	73	expr 458	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 < +∞ → 𝐵 ∈ ℝ))
75	42, 74	mp3anl3 1458	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 < +∞ → 𝐵 ∈ ℝ))
76	75	orim1d 965	. . . . . . . . 9 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → ((𝐵 < +∞ ∨ 𝐵 = +∞) → (𝐵 ∈ ℝ ∨ 𝐵 = +∞)))
77	72, 76	mpd 15	. . . . . . . 8 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵 ∈ ℝ ∨ 𝐵 = +∞))
78		icombl1 25080	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ → (𝐵[,)+∞) ∈ dom vol)
79		oveq1 7416	. . . . . . . . . . 11 ⊢ (𝐵 = +∞ → (𝐵[,)+∞) = (+∞[,)+∞))
80		pnfge 13110	. . . . . . . . . . . . 13 ⊢ (+∞ ∈ ℝ^* → +∞ ≤ +∞)
81	42, 80	ax-mp 5	. . . . . . . . . . . 12 ⊢ +∞ ≤ +∞
82		ico0 13370	. . . . . . . . . . . . 13 ⊢ ((+∞ ∈ ℝ^* ∧ +∞ ∈ ℝ^*) → ((+∞[,)+∞) = ∅ ↔ +∞ ≤ +∞))
83	42, 42, 82	mp2an 691	. . . . . . . . . . . 12 ⊢ ((+∞[,)+∞) = ∅ ↔ +∞ ≤ +∞)
84	81, 83	mpbir 230	. . . . . . . . . . 11 ⊢ (+∞[,)+∞) = ∅
85	79, 84	eqtrdi 2789	. . . . . . . . . 10 ⊢ (𝐵 = +∞ → (𝐵[,)+∞) = ∅)
86		0mbl 25056	. . . . . . . . . 10 ⊢ ∅ ∈ dom vol
87	85, 86	eqeltrdi 2842	. . . . . . . . 9 ⊢ (𝐵 = +∞ → (𝐵[,)+∞) ∈ dom vol)
88	78, 87	jaoi 856	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ ∨ 𝐵 = +∞) → (𝐵[,)+∞) ∈ dom vol)
89	77, 88	syl 17	. . . . . . 7 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐵[,)+∞) ∈ dom vol)
90		difmbl 25060	. . . . . . 7 ⊢ ((ℝ ∈ dom vol ∧ (𝐵[,)+∞) ∈ dom vol) → (ℝ ∖ (𝐵[,)+∞)) ∈ dom vol)
91	69, 89, 90	sylancr 588	. . . . . 6 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (ℝ ∖ (𝐵[,)+∞)) ∈ dom vol)
92	68, 91	eqeltrrd 2835	. . . . 5 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞(,)𝐵) ∈ dom vol)
93		oveq1 7416	. . . . . 6 ⊢ (-∞ = 𝐴 → (-∞(,)𝐵) = (𝐴(,)𝐵))
94	93	eleq1d 2819	. . . . 5 ⊢ (-∞ = 𝐴 → ((-∞(,)𝐵) ∈ dom vol ↔ (𝐴(,)𝐵) ∈ dom vol))
95	92, 94	syl5ibcom 244	. . . 4 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞ = 𝐴 → (𝐴(,)𝐵) ∈ dom vol))
96		xrleloe 13123	. . . . . 6 ⊢ ((-∞ ∈ ℝ^* ∧ 𝐴 ∈ ℝ^*) → (-∞ ≤ 𝐴 ↔ (-∞ < 𝐴 ∨ -∞ = 𝐴)))
97	22, 44, 96	sylancr 588	. . . . 5 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞ ≤ 𝐴 ↔ (-∞ < 𝐴 ∨ -∞ = 𝐴)))
98	46, 97	mpbid 231	. . . 4 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (-∞ < 𝐴 ∨ -∞ = 𝐴))
99	38, 95, 98	mpjaod 859	. . 3 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ 𝐴 < 𝐵) → (𝐴(,)𝐵) ∈ dom vol)
100		ioo0 13349	. . . . . 6 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → ((𝐴(,)𝐵) = ∅ ↔ 𝐵 ≤ 𝐴))
101		xrlenlt 11279	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐴 ∈ ℝ^*) → (𝐵 ≤ 𝐴 ↔ ¬ 𝐴 < 𝐵))
102	101	ancoms 460	. . . . . 6 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (𝐵 ≤ 𝐴 ↔ ¬ 𝐴 < 𝐵))
103	100, 102	bitrd 279	. . . . 5 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → ((𝐴(,)𝐵) = ∅ ↔ ¬ 𝐴 < 𝐵))
104	103	biimpar 479	. . . 4 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ ¬ 𝐴 < 𝐵) → (𝐴(,)𝐵) = ∅)
105	104, 86	eqeltrdi 2842	. . 3 ⊢ (((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) ∧ ¬ 𝐴 < 𝐵) → (𝐴(,)𝐵) ∈ dom vol)
106	99, 105	pm2.61dan 812	. 2 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (𝐴(,)𝐵) ∈ dom vol)
107		ndmioo 13351	. . 3 ⊢ (¬ (𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (𝐴(,)𝐵) = ∅)
108	107, 86	eqeltrdi 2842	. 2 ⊢ (¬ (𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → (𝐴(,)𝐵) ∈ dom vol)
109	106, 108	pm2.61i 182	1 ⊢ (𝐴(,)𝐵) ∈ dom vol

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 397 ∨ wo 846 ∧ w3a 1088 = wceq 1542 ∈ wcel 2107 ∖ cdif 3946 ∪ cun 3947 ∩ cin 3948 ⊆ wss 3949 ∅c0 4323 {csn 4629 class class class wbr 5149 dom cdm 5677 ‘cfv 6544 (class class class)co 7409 ℝcr 11109 0cc0 11110 +∞cpnf 11245 -∞cmnf 11246 ℝ^*cxr 11247 < clt 11248 ≤ cle 11249 (,)cioo 13324 [,)cico 13326 [,]cicc 13327 vol*covol 24979 volcvol 24980

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5286 ax-sep 5300 ax-nul 5307 ax-pow 5364 ax-pr 5428 ax-un 7725 ax-inf2 9636 ax-cnex 11166 ax-resscn 11167 ax-1cn 11168 ax-icn 11169 ax-addcl 11170 ax-addrcl 11171 ax-mulcl 11172 ax-mulrcl 11173 ax-mulcom 11174 ax-addass 11175 ax-mulass 11176 ax-distr 11177 ax-i2m1 11178 ax-1ne0 11179 ax-1rid 11180 ax-rnegex 11181 ax-rrecex 11182 ax-cnre 11183 ax-pre-lttri 11184 ax-pre-lttrn 11185 ax-pre-ltadd 11186 ax-pre-mulgt0 11187 ax-pre-sup 11188

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-nul 4324 df-if 4530 df-pw 4605 df-sn 4630 df-pr 4632 df-op 4636 df-uni 4910 df-int 4952 df-iun 5000 df-br 5150 df-opab 5212 df-mpt 5233 df-tr 5267 df-id 5575 df-eprel 5581 df-po 5589 df-so 5590 df-fr 5632 df-se 5633 df-we 5634 df-xp 5683 df-rel 5684 df-cnv 5685 df-co 5686 df-dm 5687 df-rn 5688 df-res 5689 df-ima 5690 df-pred 6301 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6496 df-fun 6546 df-fn 6547 df-f 6548 df-f1 6549 df-fo 6550 df-f1o 6551 df-fv 6552 df-isom 6553 df-riota 7365 df-ov 7412 df-oprab 7413 df-mpo 7414 df-of 7670 df-om 7856 df-1st 7975 df-2nd 7976 df-frecs 8266 df-wrecs 8297 df-recs 8371 df-rdg 8410 df-1o 8466 df-2o 8467 df-er 8703 df-map 8822 df-pm 8823 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-sup 9437 df-inf 9438 df-oi 9505 df-dju 9896 df-card 9934 df-pnf 11250 df-mnf 11251 df-xr 11252 df-ltxr 11253 df-le 11254 df-sub 11446 df-neg 11447 df-div 11872 df-nn 12213 df-2 12275 df-3 12276 df-n0 12473 df-z 12559 df-uz 12823 df-q 12933 df-rp 12975 df-xadd 13093 df-ioo 13328 df-ico 13330 df-icc 13331 df-fz 13485 df-fzo 13628 df-fl 13757 df-seq 13967 df-exp 14028 df-hash 14291 df-cj 15046 df-re 15047 df-im 15048 df-sqrt 15182 df-abs 15183 df-clim 15432 df-rlim 15433 df-sum 15633 df-xmet 20937 df-met 20938 df-ovol 24981 df-vol 24982

This theorem is referenced by: iccmbl 25083 ovolioo 25085 volioo 25086 ioovolcl 25087 uniioovol 25096 uniioombllem4 25103 uniioombllem5 25104 opnmblALT 25120 mbfid 25152 ditgcl 25375 ditgswap 25376 ditgsplitlem 25377 ftc1lem1 25552 ftc1lem2 25553 ftc1a 25554 ftc1lem4 25556 ftc2 25561 ftc2ditglem 25562 itgsubstlem 25565 itgpowd 25567 ftc2re 33641 fdvposlt 33642 fdvposle 33644 itgexpif 33649 circlemeth 33683 itg2gt0cn 36591 ftc1cnnclem 36607 ftc1anclem7 36615 ftc1anclem8 36616 ftc1anc 36617 ftc2nc 36618 areacirc 36629 lcmineqlem10 40951 lcmineqlem12 40953 iocmbl 42010 cnioobibld 42011 lhe4.4ex1a 43136 itgsin0pilem1 44714 iblioosinexp 44717 itgsinexplem1 44718 itgsinexp 44719 itgcoscmulx 44733 volioc 44736 itgsincmulx 44738 iblcncfioo 44742 itgiccshift 44744 itgperiod 44745 itgsbtaddcnst 44746 volico 44747 volioof 44751 wallispilem2 44830 dirkeritg 44866 fourierdlem16 44887 fourierdlem21 44892 fourierdlem22 44893 fourierdlem39 44910 fourierdlem73 44943 fourierdlem83 44953 fourierdlem103 44973 fourierdlem104 44974 fourierdlem111 44981 fourierdlem112 44982 sqwvfoura 44992 sqwvfourb 44993 etransclem18 45016 etransclem23 45021 ovolval4lem1 45413 ovolval5lem1 45416

W3C validator