Metamath Proof Explorer


Theorem aean

Description: A conjunction holds almost everywhere if and only if both its terms do. (Contributed by Thierry Arnoux, 20-Oct-2017)

Ref Expression
Hypothesis aean.1 domM=O
Assertion aean MranmeasuresxO|¬φdomMxO|¬ψdomMxO|φψM-ae.xO|φM-ae.xO|ψM-ae.

Proof

Step Hyp Ref Expression
1 aean.1 domM=O
2 unrab xO|¬φxO|¬ψ=xO|¬φ¬ψ
3 ianor ¬φψ¬φ¬ψ
4 3 rabbii xO|¬φψ=xO|¬φ¬ψ
5 2 4 eqtr4i xO|¬φxO|¬ψ=xO|¬φψ
6 5 fveq2i MxO|¬φxO|¬ψ=MxO|¬φψ
7 6 eqeq1i MxO|¬φxO|¬ψ=0MxO|¬φψ=0
8 measbasedom MranmeasuresMmeasuresdomM
9 8 biimpi MranmeasuresMmeasuresdomM
10 9 3ad2ant1 MranmeasuresxO|¬φdomMxO|¬ψdomMMmeasuresdomM
11 10 adantr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MmeasuresdomM
12 simp2 MranmeasuresxO|¬φdomMxO|¬ψdomMxO|¬φdomM
13 12 adantr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0xO|¬φdomM
14 dmmeas MranmeasuresdomMransigAlgebra
15 unelsiga domMransigAlgebraxO|¬φdomMxO|¬ψdomMxO|¬φxO|¬ψdomM
16 14 15 syl3an1 MranmeasuresxO|¬φdomMxO|¬ψdomMxO|¬φxO|¬ψdomM
17 ssun1 xO|¬φxO|¬φxO|¬ψ
18 17 a1i MranmeasuresxO|¬φdomMxO|¬ψdomMxO|¬φxO|¬φxO|¬ψ
19 10 12 16 18 measssd MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φMxO|¬φxO|¬ψ
20 19 adantr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MxO|¬φMxO|¬φxO|¬ψ
21 simpr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MxO|¬φxO|¬ψ=0
22 20 21 breqtrd MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MxO|¬φ0
23 measle0 MmeasuresdomMxO|¬φdomMMxO|¬φ0MxO|¬φ=0
24 11 13 22 23 syl3anc MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MxO|¬φ=0
25 simp3 MranmeasuresxO|¬φdomMxO|¬ψdomMxO|¬ψdomM
26 25 adantr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0xO|¬ψdomM
27 ssun2 xO|¬ψxO|¬φxO|¬ψ
28 27 a1i MranmeasuresxO|¬φdomMxO|¬ψdomMxO|¬ψxO|¬φxO|¬ψ
29 10 25 16 28 measssd MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬ψMxO|¬φxO|¬ψ
30 29 adantr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MxO|¬ψMxO|¬φxO|¬ψ
31 30 21 breqtrd MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MxO|¬ψ0
32 measle0 MmeasuresdomMxO|¬ψdomMMxO|¬ψ0MxO|¬ψ=0
33 11 26 31 32 syl3anc MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MxO|¬ψ=0
34 24 33 jca MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MxO|¬φ=0MxO|¬ψ=0
35 10 adantr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0MmeasuresdomM
36 measbase MmeasuresdomMdomMransigAlgebra
37 35 36 syl MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0domMransigAlgebra
38 12 adantr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0xO|¬φdomM
39 25 adantr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0xO|¬ψdomM
40 37 38 39 15 syl3anc MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0xO|¬φxO|¬ψdomM
41 35 38 39 measunl MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0MxO|¬φxO|¬ψMxO|¬φ+𝑒MxO|¬ψ
42 simprl MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0MxO|¬φ=0
43 simprr MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0MxO|¬ψ=0
44 42 43 oveq12d MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0MxO|¬φ+𝑒MxO|¬ψ=0+𝑒0
45 0xr 0*
46 xaddrid 0*0+𝑒0=0
47 45 46 ax-mp 0+𝑒0=0
48 44 47 eqtrdi MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0MxO|¬φ+𝑒MxO|¬ψ=0
49 41 48 breqtrd MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0MxO|¬φxO|¬ψ0
50 measle0 MmeasuresdomMxO|¬φxO|¬ψdomMMxO|¬φxO|¬ψ0MxO|¬φxO|¬ψ=0
51 35 40 49 50 syl3anc MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φ=0MxO|¬ψ=0MxO|¬φxO|¬ψ=0
52 34 51 impbida MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φxO|¬ψ=0MxO|¬φ=0MxO|¬ψ=0
53 7 52 bitr3id MranmeasuresxO|¬φdomMxO|¬ψdomMMxO|¬φψ=0MxO|¬φ=0MxO|¬ψ=0
54 1 braew MranmeasuresxO|φψM-ae.MxO|¬φψ=0
55 54 3ad2ant1 MranmeasuresxO|¬φdomMxO|¬ψdomMxO|φψM-ae.MxO|¬φψ=0
56 1 braew MranmeasuresxO|φM-ae.MxO|¬φ=0
57 1 braew MranmeasuresxO|ψM-ae.MxO|¬ψ=0
58 56 57 anbi12d MranmeasuresxO|φM-ae.xO|ψM-ae.MxO|¬φ=0MxO|¬ψ=0
59 58 3ad2ant1 MranmeasuresxO|¬φdomMxO|¬ψdomMxO|φM-ae.xO|ψM-ae.MxO|¬φ=0MxO|¬ψ=0
60 53 55 59 3bitr4d MranmeasuresxO|¬φdomMxO|¬ψdomMxO|φψM-ae.xO|φM-ae.xO|ψM-ae.