Metamath Proof Explorer


Theorem cdlemk53b

Description: Lemma for cdlemk53 . (Contributed by NM, 26-Jul-2013)

Ref Expression
Hypotheses cdlemk5.b ⊢ B = Base K
cdlemk5.l ⊢ ≤ ˙ = ≤ K
cdlemk5.j ⊢ ∨ ˙ = join ⁡ K
cdlemk5.m ⊢ ∧ ˙ = meet ⁡ K
cdlemk5.a ⊢ A = Atoms ⁡ K
cdlemk5.h ⊢ H = LHyp ⁡ K
cdlemk5.t ⊢ T = LTrn ⁡ K ⁡ W
cdlemk5.r ⊢ R = trL ⁡ K ⁡ W
cdlemk5.z ⊢ Z = P ∨ ˙ R ⁡ b ∧ ˙ N ⁡ P ∨ ˙ R ⁡ b ∘ F -1
cdlemk5.y ⊢ Y = P ∨ ˙ R ⁡ g ∧ ˙ Z ∨ ˙ R ⁡ g ∘ b -1
cdlemk5.x ⊢ X = ι z ∈ T | ∀ b ∈ T b ≠ I ↾ B ∧ R ⁡ b ≠ R ⁡ F ∧ R ⁡ b ≠ R ⁡ g → z ⁡ P = Y
Assertion cdlemk53b ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → ⦋ G ∘ I / g⦌ X = ⦋ G / g⦌ X ∘ ⦋ I / g⦌ X

Proof

