Theorem inelcarsg 34878

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

Hypotheses

Ref	Expression
carsgval.1	⊢ (𝜑 → 𝑂 ∈ 𝑉)
carsgval.2	⊢ (𝜑 → 𝑀:𝒫 𝑂⟶(0[,]+∞))
difelcarsg.1	⊢ (𝜑 → 𝐴 ∈ (toCaraSiga‘𝑀))
inelcarsg.1	⊢ ((𝜑 ∧ 𝑎 ∈ 𝒫 𝑂 ∧ 𝑏 ∈ 𝒫 𝑂) → (𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)))
inelcarsg.2	⊢ (𝜑 → 𝐵 ∈ (toCaraSiga‘𝑀))

Assertion

Ref	Expression
inelcarsg	⊢ (𝜑 → (𝐴 ∩ 𝐵) ∈ (toCaraSiga‘𝑀))

Distinct variable groups:   𝑀,𝑎   𝑂,𝑎   𝜑,𝑎   𝐴,𝑎,𝑏   𝐵,𝑎,𝑏   𝑀,𝑏   𝑂,𝑏   𝜑,𝑏

Allowed substitution hints:   𝑉(𝑎, 𝑏)

Proof of Theorem inelcarsg

Dummy variables 𝑒 𝑓 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		difelcarsg.1	. . . . . 6 ⊢ (𝜑 → 𝐴 ∈ (toCaraSiga‘𝑀))
2		carsgval.1	. . . . . . 7 ⊢ (𝜑 → 𝑂 ∈ 𝑉)
3		carsgval.2	. . . . . . 7 ⊢ (𝜑 → 𝑀:𝒫 𝑂⟶(0[,]+∞))
4	2, 3	elcarsg 34872	. . . . . 6 ⊢ (𝜑 → (𝐴 ∈ (toCaraSiga‘𝑀) ↔ (𝐴 ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = (𝑀‘𝑒))))
5	1, 4	mpbid 235	. . . . 5 ⊢ (𝜑 → (𝐴 ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = (𝑀‘𝑒)))
6	5	simpld 500	. . . 4 ⊢ (𝜑 → 𝐴 ⊆ 𝑂)
7		ssinss1 4190	. . . 4 ⊢ (𝐴 ⊆ 𝑂 → (𝐴 ∩ 𝐵) ⊆ 𝑂)
8	6, 7	syl 18	. . 3 ⊢ (𝜑 → (𝐴 ∩ 𝐵) ⊆ 𝑂)
9		iccssxr 13531	. . . . . . . . 9 ⊢ (0[,]+∞) ⊆ ℝ*
10	3	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → 𝑀:𝒫 𝑂⟶(0[,]+∞))
11		simpr 490	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → 𝑒 ∈ 𝒫 𝑂)
12	11	elpwdifcl 33056	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∖ (𝐴 ∩ 𝐵)) ∈ 𝒫 𝑂)
13	10, 12	ffvelcdmd 7073	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵))) ∈ (0[,]+∞))
14	9, 13	sselid 3928	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵))) ∈ ℝ*)
15	11	elpwincl1 33055	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∩ 𝐴) ∈ 𝒫 𝑂)
16	15	elpwdifcl 33056	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑒 ∩ 𝐴) ∖ 𝐵) ∈ 𝒫 𝑂)
17	10, 16	ffvelcdmd 7073	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) ∈ (0[,]+∞))
18	9, 17	sselid 3928	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) ∈ ℝ*)
19	11	elpwdifcl 33056	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∖ 𝐴) ∈ 𝒫 𝑂)
20	10, 19	ffvelcdmd 7073	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∖ 𝐴)) ∈ (0[,]+∞))
21	9, 20	sselid 3928	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∖ 𝐴)) ∈ ℝ*)
22	18, 21	xaddcld 13401	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) ∈ ℝ*)
23	11	elpwincl1 33055	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑒 ∩ (𝐴 ∩ 𝐵)) ∈ 𝒫 𝑂)
24	10, 23	ffvelcdmd 7073	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) ∈ (0[,]+∞))
25	9, 24	sselid 3928	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) ∈ ℝ*)
26		indifundif 33054	. . . . . . . . . 10 ⊢ (((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ (𝑒 ∖ 𝐴)) = (𝑒 ∖ (𝐴 ∩ 𝐵))
27	26	fveq2i 6876	. . . . . . . . 9 ⊢ (𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ (𝑒 ∖ 𝐴))) = (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))
28		inelcarsg.1	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑎 ∈ 𝒫 𝑂 ∧ 𝑏 ∈ 𝒫 𝑂) → (𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)))
29	28	3expb 1138	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑎 ∈ 𝒫 𝑂 ∧ 𝑏 ∈ 𝒫 𝑂)) → (𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)))
30	29	ralrimivva 3205	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑎 ∈ 𝒫 𝑂∀𝑏 ∈ 𝒫 𝑂(𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)))
31	30	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ∀𝑎 ∈ 𝒫 𝑂∀𝑏 ∈ 𝒫 𝑂(𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)))
32		uneq1 4107	. . . . . . . . . . . . . 14 ⊢ (𝑎 = ((𝑒 ∩ 𝐴) ∖ 𝐵) → (𝑎 ∪ 𝑏) = (((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ 𝑏))
33	32	fveq2d 6877	. . . . . . . . . . . . 13 ⊢ (𝑎 = ((𝑒 ∩ 𝐴) ∖ 𝐵) → (𝑀‘(𝑎 ∪ 𝑏)) = (𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ 𝑏)))
34		fveq2 6873	. . . . . . . . . . . . . 14 ⊢ (𝑎 = ((𝑒 ∩ 𝐴) ∖ 𝐵) → (𝑀‘𝑎) = (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)))
35	34	oveq1d 7423	. . . . . . . . . . . . 13 ⊢ (𝑎 = ((𝑒 ∩ 𝐴) ∖ 𝐵) → ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)) = ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘𝑏)))
36	33, 35	breq12d 5115	. . . . . . . . . . . 12 ⊢ (𝑎 = ((𝑒 ∩ 𝐴) ∖ 𝐵) → ((𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)) ↔ (𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ 𝑏)) ≤ ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘𝑏))))
37		uneq2 4108	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝑒 ∖ 𝐴) → (((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ 𝑏) = (((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ (𝑒 ∖ 𝐴)))
38	37	fveq2d 6877	. . . . . . . . . . . . 13 ⊢ (𝑏 = (𝑒 ∖ 𝐴) → (𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ 𝑏)) = (𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ (𝑒 ∖ 𝐴))))
39		fveq2 6873	. . . . . . . . . . . . . 14 ⊢ (𝑏 = (𝑒 ∖ 𝐴) → (𝑀‘𝑏) = (𝑀‘(𝑒 ∖ 𝐴)))
40	39	oveq2d 7424	. . . . . . . . . . . . 13 ⊢ (𝑏 = (𝑒 ∖ 𝐴) → ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘𝑏)) = ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))))
41	38, 40	breq12d 5115	. . . . . . . . . . . 12 ⊢ (𝑏 = (𝑒 ∖ 𝐴) → ((𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ 𝑏)) ≤ ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘𝑏)) ↔ (𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ (𝑒 ∖ 𝐴))) ≤ ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))))
42	36, 41	rspc2v 3586	. . . . . . . . . . 11 ⊢ ((((𝑒 ∩ 𝐴) ∖ 𝐵) ∈ 𝒫 𝑂 ∧ (𝑒 ∖ 𝐴) ∈ 𝒫 𝑂) → (∀𝑎 ∈ 𝒫 𝑂∀𝑏 ∈ 𝒫 𝑂(𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)) → (𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ (𝑒 ∖ 𝐴))) ≤ ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))))
43	42	imp 412	. . . . . . . . . 10 ⊢ (((((𝑒 ∩ 𝐴) ∖ 𝐵) ∈ 𝒫 𝑂 ∧ (𝑒 ∖ 𝐴) ∈ 𝒫 𝑂) ∧ ∀𝑎 ∈ 𝒫 𝑂∀𝑏 ∈ 𝒫 𝑂(𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏))) → (𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ (𝑒 ∖ 𝐴))) ≤ ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))))
44	16, 19, 31, 43	syl21anc 851	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(((𝑒 ∩ 𝐴) ∖ 𝐵) ∪ (𝑒 ∖ 𝐴))) ≤ ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))))
45	27, 44	eqbrtrrid 5140	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵))) ≤ ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))))
46		xleadd2a 13354	. . . . . . . 8 ⊢ ((((𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵))) ∈ ℝ* ∧ ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) ∈ ℝ* ∧ (𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) ∈ ℝ*) ∧ (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵))) ≤ ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))) → ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))))
47	14, 22, 25, 45, 46	syl31anc 1400	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))))
48		inelcarsg.2	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐵 ∈ (toCaraSiga‘𝑀))
49	2, 3	elcarsg 34872	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐵 ∈ (toCaraSiga‘𝑀) ↔ (𝐵 ⊆ 𝑂 ∧ ∀𝑓 ∈ 𝒫 𝑂((𝑀‘(𝑓 ∩ 𝐵)) +𝑒 (𝑀‘(𝑓 ∖ 𝐵))) = (𝑀‘𝑓))))
50	48, 49	mpbid 235	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐵 ⊆ 𝑂 ∧ ∀𝑓 ∈ 𝒫 𝑂((𝑀‘(𝑓 ∩ 𝐵)) +𝑒 (𝑀‘(𝑓 ∖ 𝐵))) = (𝑀‘𝑓)))
51	50	simprd 501	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑓 ∈ 𝒫 𝑂((𝑀‘(𝑓 ∩ 𝐵)) +𝑒 (𝑀‘(𝑓 ∖ 𝐵))) = (𝑀‘𝑓))
52	51	adantr 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ∀𝑓 ∈ 𝒫 𝑂((𝑀‘(𝑓 ∩ 𝐵)) +𝑒 (𝑀‘(𝑓 ∖ 𝐵))) = (𝑀‘𝑓))
53		ineq1 4158	. . . . . . . . . . . . . . 15 ⊢ (𝑓 = (𝑒 ∩ 𝐴) → (𝑓 ∩ 𝐵) = ((𝑒 ∩ 𝐴) ∩ 𝐵))
54	53	fveq2d 6877	. . . . . . . . . . . . . 14 ⊢ (𝑓 = (𝑒 ∩ 𝐴) → (𝑀‘(𝑓 ∩ 𝐵)) = (𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)))
55		difeq1 4066	. . . . . . . . . . . . . . 15 ⊢ (𝑓 = (𝑒 ∩ 𝐴) → (𝑓 ∖ 𝐵) = ((𝑒 ∩ 𝐴) ∖ 𝐵))
56	55	fveq2d 6877	. . . . . . . . . . . . . 14 ⊢ (𝑓 = (𝑒 ∩ 𝐴) → (𝑀‘(𝑓 ∖ 𝐵)) = (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)))
57	54, 56	oveq12d 7426	. . . . . . . . . . . . 13 ⊢ (𝑓 = (𝑒 ∩ 𝐴) → ((𝑀‘(𝑓 ∩ 𝐵)) +𝑒 (𝑀‘(𝑓 ∖ 𝐵))) = ((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵))))
58		fveq2 6873	. . . . . . . . . . . . 13 ⊢ (𝑓 = (𝑒 ∩ 𝐴) → (𝑀‘𝑓) = (𝑀‘(𝑒 ∩ 𝐴)))
59	57, 58	eqeq12d 2776	. . . . . . . . . . . 12 ⊢ (𝑓 = (𝑒 ∩ 𝐴) → (((𝑀‘(𝑓 ∩ 𝐵)) +𝑒 (𝑀‘(𝑓 ∖ 𝐵))) = (𝑀‘𝑓) ↔ ((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵))) = (𝑀‘(𝑒 ∩ 𝐴))))
60	59	adantl 487	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) ∧ 𝑓 = (𝑒 ∩ 𝐴)) → (((𝑀‘(𝑓 ∩ 𝐵)) +𝑒 (𝑀‘(𝑓 ∖ 𝐵))) = (𝑀‘𝑓) ↔ ((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵))) = (𝑀‘(𝑒 ∩ 𝐴))))
61	15, 60	rspcdv 3568	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (∀𝑓 ∈ 𝒫 𝑂((𝑀‘(𝑓 ∩ 𝐵)) +𝑒 (𝑀‘(𝑓 ∖ 𝐵))) = (𝑀‘𝑓) → ((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵))) = (𝑀‘(𝑒 ∩ 𝐴))))
62	52, 61	mpd 16	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵))) = (𝑀‘(𝑒 ∩ 𝐴)))
63	62	oveq1d 7423	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = ((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))))
64	15	elpwincl1 33055	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑒 ∩ 𝐴) ∩ 𝐵) ∈ 𝒫 𝑂)
65	10, 64	ffvelcdmd 7073	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) ∈ (0[,]+∞))
66		xrge0addass 33511	. . . . . . . . . 10 ⊢ (((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) ∈ (0[,]+∞) ∧ (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) ∈ (0[,]+∞) ∧ (𝑀‘(𝑒 ∖ 𝐴)) ∈ (0[,]+∞)) → (((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = ((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))))
67	65, 17, 20, 66	syl3anc 1398	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = ((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))))
68		inass 4172	. . . . . . . . . . 11 ⊢ ((𝑒 ∩ 𝐴) ∩ 𝐵) = (𝑒 ∩ (𝐴 ∩ 𝐵))
69	68	fveq2i 6876	. . . . . . . . . 10 ⊢ (𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) = (𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵)))
70	69	oveq1i 7418	. . . . . . . . 9 ⊢ ((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))) = ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))))
71	67, 70	eqtrdi 2811	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (((𝑀‘((𝑒 ∩ 𝐴) ∩ 𝐵)) +𝑒 (𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))))
72	5	simprd 501	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = (𝑀‘𝑒))
73	72	r19.21bi 3254	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∩ 𝐴)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴))) = (𝑀‘𝑒))
74	63, 71, 73	3eqtr3d 2803	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 ((𝑀‘((𝑒 ∩ 𝐴) ∖ 𝐵)) +𝑒 (𝑀‘(𝑒 ∖ 𝐴)))) = (𝑀‘𝑒))
75	47, 74	breqtrd 5130	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ (𝑀‘𝑒))
76		inundif 4434	. . . . . . . 8 ⊢ ((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ (𝑒 ∖ (𝐴 ∩ 𝐵))) = 𝑒
77	76	fveq2i 6876	. . . . . . 7 ⊢ (𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ (𝑒 ∖ (𝐴 ∩ 𝐵)))) = (𝑀‘𝑒)
78		uneq1 4107	. . . . . . . . . . . 12 ⊢ (𝑎 = (𝑒 ∩ (𝐴 ∩ 𝐵)) → (𝑎 ∪ 𝑏) = ((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ 𝑏))
79	78	fveq2d 6877	. . . . . . . . . . 11 ⊢ (𝑎 = (𝑒 ∩ (𝐴 ∩ 𝐵)) → (𝑀‘(𝑎 ∪ 𝑏)) = (𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ 𝑏)))
80		fveq2 6873	. . . . . . . . . . . 12 ⊢ (𝑎 = (𝑒 ∩ (𝐴 ∩ 𝐵)) → (𝑀‘𝑎) = (𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))))
81	80	oveq1d 7423	. . . . . . . . . . 11 ⊢ (𝑎 = (𝑒 ∩ (𝐴 ∩ 𝐵)) → ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)) = ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘𝑏)))
82	79, 81	breq12d 5115	. . . . . . . . . 10 ⊢ (𝑎 = (𝑒 ∩ (𝐴 ∩ 𝐵)) → ((𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)) ↔ (𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ 𝑏)) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘𝑏))))
83		uneq2 4108	. . . . . . . . . . . 12 ⊢ (𝑏 = (𝑒 ∖ (𝐴 ∩ 𝐵)) → ((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ 𝑏) = ((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ (𝑒 ∖ (𝐴 ∩ 𝐵))))
84	83	fveq2d 6877	. . . . . . . . . . 11 ⊢ (𝑏 = (𝑒 ∖ (𝐴 ∩ 𝐵)) → (𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ 𝑏)) = (𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ (𝑒 ∖ (𝐴 ∩ 𝐵)))))
85		fveq2 6873	. . . . . . . . . . . 12 ⊢ (𝑏 = (𝑒 ∖ (𝐴 ∩ 𝐵)) → (𝑀‘𝑏) = (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵))))
86	85	oveq2d 7424	. . . . . . . . . . 11 ⊢ (𝑏 = (𝑒 ∖ (𝐴 ∩ 𝐵)) → ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘𝑏)) = ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))))
87	84, 86	breq12d 5115	. . . . . . . . . 10 ⊢ (𝑏 = (𝑒 ∖ (𝐴 ∩ 𝐵)) → ((𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ 𝑏)) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘𝑏)) ↔ (𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ (𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵))))))
88	82, 87	rspc2v 3586	. . . . . . . . 9 ⊢ (((𝑒 ∩ (𝐴 ∩ 𝐵)) ∈ 𝒫 𝑂 ∧ (𝑒 ∖ (𝐴 ∩ 𝐵)) ∈ 𝒫 𝑂) → (∀𝑎 ∈ 𝒫 𝑂∀𝑏 ∈ 𝒫 𝑂(𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏)) → (𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ (𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵))))))
89	88	imp 412	. . . . . . . 8 ⊢ ((((𝑒 ∩ (𝐴 ∩ 𝐵)) ∈ 𝒫 𝑂 ∧ (𝑒 ∖ (𝐴 ∩ 𝐵)) ∈ 𝒫 𝑂) ∧ ∀𝑎 ∈ 𝒫 𝑂∀𝑏 ∈ 𝒫 𝑂(𝑀‘(𝑎 ∪ 𝑏)) ≤ ((𝑀‘𝑎) +𝑒 (𝑀‘𝑏))) → (𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ (𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))))
90	23, 12, 31, 89	syl21anc 851	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘((𝑒 ∩ (𝐴 ∩ 𝐵)) ∪ (𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))))
91	77, 90	eqbrtrrid 5140	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘𝑒) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))))
92	75, 91	jca 521	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ (𝑀‘𝑒) ∧ (𝑀‘𝑒) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵))))))
93	25, 14	xaddcld 13401	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) ∈ ℝ*)
94	3	ffvelcdmda 7072	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘𝑒) ∈ (0[,]+∞))
95	9, 94	sselid 3928	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (𝑀‘𝑒) ∈ ℝ*)
96		xrletri3 13253	. . . . . 6 ⊢ ((((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) ∈ ℝ* ∧ (𝑀‘𝑒) ∈ ℝ*) → (((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) = (𝑀‘𝑒) ↔ (((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ (𝑀‘𝑒) ∧ (𝑀‘𝑒) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))))))
97	93, 95, 96	syl2anc 596	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → (((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) = (𝑀‘𝑒) ↔ (((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) ≤ (𝑀‘𝑒) ∧ (𝑀‘𝑒) ≤ ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))))))
98	92, 97	mpbird 260	. . . 4 ⊢ ((𝜑 ∧ 𝑒 ∈ 𝒫 𝑂) → ((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) = (𝑀‘𝑒))
99	98	ralrimiva 3154	. . 3 ⊢ (𝜑 → ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) = (𝑀‘𝑒))
100	8, 99	jca 521	. 2 ⊢ (𝜑 → ((𝐴 ∩ 𝐵) ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) = (𝑀‘𝑒)))
101	2, 3	elcarsg 34872	. 2 ⊢ (𝜑 → ((𝐴 ∩ 𝐵) ∈ (toCaraSiga‘𝑀) ↔ ((𝐴 ∩ 𝐵) ⊆ 𝑂 ∧ ∀𝑒 ∈ 𝒫 𝑂((𝑀‘(𝑒 ∩ (𝐴 ∩ 𝐵))) +𝑒 (𝑀‘(𝑒 ∖ (𝐴 ∩ 𝐵)))) = (𝑀‘𝑒))))
102	100, 101	mpbird 260	1 ⊢ (𝜑 → (𝐴 ∩ 𝐵) ∈ (toCaraSiga‘𝑀))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145  ∀wral 3076   ∖ cdif 3895   ∪ cun 3896   ∩ cin 3897   ⊆ wss 3898  𝒫 cpw 4556   class class class wbr 5102  ⟶wf 6523  ‘cfv 6527  (class class class)co 7408  0cc0 11172  +∞cpnf 11312  ℝ^*cxr 11314   ≤ cle 11316   +_𝑒 cxad 13209  [,]cicc 13449  toCaraSigaccarsg 34868

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 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7734  ax-cnex 11228  ax-resscn 11229  ax-1cn 11230  ax-icn 11231  ax-addcl 11232  ax-addrcl 11233  ax-mulcl 11234  ax-mulrcl 11235  ax-mulcom 11236  ax-addass 11237  ax-mulass 11238  ax-distr 11239  ax-i2m1 11240  ax-1ne0 11241  ax-1rid 11242  ax-rnegex 11243  ax-rrecex 11244  ax-cnre 11245  ax-pre-lttri 11246  ax-pre-lttrn 11247  ax-pre-ltadd 11248

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-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-id 5542  df-po 5555  df-so 5556  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-iota 6483  df-fun 6529  df-fn 6530  df-f 6531  df-f1 6532  df-fo 6533  df-f1o 6534  df-fv 6535  df-ov 7411  df-oprab 7412  df-mpo 7413  df-1st 7984  df-2nd 7985  df-er 8695  df-en 8952  df-dom 8953  df-sdom 8954  df-pnf 11317  df-mnf 11318  df-xr 11319  df-ltxr 11320  df-le 11321  df-xadd 13212  df-icc 13453  df-carsg 34869

This theorem is used by:  unelcarsg  34879  difelcarsg2  34880