Metamath Proof Explorer


Theorem dmdmd

Description: The dual modular pair property expressed in terms of the modular pair property, that hold in Hilbert lattices. Remark 29.6 of MaedaMaeda p. 130. (Contributed by NM, 27-Apr-2006) (New usage is discouraged.)

Ref Expression
Assertion dmdmd ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → A 𝑀 ℋ * B ↔ ⊥ ⁡ A 𝑀 ℋ ⊥ ⁡ B

Proof

Step Hyp Ref Expression
1 sseq1 ⊢ y = ⊥ ⁡ x → y ⊆ ⊥ ⁡ B ↔ ⊥ ⁡ x ⊆ ⊥ ⁡ B
2 oveq1 ⊢ y = ⊥ ⁡ x → y ∨ ℋ ⊥ ⁡ A = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A
3 2 ineq1d ⊢ y = ⊥ ⁡ x → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
4 oveq1 ⊢ y = ⊥ ⁡ x → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
5 3 4 eqeq12d ⊢ y = ⊥ ⁡ x → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B ↔ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
6 1 5 imbi12d ⊢ y = ⊥ ⁡ x → y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B ↔ ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
7 6 rspccv ⊢ ∀ y ∈ C ℋ y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → ⊥ ⁡ x ∈ C ℋ → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
8 choccl ⊢ x ∈ C ℋ → ⊥ ⁡ x ∈ C ℋ
9 8 imim1i ⊢ ⊥ ⁡ x ∈ C ℋ → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → x ∈ C ℋ → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
10 9 com12 ⊢ x ∈ C ℋ → ⊥ ⁡ x ∈ C ℋ → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
11 10 adantl ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ x ∈ C ℋ → ⊥ ⁡ x ∈ C ℋ → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
12 chsscon3 ⊢ B ∈ C ℋ ∧ x ∈ C ℋ → B ⊆ x ↔ ⊥ ⁡ x ⊆ ⊥ ⁡ B
13 12 biimpd ⊢ B ∈ C ℋ ∧ x ∈ C ℋ → B ⊆ x → ⊥ ⁡ x ⊆ ⊥ ⁡ B
14 13 adantll ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ x ∈ C ℋ → B ⊆ x → ⊥ ⁡ x ⊆ ⊥ ⁡ B
15 fveq2 ⊢ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
16 choccl ⊢ A ∈ C ℋ → ⊥ ⁡ A ∈ C ℋ
17 chjcl ⊢ ⊥ ⁡ x ∈ C ℋ ∧ ⊥ ⁡ A ∈ C ℋ → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∈ C ℋ
18 8 16 17 syl2an ⊢ x ∈ C ℋ ∧ A ∈ C ℋ → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∈ C ℋ
19 chdmm3 ⊢ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∨ ℋ B
20 18 19 sylan ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∨ ℋ B
21 chdmj4 ⊢ x ∈ C ℋ ∧ A ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A = x ∩ A
22 21 adantr ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A = x ∩ A
23 22 oveq1d ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∨ ℋ B = x ∩ A ∨ ℋ B
24 20 23 eqtrd ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = x ∩ A ∨ ℋ B
25 24 anasss ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = x ∩ A ∨ ℋ B
26 choccl ⊢ B ∈ C ℋ → ⊥ ⁡ B ∈ C ℋ
27 chincl ⊢ ⊥ ⁡ A ∈ C ℋ ∧ ⊥ ⁡ B ∈ C ℋ → ⊥ ⁡ A ∩ ⊥ ⁡ B ∈ C ℋ
28 16 26 27 syl2an ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ A ∩ ⊥ ⁡ B ∈ C ℋ
29 chdmj2 ⊢ x ∈ C ℋ ∧ ⊥ ⁡ A ∩ ⊥ ⁡ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = x ∩ ⊥ ⁡ ⊥ ⁡ A ∩ ⊥ ⁡ B
30 28 29 sylan2 ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = x ∩ ⊥ ⁡ ⊥ ⁡ A ∩ ⊥ ⁡ B
31 chdmm4 ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ A ∩ ⊥ ⁡ B = A ∨ ℋ B
32 31 adantl ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ A ∩ ⊥ ⁡ B = A ∨ ℋ B
33 32 ineq2d ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → x ∩ ⊥ ⁡ ⊥ ⁡ A ∩ ⊥ ⁡ B = x ∩ A ∨ ℋ B
34 30 33 eqtrd ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = x ∩ A ∨ ℋ B
35 25 34 eqeq12d ⊢ x ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B ↔ x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
36 35 ancoms ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ x ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B ↔ x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
37 15 36 imbitrid ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ x ∈ C ℋ → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
38 14 37 imim12d ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ x ∈ C ℋ → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
39 11 38 syld ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ x ∈ C ℋ → ⊥ ⁡ x ∈ C ℋ → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
40 39 ex ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → x ∈ C ℋ → ⊥ ⁡ x ∈ C ℋ → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
41 40 com23 ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ x ∈ C ℋ → ⊥ ⁡ x ⊆ ⊥ ⁡ B → ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = ⊥ ⁡ x ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → x ∈ C ℋ → B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
42 7 41 syl5 ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ∀ y ∈ C ℋ y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → x ∈ C ℋ → B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
43 42 ralrimdv ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ∀ y ∈ C ℋ y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B → ∀ x ∈ C ℋ B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
44 sseq2 ⊢ x = ⊥ ⁡ y → B ⊆ x ↔ B ⊆ ⊥ ⁡ y
45 ineq1 ⊢ x = ⊥ ⁡ y → x ∩ A = ⊥ ⁡ y ∩ A
46 45 oveq1d ⊢ x = ⊥ ⁡ y → x ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B
47 ineq1 ⊢ x = ⊥ ⁡ y → x ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B
48 46 47 eqeq12d ⊢ x = ⊥ ⁡ y → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B ↔ ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B
49 44 48 imbi12d ⊢ x = ⊥ ⁡ y → B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B ↔ B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B
50 49 rspccv ⊢ ∀ x ∈ C ℋ B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B → ⊥ ⁡ y ∈ C ℋ → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B
51 choccl ⊢ y ∈ C ℋ → ⊥ ⁡ y ∈ C ℋ
52 51 imim1i ⊢ ⊥ ⁡ y ∈ C ℋ → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B → y ∈ C ℋ → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B
53 52 com12 ⊢ y ∈ C ℋ → ⊥ ⁡ y ∈ C ℋ → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B
54 53 adantl ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ y ∈ C ℋ → ⊥ ⁡ y ∈ C ℋ → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B
55 chsscon2 ⊢ B ∈ C ℋ ∧ y ∈ C ℋ → B ⊆ ⊥ ⁡ y ↔ y ⊆ ⊥ ⁡ B
56 55 biimprd ⊢ B ∈ C ℋ ∧ y ∈ C ℋ → y ⊆ ⊥ ⁡ B → B ⊆ ⊥ ⁡ y
57 56 adantll ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ y ∈ C ℋ → y ⊆ ⊥ ⁡ B → B ⊆ ⊥ ⁡ y
58 fveq2 ⊢ ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B
59 chincl ⊢ ⊥ ⁡ y ∈ C ℋ ∧ A ∈ C ℋ → ⊥ ⁡ y ∩ A ∈ C ℋ
60 51 59 sylan ⊢ y ∈ C ℋ ∧ A ∈ C ℋ → ⊥ ⁡ y ∩ A ∈ C ℋ
61 chdmj1 ⊢ ⊥ ⁡ y ∩ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ ⊥ ⁡ y ∩ A ∩ ⊥ ⁡ B
62 60 61 sylan ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ ⊥ ⁡ y ∩ A ∩ ⊥ ⁡ B
63 chdmm2 ⊢ y ∈ C ℋ ∧ A ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A = y ∨ ℋ ⊥ ⁡ A
64 63 adantr ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A = y ∨ ℋ ⊥ ⁡ A
65 64 ineq1d ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
66 62 65 eqtrd ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
67 66 anasss ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
68 chjcl ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → A ∨ ℋ B ∈ C ℋ
69 chdmm2 ⊢ y ∈ C ℋ ∧ A ∨ ℋ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = y ∨ ℋ ⊥ ⁡ A ∨ ℋ B
70 68 69 sylan2 ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = y ∨ ℋ ⊥ ⁡ A ∨ ℋ B
71 chdmj1 ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ A ∨ ℋ B = ⊥ ⁡ A ∩ ⊥ ⁡ B
72 71 adantl ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ A ∨ ℋ B = ⊥ ⁡ A ∩ ⊥ ⁡ B
73 72 oveq2d ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → y ∨ ℋ ⊥ ⁡ A ∨ ℋ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
74 70 73 eqtrd ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
75 67 74 eqeq12d ⊢ y ∈ C ℋ ∧ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B ↔ y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
76 75 ancoms ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ y ∈ C ℋ → ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ ⊥ ⁡ y ∩ A ∨ ℋ B ↔ y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
77 58 76 imbitrid ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ y ∈ C ℋ → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
78 57 77 imim12d ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ y ∈ C ℋ → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B → y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
79 54 78 syld ⊢ A ∈ C ℋ ∧ B ∈ C ℋ ∧ y ∈ C ℋ → ⊥ ⁡ y ∈ C ℋ → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B → y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
80 79 ex ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → y ∈ C ℋ → ⊥ ⁡ y ∈ C ℋ → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B → y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
81 80 com23 ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ y ∈ C ℋ → B ⊆ ⊥ ⁡ y → ⊥ ⁡ y ∩ A ∨ ℋ B = ⊥ ⁡ y ∩ A ∨ ℋ B → y ∈ C ℋ → y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
82 50 81 syl5 ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ∀ x ∈ C ℋ B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B → y ∈ C ℋ → y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
83 82 ralrimdv ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ∀ x ∈ C ℋ B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B → ∀ y ∈ C ℋ y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
84 43 83 impbid ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ∀ y ∈ C ℋ y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B ↔ ∀ x ∈ C ℋ B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
85 mdbr ⊢ ⊥ ⁡ A ∈ C ℋ ∧ ⊥ ⁡ B ∈ C ℋ → ⊥ ⁡ A 𝑀 ℋ ⊥ ⁡ B ↔ ∀ y ∈ C ℋ y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
86 16 26 85 syl2an ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → ⊥ ⁡ A 𝑀 ℋ ⊥ ⁡ B ↔ ∀ y ∈ C ℋ y ⊆ ⊥ ⁡ B → y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B = y ∨ ℋ ⊥ ⁡ A ∩ ⊥ ⁡ B
87 dmdbr ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → A 𝑀 ℋ * B ↔ ∀ x ∈ C ℋ B ⊆ x → x ∩ A ∨ ℋ B = x ∩ A ∨ ℋ B
88 84 86 87 3bitr4rd ⊢ A ∈ C ℋ ∧ B ∈ C ℋ → A 𝑀 ℋ * B ↔ ⊥ ⁡ A 𝑀 ℋ ⊥ ⁡ B