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