Metamath Proof Explorer


Theorem cdlemeg46gfv

Description: TODO FIX COMMENT p. 115 penultimate line: g(f(r)) = (p v q) ^ (g(s) v v_1). (Contributed by NM, 4-Apr-2013)

Ref Expression
Hypotheses cdlemef46g.b B = Base K
cdlemef46g.l ˙ = K
cdlemef46g.j ˙ = join K
cdlemef46g.m ˙ = meet K
cdlemef46g.a A = Atoms K
cdlemef46g.h H = LHyp K
cdlemef46g.u U = P ˙ Q ˙ W
cdlemef46g.d D = t ˙ U ˙ Q ˙ P ˙ t ˙ W
cdlemefs46g.e E = P ˙ Q ˙ D ˙ s ˙ t ˙ W
cdlemef46g.f F = 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 = E s / t D ˙ x ˙ W x
cdlemef46.v V = Q ˙ P ˙ W
cdlemef46.n N = v ˙ V ˙ P ˙ Q ˙ v ˙ W
cdlemefs46.o O = Q ˙ P ˙ N ˙ u ˙ v ˙ W
cdlemef46.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
cdlemeg46.y Y = R ˙ G S ˙ W
cdlemeg46.x X = F R ˙ S ˙ W
Assertion cdlemeg46gfv 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 F R = P ˙ Q ˙ G S ˙ X

Proof

Step Hyp Ref Expression
1 cdlemef46g.b B = Base K
2 cdlemef46g.l ˙ = K
3 cdlemef46g.j ˙ = join K
4 cdlemef46g.m ˙ = meet K
5 cdlemef46g.a A = Atoms K
6 cdlemef46g.h H = LHyp K
7 cdlemef46g.u U = P ˙ Q ˙ W
8 cdlemef46g.d D = t ˙ U ˙ Q ˙ P ˙ t ˙ W
9 cdlemefs46g.e E = P ˙ Q ˙ D ˙ s ˙ t ˙ W
10 cdlemef46g.f F = 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 = E s / t D ˙ x ˙ W x
11 cdlemef46.v V = Q ˙ P ˙ W
12 cdlemef46.n N = v ˙ V ˙ P ˙ Q ˙ v ˙ W
13 cdlemefs46.o O = Q ˙ P ˙ N ˙ u ˙ v ˙ W
14 cdlemef46.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
15 cdlemeg46.y Y = R ˙ G S ˙ W
16 cdlemeg46.x X = F R ˙ S ˙ W
17 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
18 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
19 simp22 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 ¬ R ˙ W
20 1 2 3 4 5 6 7 8 9 10 cdleme46fvaw K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W R A ¬ R ˙ W F R A ¬ F R ˙ W
21 17 19 20 syl2anc 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 F R A ¬ F R ˙ W
22 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
23 simp3l 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 ˙ P ˙ Q
24 1 2 3 4 5 6 7 8 9 10 cdleme46fsvlpq K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q R A ¬ R ˙ W R ˙ P ˙ Q F R ˙ P ˙ Q
25 17 18 19 23 24 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 F R ˙ P ˙ Q
26 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
27 1 2 3 4 5 6 11 12 13 14 cdlemeg47rv2 K HL W H P A ¬ P ˙ W Q A ¬ Q ˙ W P Q F R A ¬ F R ˙ W S A ¬ S ˙ W F R ˙ P ˙ Q ¬ S ˙ P ˙ Q G F R = Q ˙ P ˙ G S ˙ F R ˙ S ˙ W
28 17 18 21 22 25 26 27 syl132anc 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 F R = Q ˙ P ˙ G S ˙ F R ˙ S ˙ W
29 simp11l 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
30 simp12l 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 A
31 simp13l 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 A
32 3 5 hlatjcom K HL P A Q A P ˙ Q = Q ˙ P
33 29 30 31 32 syl3anc 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 = Q ˙ P
34 16 oveq2i G S ˙ X = G S ˙ F R ˙ S ˙ W
35 34 a1i 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 ˙ X = G S ˙ F R ˙ S ˙ W
36 33 35 oveq12d 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 ˙ G S ˙ X = Q ˙ P ˙ G S ˙ F R ˙ S ˙ W
37 28 36 eqtr4d 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 F R = P ˙ Q ˙ G S ˙ X