Theorem difelcarsg 32277

Description: The Caratheodory measurable sets are closed under complement. (Contributed by Thierry Arnoux, 17-May-2020.)

Hypotheses

Ref	Expression
carsgval.1	⊢ (𝜑 → 𝑂 ∈ 𝑉)
carsgval.2	⊢ (𝜑 → 𝑀:𝒫 𝑂⟶(0[,]+∞))
difelcarsg.1	⊢ (𝜑 → 𝐴 ∈ (toCaraSiga‘𝑀))

Assertion

Ref	Expression
difelcarsg	⊢ (𝜑 → (𝑂 ∖ 𝐴) ∈ (toCaraSiga‘𝑀))

Proof of Theorem difelcarsg

Dummy variable 𝑒 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		difssd 4067	. . 3 ⊢ (𝜑 → (𝑂 ∖ 𝐴) ⊆ 𝑂)
2		indif2 4204	. . . . . . . 8 ⊢ (𝑒 ∩ (𝑂 ∖ 𝐴)) = ((𝑒 ∩ 𝑂) ∖ 𝐴)
3		elpwi 4542	. . . . . . . . . . 11 ⊢ (𝑒 ∈ 𝒫 𝑂 → 𝑒 ⊆ 𝑂)
4	3	adantl 482	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → 𝑒 ⊆ 𝑂)
5		df-ss 3904	. . . . . . . . . 10 ⊢ (𝑒 ⊆ 𝑂 ↔ (𝑒 ∩ 𝑂) = 𝑒)
6	4, 5	sylib 217	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∩ 𝑂) = 𝑒)
7	6	difeq1d 4056	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑒 ∩ 𝑂) ∖ 𝐴) = (𝑒 ∖ 𝐴))
8	2, 7	eqtrid 2790	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∩ (𝑂 ∖ 𝐴)) = (𝑒 ∖ 𝐴))
9	8	fveq2d 6778	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∩ (𝑂 ∖ 𝐴))) = (𝑀‘(𝑒 ∖ 𝐴)))
10		difdif2 4220	. . . . . . . 8 ⊢ (𝑒 ∖ (𝑂 ∖ 𝐴)) = ((𝑒 ∖ 𝑂) ∪ (𝑒 ∩ 𝐴))
11		ssdif0 4297	. . . . . . . . . . 11 ⊢ (𝑒 ⊆ 𝑂 ↔ (𝑒 ∖ 𝑂) = ∅)
12	4, 11	sylib 217	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∖ 𝑂) = ∅)
13	12	uneq1d 4096	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑒 ∖ 𝑂) ∪ (𝑒 ∩ 𝐴)) = (∅ ∪ (𝑒 ∩ 𝐴)))
14		uncom 4087	. . . . . . . . . 10 ⊢ ((𝑒 ∩ 𝐴) ∪ ∅) = (∅ ∪ (𝑒 ∩ 𝐴))
15		un0 4324	. . . . . . . . . 10 ⊢ ((𝑒 ∩ 𝐴) ∪ ∅) = (𝑒 ∩ 𝐴)
16	14, 15	eqtr3i 2768	. . . . . . . . 9 ⊢ (∅ ∪ (𝑒 ∩ 𝐴)) = (𝑒 ∩ 𝐴)
17	13, 16	eqtrdi 2794	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑒 ∖ 𝑂) ∪ (𝑒 ∩ 𝐴)) = (𝑒 ∩ 𝐴))
18	10, 17	eqtrid 2790	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∖ (𝑂 ∖ 𝐴)) = (𝑒 ∩ 𝐴))
19	18	fveq2d 6778	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∖ (𝑂 ∖ 𝐴))) = (𝑀‘(𝑒 ∩ 𝐴)))
20	9, 19	oveq12d 7293	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∩ (𝑂 ∖ 𝐴))) +𝑒 (𝑀‘(𝑒 ∖ (𝑂 ∖ 𝐴)))) = ((𝑀‘(𝑒 ∖ 𝐴)) +𝑒 (𝑀‘(𝑒 ∩ 𝐴))))
21		iccssxr 13162	. . . . . . 7 ⊢ (0[,]+∞) ⊆ ℝ*
22		carsgval.2	. . . . . . . . 9 ⊢ (𝜑 → 𝑀:𝒫 𝑂⟶(0[,]+∞))
23	22	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
24		simpr 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → 𝑒 ∈ 𝒫 𝑂)
25	24	elpwdifcl 30875	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∖ 𝐴) ∈ 𝒫 𝑂)
26	23, 25	ffvelrnd 6962	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∖ 𝐴)) ∈ (0[,]+∞))
27	21, 26	sselid 3919	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∖ 𝐴)) ∈ ℝ*)
28	24	elpwincl1 30874	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∩ 𝐴) ∈ 𝒫 𝑂)
29	23, 28	ffvelrnd 6962	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∩ 𝐴)) ∈ (0[,]+∞))
30	21, 29	sselid 3919	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∩ 𝐴)) ∈ ℝ*)
31		xaddcom 12974	. . . . . 6 ⊢ (((𝑀‘(𝑒 ∖ 𝐴)) ∈ ℝ* ∧ (𝑀‘(𝑒 ∩ 𝐴)) ∈ ℝ*) → ((𝑀‘(𝑒 ∖ 𝐴)) +𝑒 (𝑀‘(𝑒 ∩ 𝐴))) = ((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))))
32	27, 30, 31	syl2anc 584	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∖ 𝐴)) +𝑒 (𝑀‘(𝑒 ∩ 𝐴))) = ((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))))
33		difelcarsg.1	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ∈ (toCaraSiga‘𝑀))
34		carsgval.1	. . . . . . . . 9 ⊢ (𝜑 → 𝑂 ∈ 𝑉)
35	34, 22	elcarsg 32272	. . . . . . . 8 ⊢ (𝜑 → (𝐴 ∈ (toCaraSiga‘𝑀) ↔ (𝐴 ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = (𝑀‘𝑒))))
36	33, 35	mpbid 231	. . . . . . 7 ⊢ (𝜑 → (𝐴 ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = (𝑀‘𝑒)))
37	36	simprd 496	. . . . . 6 ⊢ (𝜑 → ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = (𝑀‘𝑒))
38	37	r19.21bi 3134	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = (𝑀‘𝑒))
39	20, 32, 38	3eqtrd 2782	. . . 4 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∩ (𝑂 ∖ 𝐴))) +𝑒 (𝑀‘(𝑒 ∖ (𝑂 ∖ 𝐴)))) = (𝑀‘𝑒))
40	39	ralrimiva 3103	. . 3 ⊢ (𝜑 → ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ (𝑂 ∖ 𝐴))) +𝑒 (𝑀‘(𝑒 ∖ (𝑂 ∖ 𝐴)))) = (𝑀‘𝑒))
41	1, 40	jca 512	. 2 ⊢ (𝜑 → ((𝑂 ∖ 𝐴) ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ (𝑂 ∖ 𝐴))) +𝑒 (𝑀‘(𝑒 ∖ (𝑂 ∖ 𝐴)))) = (𝑀‘𝑒)))
42	34, 22	elcarsg 32272	. 2 ⊢ (𝜑 → ((𝑂 ∖ 𝐴) ∈ (toCaraSiga‘𝑀) ↔ ((𝑂 ∖ 𝐴) ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ (𝑂 ∖ 𝐴))) +𝑒 (𝑀‘(𝑒 ∖ (𝑂 ∖ 𝐴)))) = (𝑀‘𝑒))))
43	41, 42	mpbird 256	1 ⊢ (𝜑 → (𝑂 ∖ 𝐴) ∈ (toCaraSiga‘𝑀))

