Theorem cdlemk5u 34473

Description: Part of proof of Lemma K of [Crawley] p. 118. (Contributed by NM, 4-Jul-2013.)

Hypotheses

Ref	Expression
cdlemk1.b	|- B = ( Base ` K )
cdlemk1.l	|- .<_ = ( le ` K )
cdlemk1.j	|- .\/ = ( join ` K )
cdlemk1.m	|- ./\ = ( meet ` K )
cdlemk1.a	|- A = ( Atoms ` K )
cdlemk1.h	|- H = ( LHyp ` K )
cdlemk1.t	|- T = ( ( LTrn ` K ) ` W )
cdlemk1.r	|- R = ( ( trL ` K ) ` W )
cdlemk1.s	|- S = ( f e. T |-> ( iota_ i e. T ( i ` P ) = ( ( P .\/ ( R ` f ) ) ./\ ( ( N ` P ) .\/ ( R ` ( f o. `' F ) ) ) ) ) )
cdlemk1.o	|- O = ( S ` D )

Assertion

Ref

Expression

cdlemk5u

|- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( P .\/ ( O ` P ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) .<_ ( ( X ` P ) .\/ ( R ` ( X o. `' D ) ) ) )

Distinct variable groups:   f, i, ./\   .<_ , i   .\/ , f, i   A, i   D, f, i   f, F, i   i, H   i, K   f, N, i   P, f, i   R, f, i   T, f, i   f, W, i

Allowed substitution hints:   A( f)   B( f, i)   S( f, i)   G( f, i)   H( f)   K( f)   .<_ ( f)   O( f, i)   X( f, i)

Proof of Theorem cdlemk5u

Step	Hyp	Ref	Expression
1		cdlemk1.b	. 2 |- B = ( Base ` K )
2		cdlemk1.l	. 2 |- .<_ = ( le ` K )
3		simp11l 1125	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> K e. HL )
4		hllat 32974	. . 3 |- ( K e. HL -> K e. Lat )
5	3, 4	syl 17	. 2 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> K e. Lat )
6		simp22l 1133	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> P e. A )
7		simp1 1014	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) )
8		simp211 1152	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> N e. T )
9		simp22 1048	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( P e. A /\ -. P .<_ W ) )
10		simp23 1049	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( R ` F ) = ( R ` N ) )
11	8, 9, 10	3jca 1194	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( N e. T /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) )
12		simp3l1 1119	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> F =/= ( _I |` B ) )
13		simp3l2 1120	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> D =/= ( _I |` B ) )
14		simp3r1 1122	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( R ` D ) =/= ( R ` F ) )
15	12, 13, 14	3jca 1194	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ ( R ` D ) =/= ( R ` F ) ) )
16		cdlemk1.j	. . . . . . 7 |- .\/ = ( join ` K )
17		cdlemk1.m	. . . . . . 7 |- ./\ = ( meet ` K )
18		cdlemk1.a	. . . . . . 7 |- A = ( Atoms ` K )
19		cdlemk1.h	. . . . . . 7 |- H = ( LHyp ` K )
20		cdlemk1.t	. . . . . . 7 |- T = ( ( LTrn ` K ) ` W )
21		cdlemk1.r	. . . . . . 7 |- R = ( ( trL ` K ) ` W )
22		cdlemk1.s	. . . . . . 7 |- S = ( f e. T |-> ( iota_ i e. T ( i ` P ) = ( ( P .\/ ( R ` f ) ) ./\ ( ( N ` P ) .\/ ( R ` ( f o. `' F ) ) ) ) ) )
23		cdlemk1.o	. . . . . . 7 |- O = ( S ` D )
24	1, 2, 16, 17, 18, 19, 20, 21, 22, 23	cdlemkoatnle 34463	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( N e. T /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ ( R ` D ) =/= ( R ` F ) ) ) -> ( ( O ` P ) e. A /\ -. ( O ` P ) .<_ W ) )
25	24	simpld 465	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( N e. T /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ ( R ` D ) =/= ( R ` F ) ) ) -> ( O ` P ) e. A )
26	7, 11, 15, 25	syl3anc 1276	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( O ` P ) e. A )
27	1, 16, 18	hlatjcl 32977	. . . 4 |- ( ( K e. HL /\ P e. A /\ ( O ` P ) e. A ) -> ( P .\/ ( O ` P ) ) e. B )
28	3, 6, 26, 27	syl3anc 1276	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( P .\/ ( O ` P ) ) e. B )
29		simp11 1044	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( K e. HL /\ W e. H ) )
30		simp212 1153	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> G e. T )
31	2, 18, 19, 20	ltrnat 33750	. . . . 5 |- ( ( ( K e. HL /\ W e. H ) /\ G e. T /\ P e. A ) -> ( G ` P ) e. A )
32	29, 30, 6, 31	syl3anc 1276	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( G ` P ) e. A )
33		simp13 1046	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> D e. T )
34		simp3r2 1123	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( R ` G ) =/= ( R ` D ) )
35	18, 19, 20, 21	trlcocnvat 34336	. . . . 5 |- ( ( ( K e. HL /\ W e. H ) /\ ( G e. T /\ D e. T ) /\ ( R ` G ) =/= ( R ` D ) ) -> ( R ` ( G o. `' D ) ) e. A )
36	29, 30, 33, 34, 35	syl121anc 1281	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( R ` ( G o. `' D ) ) e. A )
37	1, 16, 18	hlatjcl 32977	. . . 4 |- ( ( K e. HL /\ ( G ` P ) e. A /\ ( R ` ( G o. `' D ) ) e. A ) -> ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) e. B )
38	3, 32, 36, 37	syl3anc 1276	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) e. B )
39	1, 17	latmcl 16347	. . 3 |- ( ( K e. Lat /\ ( P .\/ ( O ` P ) ) e. B /\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) e. B ) -> ( ( P .\/ ( O ` P ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) e. B )
40	5, 28, 38, 39	syl3anc 1276	. 2 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( P .\/ ( O ` P ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) e. B )
41	2, 18, 19, 20	ltrnat 33750	. . . . 5 |- ( ( ( K e. HL /\ W e. H ) /\ D e. T /\ P e. A ) -> ( D ` P ) e. A )
42	29, 33, 6, 41	syl3anc 1276	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( D ` P ) e. A )
43	1, 18, 19, 20, 21	trlnidat 33784	. . . . 5 |- ( ( ( K e. HL /\ W e. H ) /\ D e. T /\ D =/= ( _I |` B ) ) -> ( R ` D ) e. A )
44	29, 33, 13, 43	syl3anc 1276	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( R ` D ) e. A )
45	1, 16, 18	hlatjcl 32977	. . . 4 |- ( ( K e. HL /\ ( D ` P ) e. A /\ ( R ` D ) e. A ) -> ( ( D ` P ) .\/ ( R ` D ) ) e. B )
46	3, 42, 44, 45	syl3anc 1276	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( D ` P ) .\/ ( R ` D ) ) e. B )
47	1, 16, 18	hlatjcl 32977	. . . 4 |- ( ( K e. HL /\ ( D ` P ) e. A /\ ( R ` ( G o. `' D ) ) e. A ) -> ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) e. B )
48	3, 42, 36, 47	syl3anc 1276	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) e. B )
49	1, 17	latmcl 16347	. . 3 |- ( ( K e. Lat /\ ( ( D ` P ) .\/ ( R ` D ) ) e. B /\ ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) e. B ) -> ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) e. B )
50	5, 46, 48, 49	syl3anc 1276	. 2 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) e. B )
51		simp213 1154	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> X e. T )
52	2, 18, 19, 20	ltrnat 33750	. . . 4 |- ( ( ( K e. HL /\ W e. H ) /\ X e. T /\ P e. A ) -> ( X ` P ) e. A )
53	29, 51, 6, 52	syl3anc 1276	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( X ` P ) e. A )
54		simp3r3 1124	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( R ` X ) =/= ( R ` D ) )
55	18, 19, 20, 21	trlcocnvat 34336	. . . 4 |- ( ( ( K e. HL /\ W e. H ) /\ ( X e. T /\ D e. T ) /\ ( R ` X ) =/= ( R ` D ) ) -> ( R ` ( X o. `' D ) ) e. A )
56	29, 51, 33, 54, 55	syl121anc 1281	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( R ` ( X o. `' D ) ) e. A )
57	1, 16, 18	hlatjcl 32977	. . 3 |- ( ( K e. HL /\ ( X ` P ) e. A /\ ( R ` ( X o. `' D ) ) e. A ) -> ( ( X ` P ) .\/ ( R ` ( X o. `' D ) ) ) e. B )
58	3, 53, 56, 57	syl3anc 1276	. 2 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( X ` P ) .\/ ( R ` ( X o. `' D ) ) ) e. B )
59	1, 2, 16, 17, 18, 19, 20, 21, 22, 23	cdlemk1u 34471	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( N e. T /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ ( R ` D ) =/= ( R ` F ) ) ) -> ( P .\/ ( O ` P ) ) .<_ ( ( D ` P ) .\/ ( R ` D ) ) )
60	7, 11, 15, 59	syl3anc 1276	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( P .\/ ( O ` P ) ) .<_ ( ( D ` P ) .\/ ( R ` D ) ) )
61	1, 2, 17	latmlem1 16376	. . . . 5 |- ( ( K e. Lat /\ ( ( P .\/ ( O ` P ) ) e. B /\ ( ( D ` P ) .\/ ( R ` D ) ) e. B /\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) e. B ) ) -> ( ( P .\/ ( O ` P ) ) .<_ ( ( D ` P ) .\/ ( R ` D ) ) -> ( ( P .\/ ( O ` P ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) .<_ ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) ) )
62	5, 28, 46, 38, 61	syl13anc 1278	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( P .\/ ( O ` P ) ) .<_ ( ( D ` P ) .\/ ( R ` D ) ) -> ( ( P .\/ ( O ` P ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) .<_ ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) ) )
63	60, 62	mpd 15	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( P .\/ ( O ` P ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) .<_ ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) )
64		simp11r 1126	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> W e. H )
65	1, 2, 16, 18, 19, 20, 21	cdlemk2 34444	. . . . 5 |- ( ( ( K e. HL /\ W e. H ) /\ ( D e. T /\ G e. T ) /\ ( P e. A /\ -. P .<_ W ) ) -> ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) = ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) )
66	3, 64, 33, 30, 9, 65	syl221anc 1287	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) = ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) )
67	66	oveq2d 6331	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) = ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) )
68	63, 67	breqtrd 4441	. 2 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( P .\/ ( O ` P ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) .<_ ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) )
69		simp3l3 1121	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> G =/= ( _I |` B ) )
70	13, 69	jca 539	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) )
71	1, 2, 16, 18, 19, 20, 21, 17	cdlemk5a 34447	. . 3 |- ( ( ( K e. HL /\ W e. H ) /\ ( D e. T /\ G e. T /\ X e. T ) /\ ( ( R ` G ) =/= ( R ` D ) /\ ( D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( P e. A /\ -. P .<_ W ) ) ) -> ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) .<_ ( ( X ` P ) .\/ ( R ` ( X o. `' D ) ) ) )
72	3, 64, 33, 30, 51, 34, 70, 9, 71	syl233anc 1305	. 2 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( ( D ` P ) .\/ ( R ` D ) ) ./\ ( ( D ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) .<_ ( ( X ` P ) .\/ ( R ` ( X o. `' D ) ) ) )
73	1, 2, 5, 40, 50, 58, 68, 72	lattrd 16353	1 |- ( ( ( ( K e. HL /\ W e. H ) /\ F e. T /\ D e. T ) /\ ( ( N e. T /\ G e. T /\ X e. T ) /\ ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) /\ ( ( F =/= ( _I |` B ) /\ D =/= ( _I |` B ) /\ G =/= ( _I |` B ) ) /\ ( ( R ` D ) =/= ( R ` F ) /\ ( R ` G ) =/= ( R ` D ) /\ ( R ` X ) =/= ( R ` D ) ) ) ) -> ( ( P .\/ ( O ` P ) ) ./\ ( ( G ` P ) .\/ ( R ` ( G o. `' D ) ) ) ) .<_ ( ( X ` P ) .\/ ( R ` ( X o. `' D ) ) ) )

