Theorem pmodl42N 34155

Description: Lemma derived from modular law. (Contributed by NM, 8-Apr-2012.) (New usage is discouraged.)

Hypotheses

Ref	Expression
pmodl42.s	⊢ 𝑆 = (PSubSp‘𝐾)
pmodl42.p	⊢ + = (+𝑃‘𝐾)

Assertion

Ref	Expression
pmodl42N	⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (((𝑋 + 𝑌) + 𝑍) ∩ ((𝑋 + 𝑌) + 𝑊)) = ((𝑋 + 𝑌) + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊))))

Proof of Theorem pmodl42N

Step	Hyp	Ref	Expression
1		incom 3767	. . . 4 ⊢ ((𝑌 + (𝑋 + 𝑍)) ∩ (𝑌 + 𝑊)) = ((𝑌 + 𝑊) ∩ (𝑌 + (𝑋 + 𝑍)))
2		simpl1 1057	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝐾 ∈ HL)
3		simpl3 1059	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑌 ∈ 𝑆)
4		eqid 2610	. . . . . . 7 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
5		pmodl42.s	. . . . . . 7 ⊢ 𝑆 = (PSubSp‘𝐾)
6	4, 5	psubssat 34058	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑌 ∈ 𝑆) → 𝑌 ⊆ (Atoms‘𝐾))
7	2, 3, 6	syl2anc 691	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑌 ⊆ (Atoms‘𝐾))
8		simpl2 1058	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑋 ∈ 𝑆)
9	4, 5	psubssat 34058	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆) → 𝑋 ⊆ (Atoms‘𝐾))
10	2, 8, 9	syl2anc 691	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑋 ⊆ (Atoms‘𝐾))
11		simprl 790	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑍 ∈ 𝑆)
12	4, 5	psubssat 34058	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑍 ∈ 𝑆) → 𝑍 ⊆ (Atoms‘𝐾))
13	2, 11, 12	syl2anc 691	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑍 ⊆ (Atoms‘𝐾))
14		pmodl42.p	. . . . . . 7 ⊢ + = (+𝑃‘𝐾)
15	4, 14	paddssat 34118	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ⊆ (Atoms‘𝐾) ∧ 𝑍 ⊆ (Atoms‘𝐾)) → (𝑋 + 𝑍) ⊆ (Atoms‘𝐾))
16	2, 10, 13, 15	syl3anc 1318	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (𝑋 + 𝑍) ⊆ (Atoms‘𝐾))
17		simprr 792	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑊 ∈ 𝑆)
18	5, 14	paddclN 34146	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑌 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆) → (𝑌 + 𝑊) ∈ 𝑆)
19	2, 3, 17, 18	syl3anc 1318	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (𝑌 + 𝑊) ∈ 𝑆)
20	4, 5	psubssat 34058	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝑆) → 𝑊 ⊆ (Atoms‘𝐾))
21	2, 17, 20	syl2anc 691	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑊 ⊆ (Atoms‘𝐾))
22	4, 14	sspadd1 34119	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑌 ⊆ (Atoms‘𝐾) ∧ 𝑊 ⊆ (Atoms‘𝐾)) → 𝑌 ⊆ (𝑌 + 𝑊))
23	2, 7, 21, 22	syl3anc 1318	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑌 ⊆ (𝑌 + 𝑊))
24	4, 5, 14	pmod1i 34152	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑌 ⊆ (Atoms‘𝐾) ∧ (𝑋 + 𝑍) ⊆ (Atoms‘𝐾) ∧ (𝑌 + 𝑊) ∈ 𝑆)) → (𝑌 ⊆ (𝑌 + 𝑊) → ((𝑌 + (𝑋 + 𝑍)) ∩ (𝑌 + 𝑊)) = (𝑌 + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊)))))
25	24	3impia 1253	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑌 ⊆ (Atoms‘𝐾) ∧ (𝑋 + 𝑍) ⊆ (Atoms‘𝐾) ∧ (𝑌 + 𝑊) ∈ 𝑆) ∧ 𝑌 ⊆ (𝑌 + 𝑊)) → ((𝑌 + (𝑋 + 𝑍)) ∩ (𝑌 + 𝑊)) = (𝑌 + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊))))
26	2, 7, 16, 19, 23, 25	syl131anc 1331	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → ((𝑌 + (𝑋 + 𝑍)) ∩ (𝑌 + 𝑊)) = (𝑌 + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊))))
27	1, 26	syl5reqr 2659	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (𝑌 + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊))) = ((𝑌 + 𝑊) ∩ (𝑌 + (𝑋 + 𝑍))))
28	27	oveq2d 6565	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (𝑋 + (𝑌 + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊)))) = (𝑋 + ((𝑌 + 𝑊) ∩ (𝑌 + (𝑋 + 𝑍)))))
29		ssinss1 3803	. . . 4 ⊢ ((𝑋 + 𝑍) ⊆ (Atoms‘𝐾) → ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊)) ⊆ (Atoms‘𝐾))
30	16, 29	syl 17	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊)) ⊆ (Atoms‘𝐾))
31	4, 14	paddass 34142	. . 3 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ⊆ (Atoms‘𝐾) ∧ 𝑌 ⊆ (Atoms‘𝐾) ∧ ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊)) ⊆ (Atoms‘𝐾))) → ((𝑋 + 𝑌) + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊))) = (𝑋 + (𝑌 + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊)))))
32	2, 10, 7, 30, 31	syl13anc 1320	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → ((𝑋 + 𝑌) + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊))) = (𝑋 + (𝑌 + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊)))))
33	4, 14	paddass 34142	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ⊆ (Atoms‘𝐾) ∧ 𝑌 ⊆ (Atoms‘𝐾) ∧ 𝑍 ⊆ (Atoms‘𝐾))) → ((𝑋 + 𝑌) + 𝑍) = (𝑋 + (𝑌 + 𝑍)))
34	2, 10, 7, 13, 33	syl13anc 1320	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → ((𝑋 + 𝑌) + 𝑍) = (𝑋 + (𝑌 + 𝑍)))
35	4, 14	padd12N 34143	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ⊆ (Atoms‘𝐾) ∧ 𝑌 ⊆ (Atoms‘𝐾) ∧ 𝑍 ⊆ (Atoms‘𝐾))) → (𝑋 + (𝑌 + 𝑍)) = (𝑌 + (𝑋 + 𝑍)))
36	2, 10, 7, 13, 35	syl13anc 1320	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (𝑋 + (𝑌 + 𝑍)) = (𝑌 + (𝑋 + 𝑍)))
37	34, 36	eqtrd 2644	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → ((𝑋 + 𝑌) + 𝑍) = (𝑌 + (𝑋 + 𝑍)))
38	4, 14	paddass 34142	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ⊆ (Atoms‘𝐾) ∧ 𝑌 ⊆ (Atoms‘𝐾) ∧ 𝑊 ⊆ (Atoms‘𝐾))) → ((𝑋 + 𝑌) + 𝑊) = (𝑋 + (𝑌 + 𝑊)))
39	2, 10, 7, 21, 38	syl13anc 1320	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → ((𝑋 + 𝑌) + 𝑊) = (𝑋 + (𝑌 + 𝑊)))
40	37, 39	ineq12d 3777	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (((𝑋 + 𝑌) + 𝑍) ∩ ((𝑋 + 𝑌) + 𝑊)) = ((𝑌 + (𝑋 + 𝑍)) ∩ (𝑋 + (𝑌 + 𝑊))))
41		incom 3767	. . . 4 ⊢ ((𝑌 + (𝑋 + 𝑍)) ∩ (𝑋 + (𝑌 + 𝑊))) = ((𝑋 + (𝑌 + 𝑊)) ∩ (𝑌 + (𝑋 + 𝑍)))
42	40, 41	syl6eq 2660	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (((𝑋 + 𝑌) + 𝑍) ∩ ((𝑋 + 𝑌) + 𝑊)) = ((𝑋 + (𝑌 + 𝑊)) ∩ (𝑌 + (𝑋 + 𝑍))))
43	4, 5	psubssat 34058	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑌 + 𝑊) ∈ 𝑆) → (𝑌 + 𝑊) ⊆ (Atoms‘𝐾))
44	2, 19, 43	syl2anc 691	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (𝑌 + 𝑊) ⊆ (Atoms‘𝐾))
45	5, 14	paddclN 34146	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑍 ∈ 𝑆) → (𝑋 + 𝑍) ∈ 𝑆)
46	2, 8, 11, 45	syl3anc 1318	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (𝑋 + 𝑍) ∈ 𝑆)
47	5, 14	paddclN 34146	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑌 ∈ 𝑆 ∧ (𝑋 + 𝑍) ∈ 𝑆) → (𝑌 + (𝑋 + 𝑍)) ∈ 𝑆)
48	2, 3, 46, 47	syl3anc 1318	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (𝑌 + (𝑋 + 𝑍)) ∈ 𝑆)
49	4, 14	sspadd1 34119	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ⊆ (Atoms‘𝐾) ∧ 𝑍 ⊆ (Atoms‘𝐾)) → 𝑋 ⊆ (𝑋 + 𝑍))
50	2, 10, 13, 49	syl3anc 1318	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑋 ⊆ (𝑋 + 𝑍))
51	4, 14	sspadd2 34120	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ (𝑋 + 𝑍) ⊆ (Atoms‘𝐾) ∧ 𝑌 ⊆ (Atoms‘𝐾)) → (𝑋 + 𝑍) ⊆ (𝑌 + (𝑋 + 𝑍)))
52	2, 16, 7, 51	syl3anc 1318	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (𝑋 + 𝑍) ⊆ (𝑌 + (𝑋 + 𝑍)))
53	50, 52	sstrd 3578	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → 𝑋 ⊆ (𝑌 + (𝑋 + 𝑍)))
54	4, 5, 14	pmod1i 34152	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ⊆ (Atoms‘𝐾) ∧ (𝑌 + 𝑊) ⊆ (Atoms‘𝐾) ∧ (𝑌 + (𝑋 + 𝑍)) ∈ 𝑆)) → (𝑋 ⊆ (𝑌 + (𝑋 + 𝑍)) → ((𝑋 + (𝑌 + 𝑊)) ∩ (𝑌 + (𝑋 + 𝑍))) = (𝑋 + ((𝑌 + 𝑊) ∩ (𝑌 + (𝑋 + 𝑍))))))
55	54	3impia 1253	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ⊆ (Atoms‘𝐾) ∧ (𝑌 + 𝑊) ⊆ (Atoms‘𝐾) ∧ (𝑌 + (𝑋 + 𝑍)) ∈ 𝑆) ∧ 𝑋 ⊆ (𝑌 + (𝑋 + 𝑍))) → ((𝑋 + (𝑌 + 𝑊)) ∩ (𝑌 + (𝑋 + 𝑍))) = (𝑋 + ((𝑌 + 𝑊) ∩ (𝑌 + (𝑋 + 𝑍)))))
56	2, 10, 44, 48, 53, 55	syl131anc 1331	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → ((𝑋 + (𝑌 + 𝑊)) ∩ (𝑌 + (𝑋 + 𝑍))) = (𝑋 + ((𝑌 + 𝑊) ∩ (𝑌 + (𝑋 + 𝑍)))))
57	42, 56	eqtrd 2644	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (((𝑋 + 𝑌) + 𝑍) ∩ ((𝑋 + 𝑌) + 𝑊)) = (𝑋 + ((𝑌 + 𝑊) ∩ (𝑌 + (𝑋 + 𝑍)))))
58	28, 32, 57	3eqtr4rd 2655	1 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝑍 ∈ 𝑆 ∧ 𝑊 ∈ 𝑆)) → (((𝑋 + 𝑌) + 𝑍) ∩ ((𝑋 + 𝑌) + 𝑊)) = ((𝑋 + 𝑌) + ((𝑋 + 𝑍) ∩ (𝑌 + 𝑊))))

Syntax hints:   → wi 4   ∧ wa 383   ∧ w3a 1031   = wceq 1475   ∈ wcel 1977   ∩ cin 3539   ⊆ wss 3540  ‘cfv 5804  (class class class)co 6549  Atomscatm 33568  HLchlt 33655  PSubSpcpsubsp 33800  +_𝑃cpadd 34099

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-reu 2903  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-op 4132  df-uni 4373  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-id 4953  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-1st 7059  df-2nd 7060  df-preset 16751  df-poset 16769  df-plt 16781  df-lub 16797  df-glb 16798  df-join 16799  df-meet 16800  df-p0 16862  df-lat 16869  df-clat 16931  df-oposet 33481  df-ol 33483  df-oml 33484  df-covers 33571  df-ats 33572  df-atl 33603  df-cvlat 33627  df-hlat 33656  df-psubsp 33807  df-padd 34100

This theorem is referenced by:  pl42lem4N  34286