Syntax hints:   → wi 4   ∧ wa 396   = wceq 1539   ∈ wcel 2106  ∀wral 3064   ∖ cdif 3884   ∪ cun 3885   ∩ cin 3886   ⊆ wss 3887  ∅c0 4256  𝒫 cpw 4533  ⟶wf 6429  ‘cfv 6433  (class class class)co 7275  0cc0 10871  +∞cpnf 11006  ℝ^*cxr 11008   +_𝑒 cxad 12846  [,]cicc 13082  toCaraSigaccarsg 32268

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 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-rep 5209  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588  ax-cnex 10927  ax-resscn 10928  ax-1cn 10929  ax-icn 10930  ax-addcl 10931  ax-addrcl 10932  ax-mulcl 10933  ax-mulrcl 10934  ax-mulcom 10935  ax-addass 10936  ax-mulass 10937  ax-distr 10938  ax-i2m1 10939  ax-1ne0 10940  ax-1rid 10941  ax-rnegex 10942  ax-rrecex 10943  ax-cnre 10944  ax-pre-lttri 10945  ax-pre-lttrn 10946  ax-pre-ltadd 10947

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-nel 3050  df-ral 3069  df-rex 3070  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-id 5489  df-po 5503  df-so 5504  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-ov 7278  df-oprab 7279  df-mpo 7280  df-1st 7831  df-2nd 7832  df-er 8498  df-en 8734  df-dom 8735  df-sdom 8736  df-pnf 11011  df-mnf 11012  df-xr 11013  df-ltxr 11014  df-xadd 12849  df-icc 13086  df-carsg 32269

This theorem is referenced by:  unelcarsg  32279  difelcarsg2  32280  fiunelcarsg  32283  carsgsiga  32289