Metamath Proof Explorer


Theorem omlspjN

Description: Contraction of a Sasaki projection. (Contributed by NM, 6-Dec-2013) (New usage is discouraged.)

Ref Expression
Hypotheses omlspj.b ⊢ B = Base K
omlspj.l ⊢ ≤ ˙ = ≤ K
omlspj.j ⊢ ∨ ˙ = join ⁡ K
omlspj.m ⊢ ∧ ˙ = meet ⁡ K
omlspj.o ⊢ ⊥ ˙ = oc ⁡ K
Assertion omlspjN ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → X ∨ ˙ ⊥ ˙ ⁡ Y ∧ ˙ Y = X

Proof

Step Hyp Ref Expression
1 omlspj.b ⊢ B = Base K
2 omlspj.l ⊢ ≤ ˙ = ≤ K
3 omlspj.j ⊢ ∨ ˙ = join ⁡ K
4 omlspj.m ⊢ ∧ ˙ = meet ⁡ K
5 omlspj.o ⊢ ⊥ ˙ = oc ⁡ K
6 omllat ⊢ K ∈ OML → K ∈ Lat
7 6 3ad2ant1 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → K ∈ Lat
8 omlop ⊢ K ∈ OML → K ∈ OP
9 8 3ad2ant1 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → K ∈ OP
10 simp2r ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → Y ∈ B
11 1 5 opoccl ⊢ K ∈ OP ∧ Y ∈ B → ⊥ ˙ ⁡ Y ∈ B
12 9 10 11 syl2anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → ⊥ ˙ ⁡ Y ∈ B
13 1 4 latmcom ⊢ K ∈ Lat ∧ ⊥ ˙ ⁡ Y ∈ B ∧ Y ∈ B → ⊥ ˙ ⁡ Y ∧ ˙ Y = Y ∧ ˙ ⊥ ˙ ⁡ Y
14 7 12 10 13 syl3anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → ⊥ ˙ ⁡ Y ∧ ˙ Y = Y ∧ ˙ ⊥ ˙ ⁡ Y
15 eqid ⊢ 0. ⁡ K = 0. ⁡ K
16 1 5 4 15 opnoncon ⊢ K ∈ OP ∧ Y ∈ B → Y ∧ ˙ ⊥ ˙ ⁡ Y = 0. ⁡ K
17 9 10 16 syl2anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → Y ∧ ˙ ⊥ ˙ ⁡ Y = 0. ⁡ K
18 14 17 eqtrd ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → ⊥ ˙ ⁡ Y ∧ ˙ Y = 0. ⁡ K
19 18 oveq2d ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → X ∨ ˙ ⊥ ˙ ⁡ Y ∧ ˙ Y = X ∨ ˙ 0. ⁡ K
20 simp1 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → K ∈ OML
21 simp2l ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → X ∈ B
22 simp3 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → X ≤ ˙ Y
23 eqid ⊢ cm ⁡ K = cm ⁡ K
24 1 23 cmtidN ⊢ K ∈ OML ∧ Y ∈ B → Y cm ⁡ K Y
25 20 10 24 syl2anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → Y cm ⁡ K Y
26 1 5 23 cmt3N ⊢ K ∈ OML ∧ Y ∈ B ∧ Y ∈ B → Y cm ⁡ K Y ↔ ⊥ ˙ ⁡ Y cm ⁡ K Y
27 20 10 10 26 syl3anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → Y cm ⁡ K Y ↔ ⊥ ˙ ⁡ Y cm ⁡ K Y
28 25 27 mpbid ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → ⊥ ˙ ⁡ Y cm ⁡ K Y
29 1 2 3 4 23 omlmod1i2N ⊢ K ∈ OML ∧ X ∈ B ∧ ⊥ ˙ ⁡ Y ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y ∧ ⊥ ˙ ⁡ Y cm ⁡ K Y → X ∨ ˙ ⊥ ˙ ⁡ Y ∧ ˙ Y = X ∨ ˙ ⊥ ˙ ⁡ Y ∧ ˙ Y
30 20 21 12 10 22 28 29 syl132anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → X ∨ ˙ ⊥ ˙ ⁡ Y ∧ ˙ Y = X ∨ ˙ ⊥ ˙ ⁡ Y ∧ ˙ Y
31 omlol ⊢ K ∈ OML → K ∈ OL
32 31 3ad2ant1 ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → K ∈ OL
33 1 3 15 olj01 ⊢ K ∈ OL ∧ X ∈ B → X ∨ ˙ 0. ⁡ K = X
34 32 21 33 syl2anc ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → X ∨ ˙ 0. ⁡ K = X
35 19 30 34 3eqtr3d ⊢ K ∈ OML ∧ X ∈ B ∧ Y ∈ B ∧ X ≤ ˙ Y → X ∨ ˙ ⊥ ˙ ⁡ Y ∧ ˙ Y = X