Metamath Proof Explorer


Theorem lhp2atne

Description: Inequality for joins with 2 different atoms under co-atom W . (Contributed by NM, 22-Jul-2013)

Ref Expression
Hypotheses lhp2atnle.l
|- .<_ = ( le ` K )
lhp2atnle.j
|- .\/ = ( join ` K )
lhp2atnle.a
|- A = ( Atoms ` K )
lhp2atnle.h
|- H = ( LHyp ` K )
Assertion lhp2atne
|- ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> ( P .\/ U ) =/= ( Q .\/ V ) )

Proof

Step Hyp Ref Expression
1 lhp2atnle.l
 |-  .<_ = ( le ` K )
2 lhp2atnle.j
 |-  .\/ = ( join ` K )
3 lhp2atnle.a
 |-  A = ( Atoms ` K )
4 lhp2atnle.h
 |-  H = ( LHyp ` K )
5 simp11
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> ( K e. HL /\ W e. H ) )
6 simp12
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> ( P e. A /\ -. P .<_ W ) )
7 simp3
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> U =/= V )
8 simp2l
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> ( U e. A /\ U .<_ W ) )
9 simp2r
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> ( V e. A /\ V .<_ W ) )
10 1 2 3 4 lhp2atnle
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ U =/= V ) /\ ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) -> -. V .<_ ( P .\/ U ) )
11 5 6 7 8 9 10 syl311anc
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> -. V .<_ ( P .\/ U ) )
12 simp11l
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> K e. HL )
13 simp13
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> Q e. A )
14 simp2rl
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> V e. A )
15 1 2 3 hlatlej2
 |-  ( ( K e. HL /\ Q e. A /\ V e. A ) -> V .<_ ( Q .\/ V ) )
16 12 13 14 15 syl3anc
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> V .<_ ( Q .\/ V ) )
17 16 adantr
 |-  ( ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) /\ ( P .\/ U ) = ( Q .\/ V ) ) -> V .<_ ( Q .\/ V ) )
18 simpr
 |-  ( ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) /\ ( P .\/ U ) = ( Q .\/ V ) ) -> ( P .\/ U ) = ( Q .\/ V ) )
19 17 18 breqtrrd
 |-  ( ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) /\ ( P .\/ U ) = ( Q .\/ V ) ) -> V .<_ ( P .\/ U ) )
20 19 ex
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> ( ( P .\/ U ) = ( Q .\/ V ) -> V .<_ ( P .\/ U ) ) )
21 20 necon3bd
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> ( -. V .<_ ( P .\/ U ) -> ( P .\/ U ) =/= ( Q .\/ V ) ) )
22 11 21 mpd
 |-  ( ( ( ( K e. HL /\ W e. H ) /\ ( P e. A /\ -. P .<_ W ) /\ Q e. A ) /\ ( ( U e. A /\ U .<_ W ) /\ ( V e. A /\ V .<_ W ) ) /\ U =/= V ) -> ( P .\/ U ) =/= ( Q .\/ V ) )