Theorem glbconN 38550

Description: De Morgan's law for GLB and LUB. This holds in any complete ortholattice, although we assume HL for convenience. (Contributed by NM, 17-Jan-2012.) New df-riota 7367. (Revised by SN, 3-Jan-2025.) (New usage is discouraged.)

Hypotheses

Ref	Expression
glbcon.b	⊢ 𝐵 = (Base‘𝐾)
glbcon.u	⊢ 𝑈 = (lub‘𝐾)
glbcon.g	⊢ 𝐺 = (glb‘𝐾)
glbcon.o	⊢ ⊥ = (oc‘𝐾)

Assertion

Ref	Expression
glbconN	⊢ ((𝐾 ∈ HL ∧ 𝑆 ⊆ 𝐵) → (𝐺‘𝑆) = ( ⊥ ‘(𝑈‘{𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆})))

Distinct variable groups:   𝑥,𝐵   𝑥, ⊥   𝑥,𝑆

Allowed substitution hints:   𝑈(𝑥)   𝐺(𝑥)   𝐾(𝑥)

Proof of Theorem glbconN

Dummy variables 𝑢 𝑡 𝑣 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		sseqin2 4214	. . . . 5 ⊢ (𝑆 ⊆ 𝐵 ↔ (𝐵 ∩ 𝑆) = 𝑆)
2	1	biimpi 215	. . . 4 ⊢ (𝑆 ⊆ 𝐵 → (𝐵 ∩ 𝑆) = 𝑆)
3		dfin5 3955	. . . 4 ⊢ (𝐵 ∩ 𝑆) = {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}
4	2, 3	eqtr3di 2785	. . 3 ⊢ (𝑆 ⊆ 𝐵 → 𝑆 = {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆})
5	4	fveq2d 6894	. 2 ⊢ (𝑆 ⊆ 𝐵 → (𝐺‘𝑆) = (𝐺‘{𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}))
6		glbcon.b	. . . 4 ⊢ 𝐵 = (Base‘𝐾)
7		eqid 2730	. . . 4 ⊢ (le‘𝐾) = (le‘𝐾)
8		glbcon.g	. . . 4 ⊢ 𝐺 = (glb‘𝐾)
9		biid 260	. . . 4 ⊢ ((∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑦(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦)) ↔ (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑦(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦)))
10		id 22	. . . 4 ⊢ (𝐾 ∈ HL → 𝐾 ∈ HL)
11		ssrab2 4076	. . . . 5 ⊢ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ⊆ 𝐵
12	11	a1i 11	. . . 4 ⊢ (𝐾 ∈ HL → {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ⊆ 𝐵)
13	6, 7, 8, 9, 10, 12	glbval 18326	. . 3 ⊢ (𝐾 ∈ HL → (𝐺‘{𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}) = (℩𝑦 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑦(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦))))
14		hlop 38535	. . . 4 ⊢ (𝐾 ∈ HL → 𝐾 ∈ OP)
15		hlclat 38531	. . . . . 6 ⊢ (𝐾 ∈ HL → 𝐾 ∈ CLat)
16	6, 8	clatglbcl2 18463	. . . . . 6 ⊢ ((𝐾 ∈ CLat ∧ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ⊆ 𝐵) → {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ∈ dom 𝐺)
17	15, 12, 16	syl2anc 582	. . . . 5 ⊢ (𝐾 ∈ HL → {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ∈ dom 𝐺)
18	6, 7, 8, 9, 10, 17	glbeu 18325	. . . 4 ⊢ (𝐾 ∈ HL → ∃!𝑦 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑦(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦)))
19		glbcon.o	. . . . 5 ⊢ ⊥ = (oc‘𝐾)
20		breq1 5150	. . . . . . 7 ⊢ (𝑦 = ( ⊥ ‘𝑣) → (𝑦(le‘𝐾)𝑧 ↔ ( ⊥ ‘𝑣)(le‘𝐾)𝑧))
21	20	ralbidv 3175	. . . . . 6 ⊢ (𝑦 = ( ⊥ ‘𝑣) → (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑦(le‘𝐾)𝑧 ↔ ∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧))
22		breq2 5151	. . . . . . . 8 ⊢ (𝑦 = ( ⊥ ‘𝑣) → (𝑤(le‘𝐾)𝑦 ↔ 𝑤(le‘𝐾)( ⊥ ‘𝑣)))
23	22	imbi2d 339	. . . . . . 7 ⊢ (𝑦 = ( ⊥ ‘𝑣) → ((∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦) ↔ (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣))))
24	23	ralbidv 3175	. . . . . 6 ⊢ (𝑦 = ( ⊥ ‘𝑣) → (∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦) ↔ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣))))
25	21, 24	anbi12d 629	. . . . 5 ⊢ (𝑦 = ( ⊥ ‘𝑣) → ((∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑦(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦)) ↔ (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣)))))
26	6, 19, 25	riotaocN 38382	. . . 4 ⊢ ((𝐾 ∈ OP ∧ ∃!𝑦 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑦(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦))) → (℩𝑦 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑦(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦))) = ( ⊥ ‘(℩𝑣 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣))))))
27	14, 18, 26	syl2anc 582	. . 3 ⊢ (𝐾 ∈ HL → (℩𝑦 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑦(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)𝑦))) = ( ⊥ ‘(℩𝑣 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣))))))
28	14	ad2antrr 722	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → 𝐾 ∈ OP)
29	6, 19	opoccl 38367	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ OP ∧ 𝑢 ∈ 𝐵) → ( ⊥ ‘𝑢) ∈ 𝐵)
30	28, 29	sylancom 586	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → ( ⊥ ‘𝑢) ∈ 𝐵)
31	14	ad2antrr 722	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → 𝐾 ∈ OP)
32	6, 19	opoccl 38367	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ OP ∧ 𝑧 ∈ 𝐵) → ( ⊥ ‘𝑧) ∈ 𝐵)
33	31, 32	sylancom 586	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → ( ⊥ ‘𝑧) ∈ 𝐵)
34	6, 19	opococ 38368	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ OP ∧ 𝑧 ∈ 𝐵) → ( ⊥ ‘( ⊥ ‘𝑧)) = 𝑧)
35	31, 34	sylancom 586	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → ( ⊥ ‘( ⊥ ‘𝑧)) = 𝑧)
36	35	eqcomd 2736	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → 𝑧 = ( ⊥ ‘( ⊥ ‘𝑧)))
37		fveq2 6890	. . . . . . . . . . . 12 ⊢ (𝑢 = ( ⊥ ‘𝑧) → ( ⊥ ‘𝑢) = ( ⊥ ‘( ⊥ ‘𝑧)))
38	37	rspceeqv 3632	. . . . . . . . . . 11 ⊢ ((( ⊥ ‘𝑧) ∈ 𝐵 ∧ 𝑧 = ( ⊥ ‘( ⊥ ‘𝑧))) → ∃𝑢 ∈ 𝐵 𝑧 = ( ⊥ ‘𝑢))
39	33, 36, 38	syl2anc 582	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → ∃𝑢 ∈ 𝐵 𝑧 = ( ⊥ ‘𝑢))
40		eleq1 2819	. . . . . . . . . . . 12 ⊢ (𝑧 = ( ⊥ ‘𝑢) → (𝑧 ∈ 𝑆 ↔ ( ⊥ ‘𝑢) ∈ 𝑆))
41		breq2 5151	. . . . . . . . . . . 12 ⊢ (𝑧 = ( ⊥ ‘𝑢) → (( ⊥ ‘𝑣)(le‘𝐾)𝑧 ↔ ( ⊥ ‘𝑣)(le‘𝐾)( ⊥ ‘𝑢)))
42	40, 41	imbi12d 343	. . . . . . . . . . 11 ⊢ (𝑧 = ( ⊥ ‘𝑢) → ((𝑧 ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)𝑧) ↔ (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)( ⊥ ‘𝑢))))
43	42	adantl 480	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑧 = ( ⊥ ‘𝑢)) → ((𝑧 ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)𝑧) ↔ (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)( ⊥ ‘𝑢))))
44	30, 39, 43	ralxfrd 5405	. . . . . . . . 9 ⊢ ((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) → (∀𝑧 ∈ 𝐵 (𝑧 ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)𝑧) ↔ ∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)( ⊥ ‘𝑢))))
45		simpr 483	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → 𝑢 ∈ 𝐵)
46		simplr 765	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → 𝑣 ∈ 𝐵)
47	6, 7, 19	oplecon3b 38373	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ OP ∧ 𝑢 ∈ 𝐵 ∧ 𝑣 ∈ 𝐵) → (𝑢(le‘𝐾)𝑣 ↔ ( ⊥ ‘𝑣)(le‘𝐾)( ⊥ ‘𝑢)))
48	28, 45, 46, 47	syl3anc 1369	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → (𝑢(le‘𝐾)𝑣 ↔ ( ⊥ ‘𝑣)(le‘𝐾)( ⊥ ‘𝑢)))
49	48	imbi2d 339	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → ((( ⊥ ‘𝑢) ∈ 𝑆 → 𝑢(le‘𝐾)𝑣) ↔ (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)( ⊥ ‘𝑢))))
50	49	ralbidva 3173	. . . . . . . . 9 ⊢ ((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) → (∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → 𝑢(le‘𝐾)𝑣) ↔ ∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)( ⊥ ‘𝑢))))
51	44, 50	bitr4d 281	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) → (∀𝑧 ∈ 𝐵 (𝑧 ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)𝑧) ↔ ∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → 𝑢(le‘𝐾)𝑣)))
52		eleq1 2819	. . . . . . . . 9 ⊢ (𝑥 = 𝑧 → (𝑥 ∈ 𝑆 ↔ 𝑧 ∈ 𝑆))
53	52	ralrab 3688	. . . . . . . 8 ⊢ (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧 ↔ ∀𝑧 ∈ 𝐵 (𝑧 ∈ 𝑆 → ( ⊥ ‘𝑣)(le‘𝐾)𝑧))
54		fveq2 6890	. . . . . . . . . 10 ⊢ (𝑥 = 𝑢 → ( ⊥ ‘𝑥) = ( ⊥ ‘𝑢))
55	54	eleq1d 2816	. . . . . . . . 9 ⊢ (𝑥 = 𝑢 → (( ⊥ ‘𝑥) ∈ 𝑆 ↔ ( ⊥ ‘𝑢) ∈ 𝑆))
56	55	ralrab 3688	. . . . . . . 8 ⊢ (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑣 ↔ ∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → 𝑢(le‘𝐾)𝑣))
57	51, 53, 56	3bitr4g 313	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) → (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧 ↔ ∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑣))
58	14	ad2antrr 722	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → 𝐾 ∈ OP)
59	6, 19	opoccl 38367	. . . . . . . . . 10 ⊢ ((𝐾 ∈ OP ∧ 𝑡 ∈ 𝐵) → ( ⊥ ‘𝑡) ∈ 𝐵)
60	58, 59	sylancom 586	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → ( ⊥ ‘𝑡) ∈ 𝐵)
61	14	ad2antrr 722	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑤 ∈ 𝐵) → 𝐾 ∈ OP)
62	6, 19	opoccl 38367	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ OP ∧ 𝑤 ∈ 𝐵) → ( ⊥ ‘𝑤) ∈ 𝐵)
63	61, 62	sylancom 586	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑤 ∈ 𝐵) → ( ⊥ ‘𝑤) ∈ 𝐵)
64	6, 19	opococ 38368	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ OP ∧ 𝑤 ∈ 𝐵) → ( ⊥ ‘( ⊥ ‘𝑤)) = 𝑤)
65	61, 64	sylancom 586	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑤 ∈ 𝐵) → ( ⊥ ‘( ⊥ ‘𝑤)) = 𝑤)
66	65	eqcomd 2736	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑤 ∈ 𝐵) → 𝑤 = ( ⊥ ‘( ⊥ ‘𝑤)))
67		fveq2 6890	. . . . . . . . . . 11 ⊢ (𝑡 = ( ⊥ ‘𝑤) → ( ⊥ ‘𝑡) = ( ⊥ ‘( ⊥ ‘𝑤)))
68	67	rspceeqv 3632	. . . . . . . . . 10 ⊢ ((( ⊥ ‘𝑤) ∈ 𝐵 ∧ 𝑤 = ( ⊥ ‘( ⊥ ‘𝑤))) → ∃𝑡 ∈ 𝐵 𝑤 = ( ⊥ ‘𝑡))
69	63, 66, 68	syl2anc 582	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑤 ∈ 𝐵) → ∃𝑡 ∈ 𝐵 𝑤 = ( ⊥ ‘𝑡))
70		breq1 5150	. . . . . . . . . . . 12 ⊢ (𝑤 = ( ⊥ ‘𝑡) → (𝑤(le‘𝐾)𝑧 ↔ ( ⊥ ‘𝑡)(le‘𝐾)𝑧))
71	70	ralbidv 3175	. . . . . . . . . . 11 ⊢ (𝑤 = ( ⊥ ‘𝑡) → (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 ↔ ∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑡)(le‘𝐾)𝑧))
72		breq1 5150	. . . . . . . . . . 11 ⊢ (𝑤 = ( ⊥ ‘𝑡) → (𝑤(le‘𝐾)( ⊥ ‘𝑣) ↔ ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑣)))
73	71, 72	imbi12d 343	. . . . . . . . . 10 ⊢ (𝑤 = ( ⊥ ‘𝑡) → ((∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣)) ↔ (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑡)(le‘𝐾)𝑧 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑣))))
74	73	adantl 480	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑤 = ( ⊥ ‘𝑡)) → ((∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣)) ↔ (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑡)(le‘𝐾)𝑧 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑣))))
75	60, 69, 74	ralxfrd 5405	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) → (∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣)) ↔ ∀𝑡 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑡)(le‘𝐾)𝑧 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑣))))
76	14	ad3antrrr 726	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → 𝐾 ∈ OP)
77		simpr 483	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → 𝑢 ∈ 𝐵)
78		simplr 765	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → 𝑡 ∈ 𝐵)
79	6, 7, 19	oplecon3b 38373	. . . . . . . . . . . . . . 15 ⊢ ((𝐾 ∈ OP ∧ 𝑢 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) → (𝑢(le‘𝐾)𝑡 ↔ ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑢)))
80	76, 77, 78, 79	syl3anc 1369	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → (𝑢(le‘𝐾)𝑡 ↔ ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑢)))
81	80	imbi2d 339	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → ((( ⊥ ‘𝑢) ∈ 𝑆 → 𝑢(le‘𝐾)𝑡) ↔ (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑢))))
82	81	ralbidva 3173	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → (∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → 𝑢(le‘𝐾)𝑡) ↔ ∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑢))))
83	76, 29	sylancom 586	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑢 ∈ 𝐵) → ( ⊥ ‘𝑢) ∈ 𝐵)
84	14	ad3antrrr 726	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → 𝐾 ∈ OP)
85	84, 32	sylancom 586	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → ( ⊥ ‘𝑧) ∈ 𝐵)
86	84, 34	sylancom 586	. . . . . . . . . . . . . . 15 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → ( ⊥ ‘( ⊥ ‘𝑧)) = 𝑧)
87	86	eqcomd 2736	. . . . . . . . . . . . . 14 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → 𝑧 = ( ⊥ ‘( ⊥ ‘𝑧)))
88	85, 87, 38	syl2anc 582	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑧 ∈ 𝐵) → ∃𝑢 ∈ 𝐵 𝑧 = ( ⊥ ‘𝑢))
89		breq2 5151	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = ( ⊥ ‘𝑢) → (( ⊥ ‘𝑡)(le‘𝐾)𝑧 ↔ ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑢)))
90	40, 89	imbi12d 343	. . . . . . . . . . . . . 14 ⊢ (𝑧 = ( ⊥ ‘𝑢) → ((𝑧 ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)𝑧) ↔ (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑢))))
91	90	adantl 480	. . . . . . . . . . . . 13 ⊢ ((((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) ∧ 𝑧 = ( ⊥ ‘𝑢)) → ((𝑧 ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)𝑧) ↔ (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑢))))
92	83, 88, 91	ralxfrd 5405	. . . . . . . . . . . 12 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → (∀𝑧 ∈ 𝐵 (𝑧 ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)𝑧) ↔ ∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑢))))
93	82, 92	bitr4d 281	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → (∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → 𝑢(le‘𝐾)𝑡) ↔ ∀𝑧 ∈ 𝐵 (𝑧 ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)𝑧)))
94	55	ralrab 3688	. . . . . . . . . . 11 ⊢ (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 ↔ ∀𝑢 ∈ 𝐵 (( ⊥ ‘𝑢) ∈ 𝑆 → 𝑢(le‘𝐾)𝑡))
95	52	ralrab 3688	. . . . . . . . . . 11 ⊢ (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑡)(le‘𝐾)𝑧 ↔ ∀𝑧 ∈ 𝐵 (𝑧 ∈ 𝑆 → ( ⊥ ‘𝑡)(le‘𝐾)𝑧))
96	93, 94, 95	3bitr4g 313	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 ↔ ∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑡)(le‘𝐾)𝑧))
97		simplr 765	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → 𝑣 ∈ 𝐵)
98		simpr 483	. . . . . . . . . . 11 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → 𝑡 ∈ 𝐵)
99	6, 7, 19	oplecon3b 38373	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ OP ∧ 𝑣 ∈ 𝐵 ∧ 𝑡 ∈ 𝐵) → (𝑣(le‘𝐾)𝑡 ↔ ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑣)))
100	58, 97, 98, 99	syl3anc 1369	. . . . . . . . . 10 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → (𝑣(le‘𝐾)𝑡 ↔ ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑣)))
101	96, 100	imbi12d 343	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) ∧ 𝑡 ∈ 𝐵) → ((∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 → 𝑣(le‘𝐾)𝑡) ↔ (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑡)(le‘𝐾)𝑧 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑣))))
102	101	ralbidva 3173	. . . . . . . 8 ⊢ ((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) → (∀𝑡 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 → 𝑣(le‘𝐾)𝑡) ↔ ∀𝑡 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑡)(le‘𝐾)𝑧 → ( ⊥ ‘𝑡)(le‘𝐾)( ⊥ ‘𝑣))))
103	75, 102	bitr4d 281	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) → (∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣)) ↔ ∀𝑡 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 → 𝑣(le‘𝐾)𝑡)))
104	57, 103	anbi12d 629	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑣 ∈ 𝐵) → ((∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣))) ↔ (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑣 ∧ ∀𝑡 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 → 𝑣(le‘𝐾)𝑡))))
105	104	riotabidva 7387	. . . . 5 ⊢ (𝐾 ∈ HL → (℩𝑣 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣)))) = (℩𝑣 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑣 ∧ ∀𝑡 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 → 𝑣(le‘𝐾)𝑡))))
106		ssrab2 4076	. . . . . 6 ⊢ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆} ⊆ 𝐵
107		glbcon.u	. . . . . . 7 ⊢ 𝑈 = (lub‘𝐾)
108		biid 260	. . . . . . 7 ⊢ ((∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑣 ∧ ∀𝑡 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 → 𝑣(le‘𝐾)𝑡)) ↔ (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑣 ∧ ∀𝑡 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 → 𝑣(le‘𝐾)𝑡)))
109		simpl 481	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆} ⊆ 𝐵) → 𝐾 ∈ HL)
110		simpr 483	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆} ⊆ 𝐵) → {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆} ⊆ 𝐵)
111	6, 7, 107, 108, 109, 110	lubval 18313	. . . . . 6 ⊢ ((𝐾 ∈ HL ∧ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆} ⊆ 𝐵) → (𝑈‘{𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}) = (℩𝑣 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑣 ∧ ∀𝑡 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 → 𝑣(le‘𝐾)𝑡))))
112	106, 111	mpan2 687	. . . . 5 ⊢ (𝐾 ∈ HL → (𝑈‘{𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}) = (℩𝑣 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑣 ∧ ∀𝑡 ∈ 𝐵 (∀𝑢 ∈ {𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}𝑢(le‘𝐾)𝑡 → 𝑣(le‘𝐾)𝑡))))
113	105, 112	eqtr4d 2773	. . . 4 ⊢ (𝐾 ∈ HL → (℩𝑣 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣)))) = (𝑈‘{𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆}))
114	113	fveq2d 6894	. . 3 ⊢ (𝐾 ∈ HL → ( ⊥ ‘(℩𝑣 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆} ( ⊥ ‘𝑣)(le‘𝐾)𝑧 ∧ ∀𝑤 ∈ 𝐵 (∀𝑧 ∈ {𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}𝑤(le‘𝐾)𝑧 → 𝑤(le‘𝐾)( ⊥ ‘𝑣))))) = ( ⊥ ‘(𝑈‘{𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆})))
115	13, 27, 114	3eqtrd 2774	. 2 ⊢ (𝐾 ∈ HL → (𝐺‘{𝑥 ∈ 𝐵 ∣ 𝑥 ∈ 𝑆}) = ( ⊥ ‘(𝑈‘{𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆})))
116	5, 115	sylan9eqr 2792	1 ⊢ ((𝐾 ∈ HL ∧ 𝑆 ⊆ 𝐵) → (𝐺‘𝑆) = ( ⊥ ‘(𝑈‘{𝑥 ∈ 𝐵 ∣ ( ⊥ ‘𝑥) ∈ 𝑆})))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 394   = wceq 1539   ∈ wcel 2104  ∀wral 3059  ∃wrex 3068  ∃!wreu 3372  {crab 3430   ∩ cin 3946   ⊆ wss 3947   class class class wbr 5147  dom cdm 5675  ‘cfv 6542  ℩crio 7366  Basecbs 17148  lecple 17208  occoc 17209  lubclub 18266  glbcglb 18267  CLatccla 18455  OPcops 38345  HLchlt 38523

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-10 2135  ax-11 2152  ax-12 2169  ax-ext 2701  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 844  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2532  df-eu 2561  df-clab 2708  df-cleq 2722  df-clel 2808  df-nfc 2883  df-ne 2939  df-ral 3060  df-rex 3069  df-rmo 3374  df-reu 3375  df-rab 3431  df-v 3474  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-id 5573  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-iota 6494  df-fun 6544  df-fn 6545  df-f 6546  df-f1 6547  df-fo 6548  df-f1o 6549  df-fv 6550  df-riota 7367  df-ov 7414  df-lub 18303  df-glb 18304  df-clat 18456  df-oposet 38349  df-ol 38351  df-oml 38352  df-hlat 38524

This theorem is referenced by:  glbconxN  38552