Theorem cdlemk28-3 31394

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

Hypotheses

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

Assertion

Ref	Expression
cdlemk28-3	|- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> E. z e. T A. b e. T ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) -> z = ( b Y G ) ) )

Distinct variable groups:   e, d, f, i, ./\   .<_ , i   .\/ , d, e, f, i   A, i   j, d, e, f, i, F   G, d, e, j   i, H   i, K   f, N, i   P, d, e, f, i   R, d, e, f, i   T, d, e, f, i   W, d, e, f, i, b   ./\ , j   .<_ , j   .\/ , j   A, j   j, F   j, H   j, K   j, N   P, j   R, j   b, d, S, e, j   T, j   j, W   F, d, e   .<_ , e   f, G, i   .<_ , b   A, b   z, b, B   F, b, z   G, b, z   H, b   K, b   N, b   P, b   R, b, z   T, b, z   W, b, z   Y, b, z   z, d, e, f, i, j

Allowed substitution hints:   A( z, e, f, d)   B( e, f, i, j, d)   P( z)   S( z, f, i)   H( z, e, f, d)   .\/ ( z, b)   K( z, e, f, d)   .<_ ( z, f, d)   ./\ ( z, b)   N( z, e, d)   Y( e, f, i, j, d)

Proof of Theorem cdlemk28-3

