Metamath Proof Explorer


Theorem caragenuncllem

Description: The Caratheodory's construction is closed under the union. Step (c) in the proof of Theorem 113C of Fremlin1 p. 20. (Contributed by Glauco Siliprandi, 17-Aug-2020)

Ref Expression
Hypotheses caragenuncllem.o φ O OutMeas
caragenuncllem.s S = CaraGen O
caragenuncllem.e φ E S
caragenuncllem.f φ F S
caragenuncllem.x X = dom O
caragenuncllem.a φ A X
Assertion caragenuncllem φ O A E F + 𝑒 O A E F = O A

Proof

Step Hyp Ref Expression
1 caragenuncllem.o φ O OutMeas
2 caragenuncllem.s S = CaraGen O
3 caragenuncllem.e φ E S
4 caragenuncllem.f φ F S
5 caragenuncllem.x X = dom O
6 caragenuncllem.a φ A X
7 6 ssinss1d φ A E F X
8 1 2 5 3 7 caragensplit φ O A E F E + 𝑒 O A E F E = O A E F
9 8 eqcomd φ O A E F = O A E F E + 𝑒 O A E F E
10 inass A E F E = A E F E
11 incom E F E = E E F
12 inabs E E F = E
13 11 12 eqtri E F E = E
14 13 ineq2i A E F E = A E
15 10 14 eqtri A E F E = A E
16 15 fveq2i O A E F E = O A E
17 incom A E F = F A E
18 indifcom F A E = A F E
19 17 18 eqtr2i A F E = A E F
20 19 eqcomi A E F = A F E
21 difundir E F E = E E F E
22 difid E E =
23 22 uneq1i E E F E = F E
24 0un F E = F E
25 21 23 24 3eqtrri F E = E F E
26 25 ineq2i A F E = A E F E
27 indif2 A E F E = A E F E
28 20 26 27 3eqtrri A E F E = A E F
29 28 fveq2i O A E F E = O A E F
30 16 29 oveq12i O A E F E + 𝑒 O A E F E = O A E + 𝑒 O A E F
31 30 a1i φ O A E F E + 𝑒 O A E F E = O A E + 𝑒 O A E F
32 eqidd φ O A E + 𝑒 O A E F = O A E + 𝑒 O A E F
33 9 31 32 3eqtrd φ O A E F = O A E + 𝑒 O A E F
34 difun1 A E F = A E F
35 34 fveq2i O A E F = O A E F
36 35 a1i φ O A E F = O A E F
37 33 36 oveq12d φ O A E F + 𝑒 O A E F = O A E + 𝑒 O A E F + 𝑒 O A E F
38 6 ssinss1d φ A E X
39 1 5 38 omexrcl φ O A E *
40 1 5 38 omecl φ O A E 0 +∞
41 40 xrge0nemnfd φ O A E −∞
42 39 41 jca φ O A E * O A E −∞
43 1 2 4 5 caragenelss φ F X
44 43 ssinss2d φ A E F X
45 1 5 44 omexrcl φ O A E F *
46 1 5 44 omecl φ O A E F 0 +∞
47 46 xrge0nemnfd φ O A E F −∞
48 45 47 jca φ O A E F * O A E F −∞
49 6 ssdifssd φ A E X
50 49 ssdifssd φ A E F X
51 1 5 50 omexrcl φ O A E F *
52 1 5 50 omecl φ O A E F 0 +∞
53 52 xrge0nemnfd φ O A E F −∞
54 51 53 jca φ O A E F * O A E F −∞
55 xaddass O A E * O A E −∞ O A E F * O A E F −∞ O A E F * O A E F −∞ O A E + 𝑒 O A E F + 𝑒 O A E F = O A E + 𝑒 O A E F + 𝑒 O A E F
56 42 48 54 55 syl3anc φ O A E + 𝑒 O A E F + 𝑒 O A E F = O A E + 𝑒 O A E F + 𝑒 O A E F
57 1 2 5 4 49 caragensplit φ O A E F + 𝑒 O A E F = O A E
58 57 oveq2d φ O A E + 𝑒 O A E F + 𝑒 O A E F = O A E + 𝑒 O A E
59 1 2 5 3 6 caragensplit φ O A E + 𝑒 O A E = O A
60 58 59 eqtrd φ O A E + 𝑒 O A E F + 𝑒 O A E F = O A
61 37 56 60 3eqtrd φ O A E F + 𝑒 O A E F = O A