Metamath Proof Explorer


Theorem cdlemeg47rv2

Description: Value of g_s(r) when r is an atom under pq and s is any atom not under pq, using very compact hypotheses. TODO: FIX COMMENT. (Contributed by NM, 1-Apr-2013)

Ref Expression
Hypotheses cdlemef47.b ⊢ B = Base K
cdlemef47.l ⊢ ≤ ˙ = ≤ K
cdlemef47.j ⊢ ∨ ˙ = join ⁡ K
cdlemef47.m ⊢ ∧ ˙ = meet ⁡ K
cdlemef47.a ⊢ A = Atoms ⁡ K
cdlemef47.h ⊢ H = LHyp ⁡ K
cdlemef47.v ⊢ V = Q ∨ ˙ P ∧ ˙ W
cdlemef47.n ⊢ N = v ∨ ˙ V ∧ ˙ P ∨ ˙ Q ∨ ˙ v ∧ ˙ W
cdlemefs47.o ⊢ O = Q ∨ ˙ P ∧ ˙ N ∨ ˙ u ∨ ˙ v ∧ ˙ W
cdlemef47.g ⊢ G = a ∈ B ⟼ if Q ≠ P ∧ ¬ a ≤ ˙ W ι c ∈ B | ∀ u ∈ A ¬ u ≤ ˙ W ∧ u ∨ ˙ a ∧ ˙ W = a → c = if u ≤ ˙ Q ∨ ˙ P ι b ∈ B | ∀ v ∈ A ¬ v ≤ ˙ W ∧ ¬ v ≤ ˙ Q ∨ ˙ P → b = O ⦋ u / v⦌ N ∨ ˙ a ∧ ˙ W a
Assertion cdlemeg47rv2 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → G ⁡ R = Q ∨ ˙ P ∧ ˙ G ⁡ S ∨ ˙ R ∨ ˙ S ∧ ˙ W

Proof

Step Hyp Ref Expression
1 cdlemef47.b ⊢ B = Base K
2 cdlemef47.l ⊢ ≤ ˙ = ≤ K
3 cdlemef47.j ⊢ ∨ ˙ = join ⁡ K
4 cdlemef47.m ⊢ ∧ ˙ = meet ⁡ K
5 cdlemef47.a ⊢ A = Atoms ⁡ K
6 cdlemef47.h ⊢ H = LHyp ⁡ K
7 cdlemef47.v ⊢ V = Q ∨ ˙ P ∧ ˙ W
8 cdlemef47.n ⊢ N = v ∨ ˙ V ∧ ˙ P ∨ ˙ Q ∨ ˙ v ∧ ˙ W
9 cdlemefs47.o ⊢ O = Q ∨ ˙ P ∧ ˙ N ∨ ˙ u ∨ ˙ v ∧ ˙ W
10 cdlemef47.g ⊢ G = a ∈ B ⟼ if Q ≠ P ∧ ¬ a ≤ ˙ W ι c ∈ B | ∀ u ∈ A ¬ u ≤ ˙ W ∧ u ∨ ˙ a ∧ ˙ W = a → c = if u ≤ ˙ Q ∨ ˙ P ι b ∈ B | ∀ v ∈ A ¬ v ≤ ˙ W ∧ ¬ v ≤ ˙ Q ∨ ˙ P → b = O ⦋ u / v⦌ N ∨ ˙ a ∧ ˙ W a
11 1 2 3 4 5 6 7 8 9 10 cdlemeg47rv ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → G ⁡ R = ⦋ R / u⦌ ⦋ S / v⦌ O
12 simp22l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → R ∈ A
13 nfcvd ⊢ R ∈ A → Ⅎ _ u Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ R ∨ ˙ S ∧ ˙ W
14 oveq1 ⊢ u = R → u ∨ ˙ S = R ∨ ˙ S
15 14 oveq1d ⊢ u = R → u ∨ ˙ S ∧ ˙ W = R ∨ ˙ S ∧ ˙ W
16 15 oveq2d ⊢ u = R → ⦋ S / v⦌ N ∨ ˙ u ∨ ˙ S ∧ ˙ W = ⦋ S / v⦌ N ∨ ˙ R ∨ ˙ S ∧ ˙ W
17 16 oveq2d ⊢ u = R → Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ u ∨ ˙ S ∧ ˙ W = Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ R ∨ ˙ S ∧ ˙ W
18 13 17 csbiegf ⊢ R ∈ A → ⦋ R / u⦌ Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ u ∨ ˙ S ∧ ˙ W = Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ R ∨ ˙ S ∧ ˙ W
19 12 18 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ⦋ R / u⦌ Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ u ∨ ˙ S ∧ ˙ W = Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ R ∨ ˙ S ∧ ˙ W
20 simp23l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → S ∈ A
21 eqid ⊢ Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ u ∨ ˙ S ∧ ˙ W = Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ u ∨ ˙ S ∧ ˙ W
22 9 21 cdleme31se2 ⊢ S ∈ A → ⦋ S / v⦌ O = Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ u ∨ ˙ S ∧ ˙ W
23 20 22 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ⦋ S / v⦌ O = Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ u ∨ ˙ S ∧ ˙ W
24 23 csbeq2dv ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ⦋ R / u⦌ ⦋ S / v⦌ O = ⦋ R / u⦌ Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ u ∨ ˙ S ∧ ˙ W
25 simp1 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W
26 simp21 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ≠ Q
27 simp23 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → S ∈ A ∧ ¬ S ≤ ˙ W
28 simp3r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ¬ S ≤ ˙ P ∨ ˙ Q
29 1 2 3 4 5 6 7 8 9 10 cdlemeg47b ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → G ⁡ S = ⦋ S / v⦌ N
30 25 26 27 28 29 syl121anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → G ⁡ S = ⦋ S / v⦌ N
31 30 oveq1d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → G ⁡ S ∨ ˙ R ∨ ˙ S ∧ ˙ W = ⦋ S / v⦌ N ∨ ˙ R ∨ ˙ S ∧ ˙ W
32 31 oveq2d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Q ∨ ˙ P ∧ ˙ G ⁡ S ∨ ˙ R ∨ ˙ S ∧ ˙ W = Q ∨ ˙ P ∧ ˙ ⦋ S / v⦌ N ∨ ˙ R ∨ ˙ S ∧ ˙ W
33 19 24 32 3eqtr4d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ⦋ R / u⦌ ⦋ S / v⦌ O = Q ∨ ˙ P ∧ ˙ G ⁡ S ∨ ˙ R ∨ ˙ S ∧ ˙ W
34 11 33 eqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → G ⁡ R = Q ∨ ˙ P ∧ ˙ G ⁡ S ∨ ˙ R ∨ ˙ S ∧ ˙ W