Theorem hlrelat2 39902

Description: A consequence of relative atomicity. (chrelat2i 32461 analog.) (Contributed by NM, 5-Feb-2012.)

Hypotheses

Ref	Expression
hlrelat2.b	⊢ 𝐵 = (Base‘𝐾)
hlrelat2.l	⊢ ≤ = (le‘𝐾)
hlrelat2.a	⊢ 𝐴 = (Atoms‘𝐾)

Assertion

Ref	Expression
hlrelat2	⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (¬ 𝑋 ≤ 𝑌 ↔ ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌)))

Distinct variable groups:   𝐴,𝑝   𝐵,𝑝   𝐾,𝑝   ≤ ,𝑝   𝑋,𝑝   𝑌,𝑝

Proof of Theorem hlrelat2

Step	Hyp	Ref	Expression
1		hllat 39862	. . . 4 ⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat)
2		hlrelat2.b	. . . . 5 ⊢ 𝐵 = (Base‘𝐾)
3		hlrelat2.l	. . . . 5 ⊢ ≤ = (le‘𝐾)
4		eqid 2740	. . . . 5 ⊢ (lt‘𝐾) = (lt‘𝐾)
5		eqid 2740	. . . . 5 ⊢ (meet‘𝐾) = (meet‘𝐾)
6	2, 3, 4, 5	latnlemlt 18436	. . . 4 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (¬ 𝑋 ≤ 𝑌 ↔ (𝑋(meet‘𝐾)𝑌)(lt‘𝐾)𝑋))
7	1, 6	syl3an1 1169	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (¬ 𝑋 ≤ 𝑌 ↔ (𝑋(meet‘𝐾)𝑌)(lt‘𝐾)𝑋))
8		simp1 1142	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → 𝐾 ∈ HL)
9	2, 5	latmcl 18404	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋(meet‘𝐾)𝑌) ∈ 𝐵)
10	1, 9	syl3an1 1169	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋(meet‘𝐾)𝑌) ∈ 𝐵)
11		simp2 1143	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → 𝑋 ∈ 𝐵)
12		eqid 2740	. . . . . . 7 ⊢ (join‘𝐾) = (join‘𝐾)
13		hlrelat2.a	. . . . . . 7 ⊢ 𝐴 = (Atoms‘𝐾)
14	2, 3, 4, 12, 13	hlrelat 39901	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ (𝑋(meet‘𝐾)𝑌) ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) ∧ (𝑋(meet‘𝐾)𝑌)(lt‘𝐾)𝑋) → ∃𝑝 ∈ 𝐴 ((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ∧ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋))
15	14	ex 413	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ (𝑋(meet‘𝐾)𝑌) ∈ 𝐵 ∧ 𝑋 ∈ 𝐵) → ((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)𝑋 → ∃𝑝 ∈ 𝐴 ((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ∧ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋)))
16	8, 10, 11, 15	syl3anc 1379	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)𝑋 → ∃𝑝 ∈ 𝐴 ((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ∧ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋)))
17		simpl1 1198	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝐾 ∈ HL)
18	17	hllatd 39863	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝐾 ∈ Lat)
19	10	adantr 481	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (𝑋(meet‘𝐾)𝑌) ∈ 𝐵)
20	2, 13	atbase 39788	. . . . . . . . . 10 ⊢ (𝑝 ∈ 𝐴 → 𝑝 ∈ 𝐵)
21	20	adantl 482	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑝 ∈ 𝐵)
22		simpl2 1199	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑋 ∈ 𝐵)
23	2, 3, 12	latjle12 18414	. . . . . . . . 9 ⊢ ((𝐾 ∈ Lat ∧ ((𝑋(meet‘𝐾)𝑌) ∈ 𝐵 ∧ 𝑝 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵)) → (((𝑋(meet‘𝐾)𝑌) ≤ 𝑋 ∧ 𝑝 ≤ 𝑋) ↔ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋))
24	18, 19, 21, 22, 23	syl13anc 1380	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝑋(meet‘𝐾)𝑌) ≤ 𝑋 ∧ 𝑝 ≤ 𝑋) ↔ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋))
25		simpr 485	. . . . . . . 8 ⊢ (((𝑋(meet‘𝐾)𝑌) ≤ 𝑋 ∧ 𝑝 ≤ 𝑋) → 𝑝 ≤ 𝑋)
26	24, 25	biimtrrdi 255	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋 → 𝑝 ≤ 𝑋))
27	26	adantld 491	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ∧ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋) → 𝑝 ≤ 𝑋))
28		simpl3 1200	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → 𝑌 ∈ 𝐵)
29	2, 3, 5	latlem12 18430	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ Lat ∧ (𝑝 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵)) → ((𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ↔ 𝑝 ≤ (𝑋(meet‘𝐾)𝑌)))
30	18, 21, 22, 28, 29	syl13anc 1380	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ↔ 𝑝 ≤ (𝑋(meet‘𝐾)𝑌)))
31	30	notbid 319	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (¬ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ↔ ¬ 𝑝 ≤ (𝑋(meet‘𝐾)𝑌)))
32	2, 3, 4, 12	latnle 18437	. . . . . . . . . 10 ⊢ ((𝐾 ∈ Lat ∧ (𝑋(meet‘𝐾)𝑌) ∈ 𝐵 ∧ 𝑝 ∈ 𝐵) → (¬ 𝑝 ≤ (𝑋(meet‘𝐾)𝑌) ↔ (𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝)))
33	18, 19, 21, 32	syl3anc 1379	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (¬ 𝑝 ≤ (𝑋(meet‘𝐾)𝑌) ↔ (𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝)))
34	31, 33	bitrd 280	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (¬ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ↔ (𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝)))
35	34, 24	anbi12d 638	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((¬ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ∧ ((𝑋(meet‘𝐾)𝑌) ≤ 𝑋 ∧ 𝑝 ≤ 𝑋)) ↔ ((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ∧ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋)))
36		pm3.21 472	. . . . . . . . . 10 ⊢ (𝑝 ≤ 𝑌 → (𝑝 ≤ 𝑋 → (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌)))
37		orcom 876	. . . . . . . . . . 11 ⊢ (((𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ∨ ¬ 𝑝 ≤ 𝑋) ↔ (¬ 𝑝 ≤ 𝑋 ∨ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌)))
38		pm4.55 995	. . . . . . . . . . 11 ⊢ (¬ (¬ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ∧ 𝑝 ≤ 𝑋) ↔ ((𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ∨ ¬ 𝑝 ≤ 𝑋))
39		imor 859	. . . . . . . . . . 11 ⊢ ((𝑝 ≤ 𝑋 → (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌)) ↔ (¬ 𝑝 ≤ 𝑋 ∨ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌)))
40	37, 38, 39	3bitr4ri 305	. . . . . . . . . 10 ⊢ ((𝑝 ≤ 𝑋 → (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌)) ↔ ¬ (¬ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ∧ 𝑝 ≤ 𝑋))
41	36, 40	sylib 219	. . . . . . . . 9 ⊢ (𝑝 ≤ 𝑌 → ¬ (¬ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ∧ 𝑝 ≤ 𝑋))
42	41	con2i 139	. . . . . . . 8 ⊢ ((¬ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ∧ 𝑝 ≤ 𝑋) → ¬ 𝑝 ≤ 𝑌)
43	42	adantrl 722	. . . . . . 7 ⊢ ((¬ (𝑝 ≤ 𝑋 ∧ 𝑝 ≤ 𝑌) ∧ ((𝑋(meet‘𝐾)𝑌) ≤ 𝑋 ∧ 𝑝 ≤ 𝑋)) → ¬ 𝑝 ≤ 𝑌)
44	35, 43	biimtrrdi 255	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ∧ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋) → ¬ 𝑝 ≤ 𝑌))
45	27, 44	jcad 517	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → (((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ∧ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋) → (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌)))
46	45	reximdva 3153	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 ((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ∧ ((𝑋(meet‘𝐾)𝑌)(join‘𝐾)𝑝) ≤ 𝑋) → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌)))
47	16, 46	syld 47	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → ((𝑋(meet‘𝐾)𝑌)(lt‘𝐾)𝑋 → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌)))
48	7, 47	sylbid 241	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (¬ 𝑋 ≤ 𝑌 → ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌)))
49	2, 3	lattr 18408	. . . . . . . . 9 ⊢ ((𝐾 ∈ Lat ∧ (𝑝 ∈ 𝐵 ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵)) → ((𝑝 ≤ 𝑋 ∧ 𝑋 ≤ 𝑌) → 𝑝 ≤ 𝑌))
50	18, 21, 22, 28, 49	syl13anc 1380	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) ∧ 𝑝 ∈ 𝐴) → ((𝑝 ≤ 𝑋 ∧ 𝑋 ≤ 𝑌) → 𝑝 ≤ 𝑌))
51	50	exp4b 431	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑝 ∈ 𝐴 → (𝑝 ≤ 𝑋 → (𝑋 ≤ 𝑌 → 𝑝 ≤ 𝑌))))
52	51	com34 91	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑝 ∈ 𝐴 → (𝑋 ≤ 𝑌 → (𝑝 ≤ 𝑋 → 𝑝 ≤ 𝑌))))
53	52	com23 86	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ≤ 𝑌 → (𝑝 ∈ 𝐴 → (𝑝 ≤ 𝑋 → 𝑝 ≤ 𝑌))))
54	53	ralrimdv 3138	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ≤ 𝑌 → ∀𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 → 𝑝 ≤ 𝑌)))
55		iman 402	. . . . . 6 ⊢ ((𝑝 ≤ 𝑋 → 𝑝 ≤ 𝑌) ↔ ¬ (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌))
56	55	ralbii 3086	. . . . 5 ⊢ (∀𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 → 𝑝 ≤ 𝑌) ↔ ∀𝑝 ∈ 𝐴 ¬ (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌))
57		ralnex 3066	. . . . 5 ⊢ (∀𝑝 ∈ 𝐴 ¬ (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌) ↔ ¬ ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌))
58	56, 57	bitri 276	. . . 4 ⊢ (∀𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 → 𝑝 ≤ 𝑌) ↔ ¬ ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌))
59	54, 58	imbitrdi 252	. . 3 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝑋 ≤ 𝑌 → ¬ ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌)))
60	59	con2d 134	. 2 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌) → ¬ 𝑋 ≤ 𝑌))
61	48, 60	impbid 213	1 ⊢ ((𝐾 ∈ HL ∧ 𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (¬ 𝑋 ≤ 𝑌 ↔ ∃𝑝 ∈ 𝐴 (𝑝 ≤ 𝑋 ∧ ¬ 𝑝 ≤ 𝑌)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 207   ∧ wa 396   ∨ wo 853   ∧ w3a 1092   = wceq 1547   ∈ wcel 2119  ∀wral 3054  ∃wrex 3064   class class class wbr 5079  ‘cfv 6492  (class class class)co 7363  Basecbs 17177  lecple 17225  ltcplt 18272  joincjn 18275  meetcmee 18276  Latclat 18395  Atomscatm 39762  HLchlt 39849

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-ral 3055  df-rex 3065  df-rmo 3345  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-id 5520  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7320  df-ov 7366  df-oprab 7367  df-proset 18258  df-poset 18277  df-plt 18292  df-lub 18308  df-glb 18309  df-join 18310  df-meet 18311  df-p0 18387  df-lat 18396  df-clat 18463  df-oposet 39675  df-ol 39677  df-oml 39678  df-covers 39765  df-ats 39766  df-atl 39797  df-cvlat 39821  df-hlat 39850

This theorem is referenced by:  lhpj1  40521