Theorem cdlemk28-3 30376

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 955	. . 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 1072	. . . 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 1073	. . . 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 990	. . . 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 1132	. . 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 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 ) ) ) -> G e. T )
7		simp22r 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 ) ) ) -> G =/= ( _I |` B ) )
8		simp3r 984	. . . 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 1132	. . 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 983	. . 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 30373	. . 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 1185	. 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 985	. . . . 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 976	. . . . . 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 981	. . . . . 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 1089	. . . . . 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 1132	. . . . 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 976	. . . . . 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 982	. . . . . 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 518	. . . . 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 1070	. . . . 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 1071	. . . . . 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 976	. . . . . 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 1060	. . . . . 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 1132	. . . . 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 976	. . . . . 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 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 ) ) ) ) -> a =/= ( _I |` B ) )
38	36, 37	jca 518	. . . . 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 1065	. . . . . . 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 2530	. . . . . 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 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 ` a ) =/= ( R ` F ) )
42		simp3l2 1061	. . . . . 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 1132	. . . . 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 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 ) ) ) ) -> ( R ` b ) =/= ( R ` G ) )
45	44	necomd 2530	. . . . 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 30375	. . . . 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 1213	. . . 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 1150	. . 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 2635	. 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 2455	. . . . 5 |- ( b = a -> ( b =/= ( _I |` B ) <-> a =/= ( _I |` B ) ) )
51		fveq2 5486	. . . . . 6 |- ( b = a -> ( R ` b ) = ( R ` a ) )
52	51	neeq1d 2460	. . . . 5 |- ( b = a -> ( ( R ` b ) =/= ( R ` F ) <-> ( R ` a ) =/= ( R ` F ) ) )
53	51	neeq1d 2460	. . . . 5 |- ( b = a -> ( ( R ` b ) =/= ( R ` G ) <-> ( R ` a ) =/= ( R ` G ) ) )
54	50, 52, 53	3anbi123d 1252	. . . 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 5827	. . . 4 |- ( b = a -> ( b Y G ) = ( a Y G ) )
56	54, 55	reusv3 4541	. . 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 198	. 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 56	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 358   /\ w3a 934   = wceq 1623   e. wcel 1685   =/= wne 2447   A.wral 2544   E.wrex 2545   class class class wbr 4024   e. cmpt 4078   _I cid 4303   `'ccnv 4687   |` cres 4690   o. ccom 4692   ` cfv 5221  (class class class)co 5820   e. cmpt2 5822   iota_crio 6291   Basecbs 13144   lecple 13211   joincjn 14074   meetcmee 14075   Atomscatm 28732   HLchlt 28819   LHypclh 29452   LTrncltrn 29569   trLctrl 29626

This theorem is referenced by:  cdlemk29-3  30379

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1533  ax-5 1544  ax-17 1603  ax-9 1636  ax-8 1644  ax-13 1687  ax-14 1689  ax-6 1704  ax-7 1709  ax-11 1716  ax-12 1868  ax-ext 2265  ax-rep 4132  ax-sep 4142  ax-nul 4150  ax-pow 4187  ax-pr 4213  ax-un 4511

This theorem depends on definitions:  df-bi 177  df-or 359  df-an 360  df-3or 935  df-3an 936  df-tru 1310  df-ex 1529  df-nf 1532  df-sb 1631  df-eu 2148  df-mo 2149  df-clab 2271  df-cleq 2277  df-clel 2280  df-nfc 2409  df-ne 2449  df-nel 2450  df-ral 2549  df-rex 2550  df-reu 2551  df-rmo 2552  df-rab 2553  df-v 2791  df-sbc 2993  df-csb 3083  df-dif 3156  df-un 3158  df-in 3160  df-ss 3167  df-nul 3457  df-if 3567  df-pw 3628  df-sn 3647  df-pr 3648  df-op 3650  df-uni 3829  df-iun 3908  df-iin 3909  df-br 4025  df-opab 4079  df-mpt 4080  df-id 4308  df-xp 4694  df-rel 4695  df-cnv 4696  df-co 4697  df-dm 4698  df-rn 4699  df-res 4700  df-ima 4701  df-fun 5223  df-fn 5224  df-f 5225  df-f1 5226  df-fo 5227  df-f1o 5228  df-fv 5229  df-ov 5823  df-oprab 5824  df-mpt2 5825  df-1st 6084  df-2nd 6085  df-iota 6253  df-undef 6292  df-riota 6300  df-map 6770  df-poset 14076  df-plt 14088  df-lub 14104  df-glb 14105  df-join 14106  df-meet 14107  df-p0 14141  df-p1 14142  df-lat 14148  df-clat 14210  df-oposet 28645  df-ol 28647  df-oml 28648  df-covers 28735  df-ats 28736  df-atl 28767  df-cvlat 28791  df-hlat 28820  df-llines 28966  df-lplanes 28967  df-lvols 28968  df-lines 28969  df-psubsp 28971  df-pmap 28972  df-padd 29264  df-lhyp 29456  df-laut 29457  df-ldil 29572  df-ltrn 29573  df-trl 29627