Metamath Proof Explorer


Theorem cdlemkuel-3

Description: Part of proof of Lemma K of Crawley p. 118. Conditions for the sigma_2 (p) function to be a translation. TODO: combine cdlemkj ? (Contributed by NM, 11-Jul-2013)

Ref Expression
Hypotheses cdlemk3.b ⊢ B = Base K
cdlemk3.l ⊢ ≤ ˙ = ≤ K
cdlemk3.j ⊢ ∨ ˙ = join ⁡ K
cdlemk3.m ⊢ ∧ ˙ = meet ⁡ K
cdlemk3.a ⊢ A = Atoms ⁡ K
cdlemk3.h ⊢ H = LHyp ⁡ K
cdlemk3.t ⊢ T = LTrn ⁡ K ⁡ W
cdlemk3.r ⊢ R = trL ⁡ K ⁡ W
cdlemk3.s ⊢ S = f ∈ T ⟼ ι i ∈ T | i ⁡ P = P ∨ ˙ R ⁡ f ∧ ˙ N ⁡ P ∨ ˙ R ⁡ f ∘ F -1
cdlemk3.u1 ⊢ Y = d ∈ T , e ∈ T ⟼ ι j ∈ T | j ⁡ P = P ∨ ˙ R ⁡ e ∧ ˙ S ⁡ d ⁡ P ∨ ˙ R ⁡ e ∘ d -1
Assertion cdlemkuel-3 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ G ∈ T ∧ F ∈ T ∧ D ∈ T ∧ N ∈ T ∧ R ⁡ D ≠ R ⁡ F ∧ R ⁡ D ≠ R ⁡ G ∧ F ≠ I ↾ B ∧ G ≠ I ↾ B ∧ D ≠ I ↾ B ∧ P ∈ A ∧ ¬ P ≤ ˙ W → D Y G ∈ T

Proof

Step Hyp Ref Expression
1 cdlemk3.b ⊢ B = Base K
2 cdlemk3.l ⊢ ≤ ˙ = ≤ K
3 cdlemk3.j ⊢ ∨ ˙ = join ⁡ K
4 cdlemk3.m ⊢ ∧ ˙ = meet ⁡ K
5 cdlemk3.a ⊢ A = Atoms ⁡ K
6 cdlemk3.h ⊢ H = LHyp ⁡ K
7 cdlemk3.t ⊢ T = LTrn ⁡ K ⁡ W
8 cdlemk3.r ⊢ R = trL ⁡ K ⁡ W
9 cdlemk3.s ⊢ S = f ∈ T ⟼ ι i ∈ T | i ⁡ P = P ∨ ˙ R ⁡ f ∧ ˙ N ⁡ P ∨ ˙ R ⁡ f ∘ F -1
10 cdlemk3.u1 ⊢ Y = d ∈ T , e ∈ T ⟼ ι j ∈ T | j ⁡ P = P ∨ ˙ R ⁡ e ∧ ˙ S ⁡ d ⁡ P ∨ ˙ R ⁡ e ∘ d -1
11 simp22 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ G ∈ T ∧ F ∈ T ∧ D ∈ T ∧ N ∈ T ∧ R ⁡ D ≠ R ⁡ F ∧ R ⁡ D ≠ R ⁡ G ∧ F ≠ I ↾ B ∧ G ≠ I ↾ B ∧ D ≠ I ↾ B ∧ P ∈ A ∧ ¬ P ≤ ˙ W → D ∈ T
12 simp13 ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ G ∈ T ∧ F ∈ T ∧ D ∈ T ∧ N ∈ T ∧ R ⁡ D ≠ R ⁡ F ∧ R ⁡ D ≠ R ⁡ G ∧ F ≠ I ↾ B ∧ G ≠ I ↾ B ∧ D ≠ I ↾ B ∧ P ∈ A ∧ ¬ P ≤ ˙ W → G ∈ T
13 eqid ⊢ S ⁡ D = S ⁡ D
14 eqid ⊢ e ∈ T ⟼ ι j ∈ T | j ⁡ P = P ∨ ˙ R ⁡ e ∧ ˙ S ⁡ D ⁡ P ∨ ˙ R ⁡ e ∘ D -1 = e ∈ T ⟼ ι j ∈ T | j ⁡ P = P ∨ ˙ R ⁡ e ∧ ˙ S ⁡ D ⁡ P ∨ ˙ R ⁡ e ∘ D -1
15 1 2 3 4 5 6 7 8 9 10 13 14 cdlemkuu ⊢ D ∈ T ∧ G ∈ T → D Y G = e ∈ T ⟼ ι j ∈ T | j ⁡ P = P ∨ ˙ R ⁡ e ∧ ˙ S ⁡ D ⁡ P ∨ ˙ R ⁡ e ∘ D -1 ⁡ G
16 11 12 15 syl2anc ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ G ∈ T ∧ F ∈ T ∧ D ∈ T ∧ N ∈ T ∧ R ⁡ D ≠ R ⁡ F ∧ R ⁡ D ≠ R ⁡ G ∧ F ≠ I ↾ B ∧ G ≠ I ↾ B ∧ D ≠ I ↾ B ∧ P ∈ A ∧ ¬ P ≤ ˙ W → D Y G = e ∈ T ⟼ ι j ∈ T | j ⁡ P = P ∨ ˙ R ⁡ e ∧ ˙ S ⁡ D ⁡ P ∨ ˙ R ⁡ e ∘ D -1 ⁡ G
17 1 2 3 4 5 6 7 8 9 13 14 cdlemkuel ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ G ∈ T ∧ F ∈ T ∧ D ∈ T ∧ N ∈ T ∧ R ⁡ D ≠ R ⁡ F ∧ R ⁡ D ≠ R ⁡ G ∧ F ≠ I ↾ B ∧ G ≠ I ↾ B ∧ D ≠ I ↾ B ∧ P ∈ A ∧ ¬ P ≤ ˙ W → e ∈ T ⟼ ι j ∈ T | j ⁡ P = P ∨ ˙ R ⁡ e ∧ ˙ S ⁡ D ⁡ P ∨ ˙ R ⁡ e ∘ D -1 ⁡ G ∈ T
18 16 17 eqeltrd ⊢ K ∈ HL ∧ W ∈ H ∧ R ⁡ F = R ⁡ N ∧ G ∈ T ∧ F ∈ T ∧ D ∈ T ∧ N ∈ T ∧ R ⁡ D ≠ R ⁡ F ∧ R ⁡ D ≠ R ⁡ G ∧ F ≠ I ↾ B ∧ G ≠ I ↾ B ∧ D ≠ I ↾ B ∧ P ∈ A ∧ ¬ P ≤ ˙ W → D Y G ∈ T