Metamath Proof Explorer


Theorem dihmeetlem3N

Description: Lemma for isomorphism H of a lattice meet. (Contributed by NM, 30-Mar-2014) (New usage is discouraged.)

Ref Expression
Hypotheses dihmeetlem3.b ⊢ B = Base K
dihmeetlem3.l ⊢ ≤ ˙ = ≤ K
dihmeetlem3.j ⊢ ∨ ˙ = join ⁡ K
dihmeetlem3.m ⊢ ∧ ˙ = meet ⁡ K
dihmeetlem3.a ⊢ A = Atoms ⁡ K
dihmeetlem3.h ⊢ H = LHyp ⁡ K
Assertion dihmeetlem3N ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ R ∨ ˙ Y ∧ ˙ W = Y → Q ≠ R

Proof

Step Hyp Ref Expression
1 dihmeetlem3.b ⊢ B = Base K
2 dihmeetlem3.l ⊢ ≤ ˙ = ≤ K
3 dihmeetlem3.j ⊢ ∨ ˙ = join ⁡ K
4 dihmeetlem3.m ⊢ ∧ ˙ = meet ⁡ K
5 dihmeetlem3.a ⊢ A = Atoms ⁡ K
6 dihmeetlem3.h ⊢ H = LHyp ⁡ K
7 simp2lr ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ R ∨ ˙ Y ∧ ˙ W = Y → ¬ Q ≤ ˙ W
8 oveq1 ⊢ Q = R → Q ∨ ˙ Y ∧ ˙ W = R ∨ ˙ Y ∧ ˙ W
9 simpr ⊢ R ∈ A ∧ ¬ R ≤ ˙ W ∧ R ∨ ˙ Y ∧ ˙ W = Y → R ∨ ˙ Y ∧ ˙ W = Y
10 8 9 sylan9eqr ⊢ R ∈ A ∧ ¬ R ≤ ˙ W ∧ R ∨ ˙ Y ∧ ˙ W = Y ∧ Q = R → Q ∨ ˙ Y ∧ ˙ W = Y
11 simp11l ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → K ∈ HL
12 11 hllatd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → K ∈ Lat
13 simp2ll ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ∈ A
14 1 5 atbase ⊢ Q ∈ A → Q ∈ B
15 13 14 syl ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ∈ B
16 simp12l ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → X ∈ B
17 simp12r ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Y ∈ B
18 1 4 latmcl ⊢ K ∈ Lat ∧ X ∈ B ∧ Y ∈ B → X ∧ ˙ Y ∈ B
19 12 16 17 18 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → X ∧ ˙ Y ∈ B
20 simp11r ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → W ∈ H
21 1 6 lhpbase ⊢ W ∈ H → W ∈ B
22 20 21 syl ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → W ∈ B
23 1 4 latmcl ⊢ K ∈ Lat ∧ X ∈ B ∧ W ∈ B → X ∧ ˙ W ∈ B
24 12 16 22 23 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → X ∧ ˙ W ∈ B
25 1 2 3 latlej1 ⊢ K ∈ Lat ∧ Q ∈ B ∧ X ∧ ˙ W ∈ B → Q ≤ ˙ Q ∨ ˙ X ∧ ˙ W
26 12 15 24 25 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ≤ ˙ Q ∨ ˙ X ∧ ˙ W
27 simp2r ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ∨ ˙ X ∧ ˙ W = X
28 26 27 breqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ≤ ˙ X
29 1 4 latmcl ⊢ K ∈ Lat ∧ Y ∈ B ∧ W ∈ B → Y ∧ ˙ W ∈ B
30 12 17 22 29 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Y ∧ ˙ W ∈ B
31 1 2 3 latlej1 ⊢ K ∈ Lat ∧ Q ∈ B ∧ Y ∧ ˙ W ∈ B → Q ≤ ˙ Q ∨ ˙ Y ∧ ˙ W
32 12 15 30 31 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ≤ ˙ Q ∨ ˙ Y ∧ ˙ W
33 simp3 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ∨ ˙ Y ∧ ˙ W = Y
34 32 33 breqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ≤ ˙ Y
35 1 2 4 latlem12 ⊢ K ∈ Lat ∧ Q ∈ B ∧ X ∈ B ∧ Y ∈ B → Q ≤ ˙ X ∧ Q ≤ ˙ Y ↔ Q ≤ ˙ X ∧ ˙ Y
36 12 15 16 17 35 syl13anc ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ≤ ˙ X ∧ Q ≤ ˙ Y ↔ Q ≤ ˙ X ∧ ˙ Y
37 28 34 36 mpbi2and ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ≤ ˙ X ∧ ˙ Y
38 simp13 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → X ∧ ˙ Y ≤ ˙ W
39 1 2 12 15 19 22 37 38 lattrd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ Q ∨ ˙ Y ∧ ˙ W = Y → Q ≤ ˙ W
40 39 3exp ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W → Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X → Q ∨ ˙ Y ∧ ˙ W = Y → Q ≤ ˙ W
41 10 40 syl7 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W → Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X → R ∈ A ∧ ¬ R ≤ ˙ W ∧ R ∨ ˙ Y ∧ ˙ W = Y ∧ Q = R → Q ≤ ˙ W
42 41 exp4a ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W → Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X → R ∈ A ∧ ¬ R ≤ ˙ W ∧ R ∨ ˙ Y ∧ ˙ W = Y → Q = R → Q ≤ ˙ W
43 42 3imp ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ R ∨ ˙ Y ∧ ˙ W = Y → Q = R → Q ≤ ˙ W
44 43 necon3bd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ R ∨ ˙ Y ∧ ˙ W = Y → ¬ Q ≤ ˙ W → Q ≠ R
45 7 44 mpd ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ Y ∈ B ∧ X ∧ ˙ Y ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ Q ∨ ˙ X ∧ ˙ W = X ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ R ∨ ˙ Y ∧ ˙ W = Y → Q ≠ R