Theorem 2llnma1b 36937

Description: Generalization of 2llnma1 36938. (Contributed by NM, 26-Apr-2013.)

Hypotheses

Ref	Expression
2llnma1b.b	⊢ 𝐵 = (Base‘𝐾)
2llnma1b.l	⊢ ≤ = (le‘𝐾)
2llnma1b.j	⊢ ∨ = (join‘𝐾)
2llnma1b.m	⊢ ∧ = (meet‘𝐾)
2llnma1b.a	⊢ 𝐴 = (Atoms‘𝐾)

Assertion

Ref	Expression
2llnma1b	⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)) = 𝑃)

Proof of Theorem 2llnma1b

Step	Hyp	Ref	Expression
1		hllat 36514	. . . . . 6 ⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat)
2	1	3ad2ant1 1129	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝐾 ∈ Lat)
3		simp22 1203	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑃 ∈ 𝐴)
4		2llnma1b.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐾)
5		2llnma1b.a	. . . . . . 7 ⊢ 𝐴 = (Atoms‘𝐾)
6	4, 5	atbase 36440	. . . . . 6 ⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ 𝐵)
7	3, 6	syl 17	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑃 ∈ 𝐵)
8		simp21 1202	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑋 ∈ 𝐵)
9		2llnma1b.l	. . . . . 6 ⊢ ≤ = (le‘𝐾)
10		2llnma1b.j	. . . . . 6 ⊢ ∨ = (join‘𝐾)
11	4, 9, 10	latlej1 17670	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → 𝑃 ≤ (𝑃 ∨ 𝑋))
12	2, 7, 8, 11	syl3anc 1367	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑃 ≤ (𝑃 ∨ 𝑋))
13		simp23 1204	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑄 ∈ 𝐴)
14	4, 5	atbase 36440	. . . . . 6 ⊢ (𝑄 ∈ 𝐴 → 𝑄 ∈ 𝐵)
15	13, 14	syl 17	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑄 ∈ 𝐵)
16	4, 9, 10	latlej1 17670	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐵 ∧ 𝑄 ∈ 𝐵) → 𝑃 ≤ (𝑃 ∨ 𝑄))
17	2, 7, 15, 16	syl3anc 1367	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑃 ≤ (𝑃 ∨ 𝑄))
18	4, 10	latjcl 17661	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → (𝑃 ∨ 𝑋) ∈ 𝐵)
19	2, 7, 8, 18	syl3anc 1367	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → (𝑃 ∨ 𝑋) ∈ 𝐵)
20		simp1 1132	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝐾 ∈ HL)
21	4, 10, 5	hlatjcl 36518	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) → (𝑃 ∨ 𝑄) ∈ 𝐵)
22	20, 3, 13, 21	syl3anc 1367	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → (𝑃 ∨ 𝑄) ∈ 𝐵)
23		2llnma1b.m	. . . . . 6 ⊢ ∧ = (meet‘𝐾)
24	4, 9, 23	latlem12 17688	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∈ 𝐵 ∧ (𝑃 ∨ 𝑋) ∈ 𝐵 ∧ (𝑃 ∨ 𝑄) ∈ 𝐵)) → ((𝑃 ≤ (𝑃 ∨ 𝑋) ∧ 𝑃 ≤ (𝑃 ∨ 𝑄)) ↔ 𝑃 ≤ ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄))))
25	2, 7, 19, 22, 24	syl13anc 1368	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → ((𝑃 ≤ (𝑃 ∨ 𝑋) ∧ 𝑃 ≤ (𝑃 ∨ 𝑄)) ↔ 𝑃 ≤ ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄))))
26	12, 17, 25	mpbi2and 710	. . 3 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑃 ≤ ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)))
27		hlatl 36511	. . . . 5 ⊢ (𝐾 ∈ HL → 𝐾 ∈ AtLat)
28	27	3ad2ant1 1129	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝐾 ∈ AtLat)
29		simp3 1134	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → ¬ 𝑄 ≤ (𝑃 ∨ 𝑋))
30		nbrne2 5086	. . . . . 6 ⊢ ((𝑃 ≤ (𝑃 ∨ 𝑋) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑃 ≠ 𝑄)
31	12, 29, 30	syl2anc 586	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑃 ≠ 𝑄)
32	4, 10	latjcl 17661	. . . . . . 7 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑋) ∈ 𝐵 ∧ 𝑄 ∈ 𝐵) → ((𝑃 ∨ 𝑋) ∨ 𝑄) ∈ 𝐵)
33	2, 19, 15, 32	syl3anc 1367	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → ((𝑃 ∨ 𝑋) ∨ 𝑄) ∈ 𝐵)
34	4, 9, 10	latlej1 17670	. . . . . . 7 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑋) ∈ 𝐵 ∧ 𝑄 ∈ 𝐵) → (𝑃 ∨ 𝑋) ≤ ((𝑃 ∨ 𝑋) ∨ 𝑄))
35	2, 19, 15, 34	syl3anc 1367	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → (𝑃 ∨ 𝑋) ≤ ((𝑃 ∨ 𝑋) ∨ 𝑄))
36	4, 9, 2, 7, 19, 33, 12, 35	lattrd 17668	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑃 ≤ ((𝑃 ∨ 𝑋) ∨ 𝑄))
37	4, 9, 10, 23, 5	cvrat3 36593	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ ((𝑃 ∨ 𝑋) ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴)) → ((𝑃 ≠ 𝑄 ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋) ∧ 𝑃 ≤ ((𝑃 ∨ 𝑋) ∨ 𝑄)) → ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)) ∈ 𝐴))
38	37	3impia 1113	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ ((𝑃 ∨ 𝑋) ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑃 ≠ 𝑄 ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋) ∧ 𝑃 ≤ ((𝑃 ∨ 𝑋) ∨ 𝑄))) → ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)) ∈ 𝐴)
39	20, 19, 3, 13, 31, 29, 36, 38	syl133anc 1389	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)) ∈ 𝐴)
40	9, 5	atcmp 36462	. . . 4 ⊢ ((𝐾 ∈ AtLat ∧ 𝑃 ∈ 𝐴 ∧ ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)) ∈ 𝐴) → (𝑃 ≤ ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)) ↔ 𝑃 = ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄))))
41	28, 3, 39, 40	syl3anc 1367	. . 3 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → (𝑃 ≤ ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)) ↔ 𝑃 = ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄))))
42	26, 41	mpbid 234	. 2 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → 𝑃 = ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)))
43	42	eqcomd 2827	1 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∈ 𝐵 ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ ¬ 𝑄 ≤ (𝑃 ∨ 𝑋)) → ((𝑃 ∨ 𝑋) ∧ (𝑃 ∨ 𝑄)) = 𝑃)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1083   = wceq 1537   ∈ wcel 2114   ≠ wne 3016   class class class wbr 5066  ‘cfv 6355  (class class class)co 7156  Basecbs 16483  lecple 16572  joincjn 17554  meetcmee 17555  Latclat 17655  Atomscatm 36414  AtLatcal 36415  HLchlt 36501

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4839  df-iun 4921  df-br 5067  df-opab 5129  df-mpt 5147  df-id 5460  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-riota 7114  df-ov 7159  df-oprab 7160  df-proset 17538  df-poset 17556  df-plt 17568  df-lub 17584  df-glb 17585  df-join 17586  df-meet 17587  df-p0 17649  df-lat 17656  df-clat 17718  df-oposet 36327  df-ol 36329  df-oml 36330  df-covers 36417  df-ats 36418  df-atl 36449  df-cvlat 36473  df-hlat 36502

This theorem is referenced by:  2llnma1  36938  cdlemg4  37768  cdlemkfid1N  38072