Metamath Proof Explorer


Theorem 3dim2

Description: Construct 2 new layers on top of 2 given atoms. (Contributed by NM, 27-Jul-2012)

Ref Expression
Hypotheses 3dim0.j ˙=joinK
3dim0.l ˙=K
3dim0.a A=AtomsK
Assertion 3dim2 KHLPAQArAsA¬r˙P˙Q¬s˙P˙Q˙r

Proof

Step Hyp Ref Expression
1 3dim0.j ˙=joinK
2 3dim0.l ˙=K
3 3dim0.a A=AtomsK
4 1 2 3 3dim1 KHLQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙v
5 4 3adant2 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙v
6 simpl21 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=QuA
7 simpl22 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=QvA
8 simp31 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vQu
9 8 necomd KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vuQ
10 9 adantr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=QuQ
11 oveq1 P=QP˙Q=Q˙Q
12 simp11 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vKHL
13 simp13 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vQA
14 1 3 hlatjidm KHLQAQ˙Q=Q
15 12 13 14 syl2anc KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vQ˙Q=Q
16 11 15 sylan9eqr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=QP˙Q=Q
17 16 breq2d KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=Qu˙P˙Qu˙Q
18 17 notbid KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=Q¬u˙P˙Q¬u˙Q
19 hlatl KHLKAtLat
20 12 19 syl KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vKAtLat
21 simp21 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vuA
22 2 3 atncmp KAtLatuAQA¬u˙QuQ
23 20 21 13 22 syl3anc KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙v¬u˙QuQ
24 23 adantr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=Q¬u˙QuQ
25 18 24 bitrd KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=Q¬u˙P˙QuQ
26 10 25 mpbird KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=Q¬u˙P˙Q
27 simpl32 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=Q¬v˙Q˙u
28 16 oveq1d KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=QP˙Q˙u=Q˙u
29 28 breq2d KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=Qv˙P˙Q˙uv˙Q˙u
30 27 29 mtbird KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=Q¬v˙P˙Q˙u
31 breq1 r=ur˙P˙Qu˙P˙Q
32 31 notbid r=u¬r˙P˙Q¬u˙P˙Q
33 oveq2 r=uP˙Q˙r=P˙Q˙u
34 33 breq2d r=us˙P˙Q˙rs˙P˙Q˙u
35 34 notbid r=u¬s˙P˙Q˙r¬s˙P˙Q˙u
36 32 35 anbi12d r=u¬r˙P˙Q¬s˙P˙Q˙r¬u˙P˙Q¬s˙P˙Q˙u
37 breq1 s=vs˙P˙Q˙uv˙P˙Q˙u
38 37 notbid s=v¬s˙P˙Q˙u¬v˙P˙Q˙u
39 38 anbi2d s=v¬u˙P˙Q¬s˙P˙Q˙u¬u˙P˙Q¬v˙P˙Q˙u
40 36 39 rspc2ev uAvA¬u˙P˙Q¬v˙P˙Q˙urAsA¬r˙P˙Q¬s˙P˙Q˙r
41 6 7 26 30 40 syl112anc KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vP=QrAsA¬r˙P˙Q¬s˙P˙Q˙r
42 simp22 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vvA
43 simp23 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vwA
44 42 43 jca KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vvAwA
45 44 ad2antrr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQP˙Q˙uvAwA
46 simpll1 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQP˙Q˙uKHLPAQA
47 simp32 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙v¬v˙Q˙u
48 simp33 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙v¬w˙Q˙u˙v
49 21 47 48 3jca KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vuA¬v˙Q˙u¬w˙Q˙u˙v
50 49 ad2antrr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQP˙Q˙uuA¬v˙Q˙u¬w˙Q˙u˙v
51 simplr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQP˙Q˙uPQ
52 simpr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQP˙Q˙uP˙Q˙u
53 1 2 3 3dimlem2 KHLPAQAuA¬v˙Q˙u¬w˙Q˙u˙vPQP˙Q˙uPQ¬v˙P˙Q¬w˙P˙Q˙v
54 46 50 51 52 53 syl112anc KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQP˙Q˙uPQ¬v˙P˙Q¬w˙P˙Q˙v
55 3simpc PQ¬v˙P˙Q¬w˙P˙Q˙v¬v˙P˙Q¬w˙P˙Q˙v
56 54 55 syl KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQP˙Q˙u¬v˙P˙Q¬w˙P˙Q˙v
57 breq1 r=vr˙P˙Qv˙P˙Q
58 57 notbid r=v¬r˙P˙Q¬v˙P˙Q
59 oveq2 r=vP˙Q˙r=P˙Q˙v
60 59 breq2d r=vs˙P˙Q˙rs˙P˙Q˙v
61 60 notbid r=v¬s˙P˙Q˙r¬s˙P˙Q˙v
62 58 61 anbi12d r=v¬r˙P˙Q¬s˙P˙Q˙r¬v˙P˙Q¬s˙P˙Q˙v
63 breq1 s=ws˙P˙Q˙vw˙P˙Q˙v
64 63 notbid s=w¬s˙P˙Q˙v¬w˙P˙Q˙v
65 64 anbi2d s=w¬v˙P˙Q¬s˙P˙Q˙v¬v˙P˙Q¬w˙P˙Q˙v
66 62 65 rspc2ev vAwA¬v˙P˙Q¬w˙P˙Q˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
67 66 3expa vAwA¬v˙P˙Q¬w˙P˙Q˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
68 45 56 67 syl2anc KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQP˙Q˙urAsA¬r˙P˙Q¬s˙P˙Q˙r
69 21 43 jca KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vuAwA
70 69 ad3antrrr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙uP˙Q˙u˙vuAwA
71 simp1 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vKHLPAQA
72 21 42 jca KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vuAvA
73 8 48 jca KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vQu¬w˙Q˙u˙v
74 71 72 73 3jca KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vKHLPAQAuAvAQu¬w˙Q˙u˙v
75 74 ad3antrrr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙uP˙Q˙u˙vKHLPAQAuAvAQu¬w˙Q˙u˙v
76 simpllr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙uP˙Q˙u˙vPQ
77 simplr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙uP˙Q˙u˙v¬P˙Q˙u
78 simpr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙uP˙Q˙u˙vP˙Q˙u˙v
79 1 2 3 3dimlem3 KHLPAQAuAvAQu¬w˙Q˙u˙vPQ¬P˙Q˙uP˙Q˙u˙vPQ¬u˙P˙Q¬w˙P˙Q˙u
80 75 76 77 78 79 syl13anc KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙uP˙Q˙u˙vPQ¬u˙P˙Q¬w˙P˙Q˙u
81 3simpc PQ¬u˙P˙Q¬w˙P˙Q˙u¬u˙P˙Q¬w˙P˙Q˙u
82 80 81 syl KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙uP˙Q˙u˙v¬u˙P˙Q¬w˙P˙Q˙u
83 breq1 s=ws˙P˙Q˙uw˙P˙Q˙u
84 83 notbid s=w¬s˙P˙Q˙u¬w˙P˙Q˙u
85 84 anbi2d s=w¬u˙P˙Q¬s˙P˙Q˙u¬u˙P˙Q¬w˙P˙Q˙u
86 36 85 rspc2ev uAwA¬u˙P˙Q¬w˙P˙Q˙urAsA¬r˙P˙Q¬s˙P˙Q˙r
87 86 3expa uAwA¬u˙P˙Q¬w˙P˙Q˙urAsA¬r˙P˙Q¬s˙P˙Q˙r
88 70 82 87 syl2anc KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙uP˙Q˙u˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
89 72 ad3antrrr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙u¬P˙Q˙u˙vuAvA
90 8 47 jca KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vQu¬v˙Q˙u
91 71 72 90 3jca KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vKHLPAQAuAvAQu¬v˙Q˙u
92 91 ad3antrrr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙u¬P˙Q˙u˙vKHLPAQAuAvAQu¬v˙Q˙u
93 simpllr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙u¬P˙Q˙u˙vPQ
94 simplr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙u¬P˙Q˙u˙v¬P˙Q˙u
95 simpr KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙u¬P˙Q˙u˙v¬P˙Q˙u˙v
96 1 2 3 3dimlem4 KHLPAQAuAvAQu¬v˙Q˙uPQ¬P˙Q˙u¬P˙Q˙u˙vPQ¬u˙P˙Q¬v˙P˙Q˙u
97 92 93 94 95 96 syl121anc KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙u¬P˙Q˙u˙vPQ¬u˙P˙Q¬v˙P˙Q˙u
98 3simpc PQ¬u˙P˙Q¬v˙P˙Q˙u¬u˙P˙Q¬v˙P˙Q˙u
99 97 98 syl KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙u¬P˙Q˙u˙v¬u˙P˙Q¬v˙P˙Q˙u
100 40 3expa uAvA¬u˙P˙Q¬v˙P˙Q˙urAsA¬r˙P˙Q¬s˙P˙Q˙r
101 89 99 100 syl2anc KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙u¬P˙Q˙u˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
102 88 101 pm2.61dan KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQ¬P˙Q˙urAsA¬r˙P˙Q¬s˙P˙Q˙r
103 68 102 pm2.61dan KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vPQrAsA¬r˙P˙Q¬s˙P˙Q˙r
104 41 103 pm2.61dane KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
105 104 3exp KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
106 105 3expd KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
107 106 imp32 KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
108 107 rexlimdv KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
109 108 rexlimdvva KHLPAQAuAvAwAQu¬v˙Q˙u¬w˙Q˙u˙vrAsA¬r˙P˙Q¬s˙P˙Q˙r
110 5 109 mpd KHLPAQArAsA¬r˙P˙Q¬s˙P˙Q˙r