Step Hyp Ref Expression
1 cdlemk5.b ⊢ B = Base K
2 cdlemk5.l ⊢ ≤ ˙ = ≤ K
3 cdlemk5.j ⊢ ∨ ˙ = join ⁡ K
4 cdlemk5.m ⊢ ∧ ˙ = meet ⁡ K
5 cdlemk5.a ⊢ A = Atoms ⁡ K
6 cdlemk5.h ⊢ H = LHyp ⁡ K
7 cdlemk5.t ⊢ T = LTrn ⁡ K ⁡ W
8 cdlemk5.r ⊢ R = trL ⁡ K ⁡ W
9 cdlemk5.z ⊢ Z = P ∨ ˙ R ⁡ b ∧ ˙ N ⁡ P ∨ ˙ R ⁡ b ∘ F -1
10 cdlemk5.y ⊢ Y = P ∨ ˙ R ⁡ g ∧ ˙ Z ∨ ˙ R ⁡ g ∘ b -1
11 cdlemk5.x ⊢ X = ι z ∈ T | ∀ b ∈ T b ≠ I ↾ B ∧ R ⁡ b ≠ R ⁡ F ∧ R ⁡ b ≠ R ⁡ g → z ⁡ P = Y
12 simp1l ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → K ∈ HL ∧ W ∈ H
13 simp211 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → F ∈ T
14 simp212 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → F ≠ I ↾ B
15 13 14 jca ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → F ∈ T ∧ F ≠ I ↾ B
16 simp31 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → I ∈ T
17 simp213 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → N ∈ T
18 simp23 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → P ∈ A ∧ ¬ P ≤ ˙ W
19 simp1r ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → R ⁡ F = R ⁡ N
20 1 2 3 4 5 6 7 8 9 10 11 cdlemk35s-id ⊢ K ∈ HL ∧ W ∈ H ∧ F ∈ T ∧ F ≠ I ↾ B ∧ I ∈ T ∧ N ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ R ⁡ F = R ⁡ N → ⦋ I / g⦌ X ∈ T
21 12 15 16 17 18 19 20 syl132anc ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → ⦋ I / g⦌ X ∈ T
22 1 6 7 ltrn1o ⊢ K ∈ HL ∧ W ∈ H ∧ ⦋ I / g⦌ X ∈ T → ⦋ I / g⦌ X : B ⟶ 1-1 onto B
23 12 21 22 syl2anc ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → ⦋ I / g⦌ X : B ⟶ 1-1 onto B
24 23 adantr ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → ⦋ I / g⦌ X : B ⟶ 1-1 onto B
25 f1of ⊢ ⦋ I / g⦌ X : B ⟶ 1-1 onto B → ⦋ I / g⦌ X : B ⟶ B
26 fcoi2 ⊢ ⦋ I / g⦌ X : B ⟶ B → I ↾ B ∘ ⦋ I / g⦌ X = ⦋ I / g⦌ X
27 24 25 26 3syl ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → I ↾ B ∘ ⦋ I / g⦌ X = ⦋ I / g⦌ X
28 simpl1l ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → K ∈ HL ∧ W ∈ H
29 13 17 19 3jca ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → F ∈ T ∧ N ∈ T ∧ R ⁡ F = R ⁡ N
30 29 adantr ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → F ∈ T ∧ N ∈ T ∧ R ⁡ F = R ⁡ N
31 simpl23 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → P ∈ A ∧ ¬ P ≤ ˙ W
32 simpr ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → G = I ↾ B
33 1 2 3 4 5 6 7 8 9 10 11 cdlemkid ⊢ K ∈ HL ∧ W ∈ H ∧ F ∈ T ∧ N ∈ T ∧ R ⁡ F = R ⁡ N ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ G = I ↾ B → ⦋ G / g⦌ X = I ↾ B
34 28 30 31 32 33 syl112anc ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → ⦋ G / g⦌ X = I ↾ B
35 34 coeq1d ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → ⦋ G / g⦌ X ∘ ⦋ I / g⦌ X = I ↾ B ∘ ⦋ I / g⦌ X
36 32 coeq1d ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → G ∘ I = I ↾ B ∘ I
37 simpl31 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → I ∈ T
38 1 6 7 ltrn1o ⊢ K ∈ HL ∧ W ∈ H ∧ I ∈ T → I : B ⟶ 1-1 onto B
39 28 37 38 syl2anc ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → I : B ⟶ 1-1 onto B
40 f1of ⊢ I : B ⟶ 1-1 onto B → I : B ⟶ B
41 fcoi2 ⊢ I : B ⟶ B → I ↾ B ∘ I = I
42 39 40 41 3syl ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → I ↾ B ∘ I = I
43 36 42 eqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → G ∘ I = I
44 43 csbeq1d ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → ⦋ G ∘ I / g⦌ X = ⦋ I / g⦌ X
45 27 35 44 3eqtr4rd ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G = I ↾ B → ⦋ G ∘ I / g⦌ X = ⦋ G / g⦌ X ∘ ⦋ I / g⦌ X
46 simpl1l ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → K ∈ HL ∧ W ∈ H
47 15 adantr ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → F ∈ T ∧ F ≠ I ↾ B
48 simpl22 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → G ∈ T
49 simpr ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → G ≠ I ↾ B
50 48 49 jca ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → G ∈ T ∧ G ≠ I ↾ B
51 17 adantr ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → N ∈ T
52 simpl23 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → P ∈ A ∧ ¬ P ≤ ˙ W
53 simpl1r ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → R ⁡ F = R ⁡ N
54 simpl3 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I
55 1 2 3 4 5 6 7 8 9 10 11 cdlemk53a ⊢ K ∈ HL ∧ W ∈ H ∧ F ∈ T ∧ F ≠ I ↾ B ∧ G ∈ T ∧ G ≠ I ↾ B ∧ N ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ R ⁡ F = R ⁡ N ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → ⦋ G ∘ I / g⦌ X = ⦋ G / g⦌ X ∘ ⦋ I / g⦌ X
56 46 47 50 51 52 53 54 55 syl331anc ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I ∧ G ≠ I ↾ B → ⦋ G ∘ I / g⦌ X = ⦋ G / g⦌ X ∘ ⦋ I / g⦌ X
57 45 56 pm2.61dane ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ F ∈ T ∧ F ≠ I ↾ B ∧ N ∈ T ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ I ∈ T ∧ I ≠ I ↾ B ∧ R ⁡ G ≠ R ⁡ I → ⦋ G ∘ I / g⦌ X = ⦋ G / g⦌ X ∘ ⦋ I / g⦌ X