Theorem pl42lem1N 37687

Description: Lemma for pl42N 37691. (Contributed by NM, 8-Apr-2012.) (New usage is discouraged.)

Hypotheses

Ref	Expression
pl42lem.b	⊢ 𝐵 = (Base‘𝐾)
pl42lem.l	⊢ ≤ = (le‘𝐾)
pl42lem.j	⊢ ∨ = (join‘𝐾)
pl42lem.m	⊢ ∧ = (meet‘𝐾)
pl42lem.o	⊢ ⊥ = (oc‘𝐾)
pl42lem.f	⊢ 𝐹 = (pmap‘𝐾)
pl42lem.p	⊢ + = (+𝑃‘𝐾)

Assertion

Ref	Expression
pl42lem1N	⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵)) → ((𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊)) → (𝐹‘((((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∧ 𝑉)) = (((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊)) ∩ (𝐹‘𝑉))))

Proof of Theorem pl42lem1N

Step	Hyp	Ref	Expression
1		simp11 1205	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝐾 ∈ HL)
2	1	hllatd 37072	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝐾 ∈ Lat)
3		simp12 1206	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑋 ∈ 𝐵)
4		simp13 1207	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑌 ∈ 𝐵)
5		pl42lem.b	. . . . . . . 8 ⊢ 𝐵 = (Base‘𝐾)
6		pl42lem.j	. . . . . . . 8 ⊢ ∨ = (join‘𝐾)
7	5, 6	latjcl 17917	. . . . . . 7 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ∨ 𝑌) ∈ 𝐵)
8	2, 3, 4, 7	syl3anc 1373	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝑋 ∨ 𝑌) ∈ 𝐵)
9		simp21 1208	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑍 ∈ 𝐵)
10		pl42lem.m	. . . . . . 7 ⊢ ∧ = (meet‘𝐾)
11	5, 10	latmcl 17918	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (𝑋 ∨ 𝑌) ∈ 𝐵 ∧ 𝑍 ∈ 𝐵) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ∈ 𝐵)
12	2, 8, 9, 11	syl3anc 1373	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ∈ 𝐵)
13		simp22 1209	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑊 ∈ 𝐵)
14	5, 6	latjcl 17917	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ ((𝑋 ∨ 𝑌) ∧ 𝑍) ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) → (((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∈ 𝐵)
15	2, 12, 13, 14	syl3anc 1373	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∈ 𝐵)
16		simp23 1210	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑉 ∈ 𝐵)
17		eqid 2734	. . . . 5 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
18		pl42lem.f	. . . . 5 ⊢ 𝐹 = (pmap‘𝐾)
19	5, 10, 17, 18	pmapmeet 37481	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) → (𝐹‘((((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∧ 𝑉)) = ((𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) ∩ (𝐹‘𝑉)))
20	1, 15, 16, 19	syl3anc 1373	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘((((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∧ 𝑉)) = ((𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) ∩ (𝐹‘𝑉)))
21		pl42lem.l	. . . . . . 7 ⊢ ≤ = (le‘𝐾)
22		hlop 37070	. . . . . . . . 9 ⊢ (𝐾 ∈ HL → 𝐾 ∈ OP)
23	1, 22	syl 17	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝐾 ∈ OP)
24		pl42lem.o	. . . . . . . . 9 ⊢ ⊥ = (oc‘𝐾)
25	5, 24	opoccl 36902	. . . . . . . 8 ⊢ ((𝐾 ∈ OP ∧ 𝑊 ∈ 𝐵) → ( ⊥ ‘𝑊) ∈ 𝐵)
26	23, 13, 25	syl2anc 587	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ( ⊥ ‘𝑊) ∈ 𝐵)
27	5, 21, 10	latmle2 17943	. . . . . . . 8 ⊢ ((𝐾 ∈ Lat ∧ (𝑋 ∨ 𝑌) ∈ 𝐵 ∧ 𝑍 ∈ 𝐵) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ≤ 𝑍)
28	2, 8, 9, 27	syl3anc 1373	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ≤ 𝑍)
29		simp3r 1204	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑍 ≤ ( ⊥ ‘𝑊))
30	5, 21, 2, 12, 9, 26, 28, 29	lattrd 17924	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝑋 ∨ 𝑌) ∧ 𝑍) ≤ ( ⊥ ‘𝑊))
31		pl42lem.p	. . . . . . 7 ⊢ + = (+𝑃‘𝐾)
32	5, 21, 6, 18, 24, 31	pmapojoinN 37676	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ ((𝑋 ∨ 𝑌) ∧ 𝑍) ∈ 𝐵 ∧ 𝑊 ∈ 𝐵) ∧ ((𝑋 ∨ 𝑌) ∧ 𝑍) ≤ ( ⊥ ‘𝑊)) → (𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) = ((𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) + (𝐹‘𝑊)))
33	1, 12, 13, 30, 32	syl31anc 1375	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) = ((𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) + (𝐹‘𝑊)))
34	5, 10, 17, 18	pmapmeet 37481	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ (𝑋 ∨ 𝑌) ∈ 𝐵 ∧ 𝑍 ∈ 𝐵) → (𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) = ((𝐹‘(𝑋 ∨ 𝑌)) ∩ (𝐹‘𝑍)))
35	1, 8, 9, 34	syl3anc 1373	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) = ((𝐹‘(𝑋 ∨ 𝑌)) ∩ (𝐹‘𝑍)))
36		simp3l 1203	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → 𝑋 ≤ ( ⊥ ‘𝑌))
37	5, 21, 6, 18, 24, 31	pmapojoinN 37676	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑋 ≤ ( ⊥ ‘𝑌)) → (𝐹‘(𝑋 ∨ 𝑌)) = ((𝐹‘𝑋) + (𝐹‘𝑌)))
38	1, 3, 4, 36, 37	syl31anc 1375	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘(𝑋 ∨ 𝑌)) = ((𝐹‘𝑋) + (𝐹‘𝑌)))
39	38	ineq1d 4116	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝐹‘(𝑋 ∨ 𝑌)) ∩ (𝐹‘𝑍)) = (((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)))
40	35, 39	eqtrd 2774	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) = (((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)))
41	40	oveq1d 7217	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝐹‘((𝑋 ∨ 𝑌) ∧ 𝑍)) + (𝐹‘𝑊)) = ((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊)))
42	33, 41	eqtrd 2774	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) = ((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊)))
43	42	ineq1d 4116	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → ((𝐹‘(((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊)) ∩ (𝐹‘𝑉)) = (((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊)) ∩ (𝐹‘𝑉)))
44	20, 43	eqtrd 2774	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵) ∧ (𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊))) → (𝐹‘((((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∧ 𝑉)) = (((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊)) ∩ (𝐹‘𝑉)))
45	44	3expia 1123	1 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ (𝑍 ∈ 𝐵 ∧ 𝑊 ∈ 𝐵 ∧ 𝑉 ∈ 𝐵)) → ((𝑋 ≤ ( ⊥ ‘𝑌) ∧ 𝑍 ≤ ( ⊥ ‘𝑊)) → (𝐹‘((((𝑋 ∨ 𝑌) ∧ 𝑍) ∨ 𝑊) ∧ 𝑉)) = (((((𝐹‘𝑋) + (𝐹‘𝑌)) ∩ (𝐹‘𝑍)) + (𝐹‘𝑊)) ∩ (𝐹‘𝑉))))

