Metamath Proof Explorer


Theorem cdlemg2fv

Description: Value of a translation in terms of an associated atom. cdleme48fvg with simpler hypotheses. TODO: Use ltrnj to vastly simplify. (Contributed by NM, 23-Apr-2013)

Ref Expression
Hypotheses cdlemg2inv.h ⊢ H = LHyp ⁡ K
cdlemg2inv.t ⊢ T = LTrn ⁡ K ⁡ W
cdlemg2j.l ⊢ ≤ ˙ = ≤ K
cdlemg2j.j ⊢ ∨ ˙ = join ⁡ K
cdlemg2j.a ⊢ A = Atoms ⁡ K
cdlemg2j.m ⊢ ∧ ˙ = meet ⁡ K
cdlemg2j.b ⊢ B = Base K
Assertion cdlemg2fv ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ F ∈ T ∧ P ∨ ˙ X ∧ ˙ W = X → F ⁡ X = F ⁡ P ∨ ˙ X ∧ ˙ W

Proof

Step Hyp Ref Expression
1 cdlemg2inv.h ⊢ H = LHyp ⁡ K
2 cdlemg2inv.t ⊢ T = LTrn ⁡ K ⁡ W
3 cdlemg2j.l ⊢ ≤ ˙ = ≤ K
4 cdlemg2j.j ⊢ ∨ ˙ = join ⁡ K
5 cdlemg2j.a ⊢ A = Atoms ⁡ K
6 cdlemg2j.m ⊢ ∧ ˙ = meet ⁡ K
7 cdlemg2j.b ⊢ B = Base K
8 eqid ⊢ p ∨ ˙ q ∧ ˙ W = p ∨ ˙ q ∧ ˙ W
9 eqid ⊢ t ∨ ˙ p ∨ ˙ q ∧ ˙ W ∧ ˙ q ∨ ˙ p ∨ ˙ t ∧ ˙ W = t ∨ ˙ p ∨ ˙ q ∧ ˙ W ∧ ˙ q ∨ ˙ p ∨ ˙ t ∧ ˙ W
10 eqid ⊢ p ∨ ˙ q ∧ ˙ t ∨ ˙ p ∨ ˙ q ∧ ˙ W ∧ ˙ q ∨ ˙ p ∨ ˙ t ∧ ˙ W ∨ ˙ s ∨ ˙ t ∧ ˙ W = p ∨ ˙ q ∧ ˙ t ∨ ˙ p ∨ ˙ q ∧ ˙ W ∧ ˙ q ∨ ˙ p ∨ ˙ t ∧ ˙ W ∨ ˙ s ∨ ˙ t ∧ ˙ W
11 eqid ⊢ x ∈ B ⟼ if p ≠ q ∧ ¬ x ≤ ˙ W ι z ∈ B | ∀ s ∈ A ¬ s ≤ ˙ W ∧ s ∨ ˙ x ∧ ˙ W = x → z = if s ≤ ˙ p ∨ ˙ q ι y ∈ B | ∀ t ∈ A ¬ t ≤ ˙ W ∧ ¬ t ≤ ˙ p ∨ ˙ q → y = p ∨ ˙ q ∧ ˙ t ∨ ˙ p ∨ ˙ q ∧ ˙ W ∧ ˙ q ∨ ˙ p ∨ ˙ t ∧ ˙ W ∨ ˙ s ∨ ˙ t ∧ ˙ W ⦋ s / t⦌ t ∨ ˙ p ∨ ˙ q ∧ ˙ W ∧ ˙ q ∨ ˙ p ∨ ˙ t ∧ ˙ W ∨ ˙ x ∧ ˙ W x = x ∈ B ⟼ if p ≠ q ∧ ¬ x ≤ ˙ W ι z ∈ B | ∀ s ∈ A ¬ s ≤ ˙ W ∧ s ∨ ˙ x ∧ ˙ W = x → z = if s ≤ ˙ p ∨ ˙ q ι y ∈ B | ∀ t ∈ A ¬ t ≤ ˙ W ∧ ¬ t ≤ ˙ p ∨ ˙ q → y = p ∨ ˙ q ∧ ˙ t ∨ ˙ p ∨ ˙ q ∧ ˙ W ∧ ˙ q ∨ ˙ p ∨ ˙ t ∧ ˙ W ∨ ˙ s ∨ ˙ t ∧ ˙ W ⦋ s / t⦌ t ∨ ˙ p ∨ ˙ q ∧ ˙ W ∧ ˙ q ∨ ˙ p ∨ ˙ t ∧ ˙ W ∨ ˙ x ∧ ˙ W x
12 7 3 4 6 5 1 2 8 9 10 11 cdlemg2fvlem ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ F ∈ T ∧ P ∨ ˙ X ∧ ˙ W = X → F ⁡ X = F ⁡ P ∨ ˙ X ∧ ˙ W