Metamath Proof Explorer


Theorem lhpexle2lem

Description: Lemma for lhpexle2 . (Contributed by NM, 19-Jun-2013)

Ref Expression
Hypotheses lhpex1.l ⊢ ≤ ˙ = ≤ K
lhpex1.a ⊢ A = Atoms ⁡ K
lhpex1.h ⊢ H = LHyp ⁡ K
Assertion lhpexle2lem ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W → ∃ p ∈ A p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y

Proof

Step Hyp Ref Expression
1 lhpex1.l ⊢ ≤ ˙ = ≤ K
2 lhpex1.a ⊢ A = Atoms ⁡ K
3 lhpex1.h ⊢ H = LHyp ⁡ K
4 simpl1 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y → K ∈ HL ∧ W ∈ H
5 1 2 3 lhpexle1 ⊢ K ∈ HL ∧ W ∈ H → ∃ p ∈ A p ≤ ˙ W ∧ p ≠ X
6 4 5 syl ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y → ∃ p ∈ A p ≤ ˙ W ∧ p ≠ X
7 simp3l ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y ∧ p ≤ ˙ W ∧ p ≠ X → p ≤ ˙ W
8 simp3r ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y ∧ p ≤ ˙ W ∧ p ≠ X → p ≠ X
9 simp2 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y ∧ p ≤ ˙ W ∧ p ≠ X → X = Y
10 8 9 neeqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y ∧ p ≤ ˙ W ∧ p ≠ X → p ≠ Y
11 7 8 10 3jca ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y ∧ p ≤ ˙ W ∧ p ≠ X → p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y
12 11 3expia ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y → p ≤ ˙ W ∧ p ≠ X → p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y
13 12 reximdv ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y → ∃ p ∈ A p ≤ ˙ W ∧ p ≠ X → ∃ p ∈ A p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y
14 6 13 mpd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X = Y → ∃ p ∈ A p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y
15 simpl1l ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y → K ∈ HL
16 simpl2l ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y → X ∈ A
17 simpl3l ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y → Y ∈ A
18 simpr ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y → X ≠ Y
19 eqid ⊢ join ⁡ K = join ⁡ K
20 1 19 2 hlsupr ⊢ K ∈ HL ∧ X ∈ A ∧ Y ∈ A ∧ X ≠ Y → ∃ p ∈ A p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y
21 15 16 17 18 20 syl31anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y → ∃ p ∈ A p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y
22 eqid ⊢ Base K = Base K
23 simpl1l ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → K ∈ HL
24 23 hllatd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → K ∈ Lat
25 simprlr ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → p ∈ A
26 22 2 atbase ⊢ p ∈ A → p ∈ Base K
27 25 26 syl ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → p ∈ Base K
28 simpl2l ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → X ∈ A
29 simpl3l ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → Y ∈ A
30 22 19 2 hlatjcl ⊢ K ∈ HL ∧ X ∈ A ∧ Y ∈ A → X join ⁡ K Y ∈ Base K
31 23 28 29 30 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → X join ⁡ K Y ∈ Base K
32 simpl1r ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → W ∈ H
33 22 3 lhpbase ⊢ W ∈ H → W ∈ Base K
34 32 33 syl ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → W ∈ Base K
35 simprr3 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → p ≤ ˙ X join ⁡ K Y
36 simpl2r ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → X ≤ ˙ W
37 simpl3r ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → Y ≤ ˙ W
38 22 2 atbase ⊢ X ∈ A → X ∈ Base K
39 28 38 syl ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → X ∈ Base K
40 22 2 atbase ⊢ Y ∈ A → Y ∈ Base K
41 29 40 syl ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → Y ∈ Base K
42 22 1 19 latjle12 ⊢ K ∈ Lat ∧ X ∈ Base K ∧ Y ∈ Base K ∧ W ∈ Base K → X ≤ ˙ W ∧ Y ≤ ˙ W ↔ X join ⁡ K Y ≤ ˙ W
43 24 39 41 34 42 syl13anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → X ≤ ˙ W ∧ Y ≤ ˙ W ↔ X join ⁡ K Y ≤ ˙ W
44 36 37 43 mpbi2and ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → X join ⁡ K Y ≤ ˙ W
45 22 1 24 27 31 34 35 44 lattrd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → p ≤ ˙ W
46 simprr1 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → p ≠ X
47 simprr2 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → p ≠ Y
48 45 46 47 3jca ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A ∧ p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y
49 48 exp44 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W → X ≠ Y → p ∈ A → p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y
50 49 imp31 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y ∧ p ∈ A → p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y
51 50 reximdva ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y → ∃ p ∈ A p ≠ X ∧ p ≠ Y ∧ p ≤ ˙ X join ⁡ K Y → ∃ p ∈ A p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y
52 21 51 mpd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W ∧ X ≠ Y → ∃ p ∈ A p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y
53 14 52 pm2.61dane ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ A ∧ X ≤ ˙ W ∧ Y ∈ A ∧ Y ≤ ˙ W → ∃ p ∈ A p ≤ ˙ W ∧ p ≠ X ∧ p ≠ Y