Syntax hints:   → wi 4   ∧ wa 399   ∧ w3a 1089   = wceq 1543   ∈ wcel 2110   ∩ cin 3856   class class class wbr 5043  ‘cfv 6369  (class class class)co 7202  Basecbs 16684  lecple 16774  occoc 16775  joincjn 17790  meetcmee 17791  Latclat 17909  OPcops 36880  Atomscatm 36971  HLchlt 37058  pmapcpmap 37205  +_𝑃cpadd 37503

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2016  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2706  ax-rep 5168  ax-sep 5181  ax-nul 5188  ax-pow 5247  ax-pr 5311  ax-un 7512  ax-riotaBAD 36661

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-3an 1091  df-tru 1546  df-fal 1556  df-ex 1788  df-nf 1792  df-sb 2071  df-mo 2537  df-eu 2566  df-clab 2713  df-cleq 2726  df-clel 2812  df-nfc 2882  df-ne 2936  df-ral 3059  df-rex 3060  df-reu 3061  df-rmo 3062  df-rab 3063  df-v 3403  df-sbc 3688  df-csb 3803  df-dif 3860  df-un 3862  df-in 3864  df-ss 3874  df-pss 3876  df-nul 4228  df-if 4430  df-pw 4505  df-sn 4532  df-pr 4534  df-op 4538  df-uni 4810  df-iun 4896  df-iin 4897  df-br 5044  df-opab 5106  df-mpt 5125  df-id 5444  df-xp 5546  df-rel 5547  df-cnv 5548  df-co 5549  df-dm 5550  df-rn 5551  df-res 5552  df-ima 5553  df-iota 6327  df-fun 6371  df-fn 6372  df-f 6373  df-f1 6374  df-fo 6375  df-f1o 6376  df-fv 6377  df-riota 7159  df-ov 7205  df-oprab 7206  df-mpo 7207  df-1st 7750  df-2nd 7751  df-undef 8004  df-proset 17774  df-poset 17792  df-plt 17808  df-lub 17824  df-glb 17825  df-join 17826  df-meet 17827  df-p0 17903  df-p1 17904  df-lat 17910  df-clat 17977  df-oposet 36884  df-ol 36886  df-oml 36887  df-covers 36974  df-ats 36975  df-atl 37006  df-cvlat 37030  df-hlat 37059  df-psubsp 37211  df-pmap 37212  df-padd 37504  df-polarityN 37611  df-psubclN 37643

This theorem is referenced by:  pl42lem4N  37690