Metamath Proof Explorer


Theorem oldmm1

Description: De Morgan's law for meet in an ortholattice. ( chdmm1 analog.) (Contributed by NM, 6-Nov-2011)

Ref Expression
Hypotheses oldmm1.b ⊢ B = Base K
oldmm1.j ⊢ ∨ ˙ = join ⁡ K
oldmm1.m ⊢ ∧ ˙ = meet ⁡ K
oldmm1.o ⊢ ⊥ ˙ = oc ⁡ K
Assertion oldmm1 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∧ ˙ Y = ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y

Proof

Step Hyp Ref Expression
1 oldmm1.b ⊢ B = Base K
2 oldmm1.j ⊢ ∨ ˙ = join ⁡ K
3 oldmm1.m ⊢ ∧ ˙ = meet ⁡ K
4 oldmm1.o ⊢ ⊥ ˙ = oc ⁡ K
5 eqid ⊢ ≤ K = ≤ K
6 ollat ⊢ K ∈ OL → K ∈ Lat
7 6 3ad2ant1 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → K ∈ Lat
8 olop ⊢ K ∈ OL → K ∈ OP
9 8 3ad2ant1 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → K ∈ OP
10 1 3 latmcl ⊢ K ∈ Lat ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ∈ B
11 6 10 syl3an1 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ∈ B
12 1 4 opoccl ⊢ K ∈ OP ∧ X ∧ ˙ Y ∈ B → ⊥ ˙ ⁡ X ∧ ˙ Y ∈ B
13 9 11 12 syl2anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∧ ˙ Y ∈ B
14 1 4 opoccl ⊢ K ∈ OP ∧ X ∈ B → ⊥ ˙ ⁡ X ∈ B
15 8 14 sylan ⊢ K ∈ OL ∧ X ∈ B → ⊥ ˙ ⁡ X ∈ B
16 15 3adant3 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∈ B
17 1 4 opoccl ⊢ K ∈ OP ∧ Y ∈ B → ⊥ ˙ ⁡ Y ∈ B
18 8 17 sylan ⊢ K ∈ OL ∧ Y ∈ B → ⊥ ˙ ⁡ Y ∈ B
19 18 3adant2 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ Y ∈ B
20 1 2 latjcl ⊢ K ∈ Lat ∧ ⊥ ˙ ⁡ X ∈ B ∧ ⊥ ˙ ⁡ Y ∈ B → ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ∈ B
21 7 16 19 20 syl3anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ∈ B
22 1 5 2 latlej1 ⊢ K ∈ Lat ∧ ⊥ ˙ ⁡ X ∈ B ∧ ⊥ ˙ ⁡ Y ∈ B → ⊥ ˙ ⁡ X ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y
23 7 16 19 22 syl3anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y
24 simp2 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → X ∈ B
25 1 5 4 oplecon1b ⊢ K ∈ OP ∧ X ∈ B ∧ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ∈ B → ⊥ ˙ ⁡ X ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ↔ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X
26 9 24 21 25 syl3anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ↔ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X
27 23 26 mpbid ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X
28 1 5 2 latlej2 ⊢ K ∈ Lat ∧ ⊥ ˙ ⁡ X ∈ B ∧ ⊥ ˙ ⁡ Y ∈ B → ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y
29 7 16 19 28 syl3anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y
30 simp3 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → Y ∈ B
31 1 5 4 oplecon1b ⊢ K ∈ OP ∧ Y ∈ B ∧ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ∈ B → ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ↔ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K Y
32 9 30 21 31 syl3anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ↔ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K Y
33 29 32 mpbid ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K Y
34 1 4 opoccl ⊢ K ∈ OP ∧ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ∈ B
35 9 21 34 syl2anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ∈ B
36 1 5 3 latlem12 ⊢ K ∈ Lat ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ∈ B ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K Y ↔ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X ∧ ˙ Y
37 7 35 24 30 36 syl13anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X ∧ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K Y ↔ ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X ∧ ˙ Y
38 27 33 37 mpbi2and ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X ∧ ˙ Y
39 1 5 4 oplecon1b ⊢ K ∈ OP ∧ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ∈ B ∧ X ∧ ˙ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X ∧ ˙ Y ↔ ⊥ ˙ ⁡ X ∧ ˙ Y ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y
40 9 21 11 39 syl3anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K X ∧ ˙ Y ↔ ⊥ ˙ ⁡ X ∧ ˙ Y ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y
41 38 40 mpbid ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∧ ˙ Y ≤ K ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y
42 1 5 3 latmle1 ⊢ K ∈ Lat ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ K X
43 6 42 syl3an1 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ K X
44 1 5 4 oplecon3b ⊢ K ∈ OP ∧ X ∧ ˙ Y ∈ B ∧ X ∈ B → X ∧ ˙ Y ≤ K X ↔ ⊥ ˙ ⁡ X ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y
45 9 11 24 44 syl3anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ K X ↔ ⊥ ˙ ⁡ X ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y
46 43 45 mpbid ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y
47 1 5 3 latmle2 ⊢ K ∈ Lat ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ K Y
48 6 47 syl3an1 ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ K Y
49 1 5 4 oplecon3b ⊢ K ∈ OP ∧ X ∧ ˙ Y ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ K Y ↔ ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y
50 9 11 30 49 syl3anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ≤ K Y ↔ ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y
51 48 50 mpbid ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y
52 1 5 2 latjle12 ⊢ K ∈ Lat ∧ ⊥ ˙ ⁡ X ∈ B ∧ ⊥ ˙ ⁡ Y ∈ B ∧ ⊥ ˙ ⁡ X ∧ ˙ Y ∈ B → ⊥ ˙ ⁡ X ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y ∧ ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y ↔ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y
53 7 16 19 13 52 syl13anc ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y ∧ ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y ↔ ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y
54 46 51 53 mpbi2and ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y ≤ K ⊥ ˙ ⁡ X ∧ ˙ Y
55 1 5 7 13 21 41 54 latasymd ⊢ K ∈ OL ∧ X ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ X ∧ ˙ Y = ⊥ ˙ ⁡ X ∨ ˙ ⊥ ˙ ⁡ Y