Dummy variable a is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simp1 957	. . 3 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> ( K e. HL /\ W e. H ) )
2		simp21l 1074	. . . 4 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> F e. T )
3		simp21r 1075	. . . 4 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> F =/= ( _I |` B ) )
4		simp23 992	. . . 4 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> N e. T )
5	2, 3, 4	3jca 1134	. . 3 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> ( F e. T /\ F =/= ( _I |` B ) /\ N e. T ) )
6		simp22l 1076	. . . 4 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> G e. T )
7		simp22r 1077	. . . 4 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> G =/= ( _I |` B ) )
8		simp3r 986	. . . 4 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> ( R ` F ) = ( R ` N ) )
9	6, 7, 8	3jca 1134	. . 3 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> ( G e. T /\ G =/= ( _I |` B ) /\ ( R ` F ) = ( R ` N ) ) )
10		simp3l 985	. . 3 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> ( P e. A /\ -. P .<_ W ) )
11		cdlemk3.b	. . . 4 |- B = ( Base ` K )
12		cdlemk3.l	. . . 4 |- .<_ = ( le ` K )
13		cdlemk3.j	. . . 4 |- .\/ = ( join ` K )
14		cdlemk3.m	. . . 4 |- ./\ = ( meet ` K )
15		cdlemk3.a	. . . 4 |- A = ( Atoms ` K )
16		cdlemk3.h	. . . 4 |- H = ( LHyp ` K )
17		cdlemk3.t	. . . 4 |- T = ( ( LTrn ` K ) ` W )
18		cdlemk3.r	. . . 4 |- R = ( ( trL ` K ) ` W )
19		cdlemk3.s	. . . 4 |- S = ( f e. T |-> ( iota_ i e. T ( i ` P ) = ( ( P .\/ ( R ` f ) ) ./\ ( ( N ` P ) .\/ ( R ` ( f o. `' F ) ) ) ) ) )
20		cdlemk3.u1	. . . 4 |- Y = ( d e. T , e e. T |-> ( iota_ j e. T ( j ` P ) = ( ( P .\/ ( R ` e ) ) ./\ ( ( ( S ` d ) ` P ) .\/ ( R ` ( e o. `' d ) ) ) ) ) )
21	11, 12, 13, 14, 15, 16, 17, 18, 19, 20	cdlemk26b-3 31391	. . 3 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( F e. T /\ F =/= ( _I |` B ) /\ N e. T ) /\ ( G e. T /\ G =/= ( _I |` B ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( P e. A /\ -. P .<_ W ) ) -> E. b e. T ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( b Y G ) e. T ) )
22	1, 5, 9, 10, 21	syl31anc 1187	. 2 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> E. b e. T ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( b Y G ) e. T ) )
23		simp11 987	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( K e. HL /\ W e. H ) )
24	2	3ad2ant1 978	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> F e. T )
25		simp2l 983	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> b e. T )
26		simp123 1091	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> N e. T )
27	24, 25, 26	3jca 1134	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( F e. T /\ b e. T /\ N e. T ) )
28	6	3ad2ant1 978	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> G e. T )
29		simp2r 984	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> a e. T )
30	28, 29	jca 519	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( G e. T /\ a e. T ) )
31		simp13l 1072	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( P e. A /\ -. P .<_ W ) )
32		simp13r 1073	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( R ` F ) = ( R ` N ) )
33	3	3ad2ant1 978	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> F =/= ( _I |` B ) )
34		simp3l1 1062	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> b =/= ( _I |` B ) )
35	32, 33, 34	3jca 1134	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( ( R ` F ) = ( R ` N ) /\ F =/= ( _I |` B ) /\ b =/= ( _I |` B ) ) )
36	7	3ad2ant1 978	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> G =/= ( _I |` B ) )
37		simp3r1 1065	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> a =/= ( _I |` B ) )
38	36, 37	jca 519	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( G =/= ( _I |` B ) /\ a =/= ( _I |` B ) ) )
39		simp3r3 1067	. . . . . . 7 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( R ` a ) =/= ( R ` G ) )
40	39	necomd 2654	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( R ` G ) =/= ( R ` a ) )
41		simp3r2 1066	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( R ` a ) =/= ( R ` F ) )
42		simp3l2 1063	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( R ` b ) =/= ( R ` F ) )
43	40, 41, 42	3jca 1134	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( ( R ` G ) =/= ( R ` a ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` F ) ) )
44		simp3l3 1064	. . . . . 6 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( R ` b ) =/= ( R ` G ) )
45	44	necomd 2654	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( R ` G ) =/= ( R ` b ) )
46	11, 12, 13, 14, 15, 16, 17, 18, 19, 20	cdlemk27-3 31393	. . . . 5 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( F e. T /\ b e. T /\ N e. T ) /\ ( G e. T /\ a e. T ) ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( ( R ` F ) = ( R ` N ) /\ F =/= ( _I |` B ) /\ b =/= ( _I |` B ) ) /\ ( G =/= ( _I |` B ) /\ a =/= ( _I |` B ) ) ) /\ ( ( ( R ` G ) =/= ( R ` a ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` F ) ) /\ ( R ` G ) =/= ( R ` b ) ) ) -> ( b Y G ) = ( a Y G ) )
47	23, 27, 30, 31, 35, 38, 43, 45, 46	syl332anc 1215	. . . 4 |- ( ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) /\ ( b e. T /\ a e. T ) /\ ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) ) -> ( b Y G ) = ( a Y G ) )
48	47	3exp 1152	. . 3 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> ( ( b e. T /\ a e. T ) -> ( ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) -> ( b Y G ) = ( a Y G ) ) ) )
49	48	ralrimivv 2761	. 2 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> A. b e. T A. a e. T ( ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) -> ( b Y G ) = ( a Y G ) ) )
50		neeq1 2579	. . . . 5 |- ( b = a -> ( b =/= ( _I |` B ) <-> a =/= ( _I |` B ) ) )
51		fveq2 5691	. . . . . 6 |- ( b = a -> ( R ` b ) = ( R ` a ) )
52	51	neeq1d 2584	. . . . 5 |- ( b = a -> ( ( R ` b ) =/= ( R ` F ) <-> ( R ` a ) =/= ( R ` F ) ) )
53	51	neeq1d 2584	. . . . 5 |- ( b = a -> ( ( R ` b ) =/= ( R ` G ) <-> ( R ` a ) =/= ( R ` G ) ) )
54	50, 52, 53	3anbi123d 1254	. . . 4 |- ( b = a -> ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) <-> ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) )
55		oveq1 6051	. . . 4 |- ( b = a -> ( b Y G ) = ( a Y G ) )
56	54, 55	reusv3 4694	. . 3 |- ( E. b e. T ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( b Y G ) e. T ) -> ( A. b e. T A. a e. T ( ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) -> ( b Y G ) = ( a Y G ) ) <-> E. z e. T A. b e. T ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) -> z = ( b Y G ) ) ) )
57	56	biimpd 199	. 2 |- ( E. b e. T ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( b Y G ) e. T ) -> ( A. b e. T A. a e. T ( ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) /\ ( a =/= ( _I |` B ) /\ ( R ` a ) =/= ( R ` F ) /\ ( R ` a ) =/= ( R ` G ) ) ) -> ( b Y G ) = ( a Y G ) ) -> E. z e. T A. b e. T ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) -> z = ( b Y G ) ) ) )
58	22, 49, 57	sylc 58	1 |- ( ( ( K e. HL /\ W e. H ) /\ ( ( F e. T /\ F =/= ( _I |` B ) ) /\ ( G e. T /\ G =/= ( _I |` B ) ) /\ N e. T ) /\ ( ( P e. A /\ -. P .<_ W ) /\ ( R ` F ) = ( R ` N ) ) ) -> E. z e. T A. b e. T ( ( b =/= ( _I |` B ) /\ ( R ` b ) =/= ( R ` F ) /\ ( R ` b ) =/= ( R ` G ) ) -> z = ( b Y G ) ) )

Syntax hints:   -. wn 3   -> wi 4   /\ wa 359   /\ w3a 936   = wceq 1649   e. wcel 1721   =/= wne 2571   A.wral 2670   E.wrex 2671   class class class wbr 4176   e. cmpt 4230   _I cid 4457   `'ccnv 4840   |` cres 4843   o. ccom 4845   ` cfv 5417  (class class class)co 6044   e. cmpt2 6046   iota_crio 6505   Basecbs 13428   lecple 13495   joincjn 14360   meetcmee 14361   Atomscatm 29750   HLchlt 29837   LHypclh 30470   LTrncltrn 30587   trLctrl 30644

This theorem is referenced by:  cdlemk29-3  31397

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1552  ax-5 1563  ax-17 1623  ax-9 1662  ax-8 1683  ax-13 1723  ax-14 1725  ax-6 1740  ax-7 1745  ax-11 1757  ax-12 1946  ax-ext 2389  ax-rep 4284  ax-sep 4294  ax-nul 4302  ax-pow 4341  ax-pr 4367  ax-un 4664

This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3or 937  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2262  df-mo 2263  df-clab 2395  df-cleq 2401  df-clel 2404  df-nfc 2533  df-ne 2573  df-nel 2574  df-ral 2675  df-rex 2676  df-reu 2677  df-rmo 2678  df-rab 2679  df-v 2922  df-sbc 3126  df-csb 3216  df-dif 3287  df-un 3289  df-in 3291  df-ss 3298  df-nul 3593  df-if 3704  df-pw 3765  df-sn 3784  df-pr 3785  df-op 3787  df-uni 3980  df-iun 4059  df-iin 4060  df-br 4177  df-opab 4231  df-mpt 4232  df-id 4462  df-xp 4847  df-rel 4848  df-cnv 4849  df-co 4850  df-dm 4851  df-rn 4852  df-res 4853  df-ima 4854  df-iota 5381  df-fun 5419  df-fn 5420  df-f 5421  df-f1 5422  df-fo 5423  df-f1o 5424  df-fv 5425  df-ov 6047  df-oprab 6048  df-mpt2 6049  df-1st 6312  df-2nd 6313  df-undef 6506  df-riota 6512  df-map 6983  df-poset 14362  df-plt 14374  df-lub 14390  df-glb 14391  df-join 14392  df-meet 14393  df-p0 14427  df-p1 14428  df-lat 14434  df-clat 14496  df-oposet 29663  df-ol 29665  df-oml 29666  df-covers 29753  df-ats 29754  df-atl 29785  df-cvlat 29809  df-hlat 29838  df-llines 29984  df-lplanes 29985  df-lvols 29986  df-lines 29987  df-psubsp 29989  df-pmap 29990  df-padd 30282  df-lhyp 30474  df-laut 30475  df-ldil 30590  df-ltrn 30591  df-trl 30645