Syntax hints:   -. wn 3   -> wi 4   /\ wa 375   /\ w3a 991   = wceq 1455   e. wcel 1898   =/= wne 2633   class class class wbr 4416   |-> cmpt 4475   _I cid 4763   `'ccnv 4852   |` cres 4855   o. ccom 4857   ` cfv 5601   iota_crio 6276  (class class class)co 6315   Basecbs 15170   lecple 15246   joincjn 16238   meetcmee 16239   Latclat 16340   Atomscatm 32874   HLchlt 32961   LHypclh 33594   LTrncltrn 33711   trLctrl 33769

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1680  ax-4 1693  ax-5 1769  ax-6 1816  ax-7 1862  ax-8 1900  ax-9 1907  ax-10 1926  ax-11 1931  ax-12 1944  ax-13 2102  ax-ext 2442  ax-rep 4529  ax-sep 4539  ax-nul 4548  ax-pow 4595  ax-pr 4653  ax-un 6610  ax-riotaBAD 32570

This theorem depends on definitions:  df-bi 190  df-or 376  df-an 377  df-3or 992  df-3an 993  df-tru 1458  df-ex 1675  df-nf 1679  df-sb 1809  df-eu 2314  df-mo 2315  df-clab 2449  df-cleq 2455  df-clel 2458  df-nfc 2592  df-ne 2635  df-nel 2636  df-ral 2754  df-rex 2755  df-reu 2756  df-rmo 2757  df-rab 2758  df-v 3059  df-sbc 3280  df-csb 3376  df-dif 3419  df-un 3421  df-in 3423  df-ss 3430  df-nul 3744  df-if 3894  df-pw 3965  df-sn 3981  df-pr 3983  df-op 3987  df-uni 4213  df-iun 4294  df-iin 4295  df-br 4417  df-opab 4476  df-mpt 4477  df-id 4768  df-xp 4859  df-rel 4860  df-cnv 4861  df-co 4862  df-dm 4863  df-rn 4864  df-res 4865  df-ima 4866  df-iota 5565  df-fun 5603  df-fn 5604  df-f 5605  df-f1 5606  df-fo 5607  df-f1o 5608  df-fv 5609  df-riota 6277  df-ov 6318  df-oprab 6319  df-mpt2 6320  df-1st 6820  df-2nd 6821  df-undef 7046  df-map 7500  df-preset 16222  df-poset 16240  df-plt 16253  df-lub 16269  df-glb 16270  df-join 16271  df-meet 16272  df-p0 16334  df-p1 16335  df-lat 16341  df-clat 16403  df-oposet 32787  df-ol 32789  df-oml 32790  df-covers 32877  df-ats 32878  df-atl 32909  df-cvlat 32933  df-hlat 32962  df-llines 33108  df-lplanes 33109  df-lvols 33110  df-lines 33111  df-psubsp 33113  df-pmap 33114  df-padd 33406  df-lhyp 33598  df-laut 33599  df-ldil 33714  df-ltrn 33715  df-trl 33770

This theorem is referenced by:  cdlemk6u  34474