Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  dihglblem2N Structured version   Visualization version   GIF version

Theorem dihglblem2N 37002
Description: The GLB of a set of lattice elements 𝑆 is the same as that of the set 𝑇 with elements of 𝑆 cut down to be under 𝑊. (Contributed by NM, 19-Mar-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
dihglblem.b 𝐵 = (Base‘𝐾)
dihglblem.l = (le‘𝐾)
dihglblem.m = (meet‘𝐾)
dihglblem.g 𝐺 = (glb‘𝐾)
dihglblem.h 𝐻 = (LHyp‘𝐾)
dihglblem.t 𝑇 = {𝑢𝐵 ∣ ∃𝑣𝑆 𝑢 = (𝑣 𝑊)}
Assertion
Ref Expression
dihglblem2N (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) → (𝐺𝑆) = (𝐺𝑇))
Distinct variable groups:   𝑣,𝑢,   𝑢,𝐵   𝑢,𝑆,𝑣   𝑢,𝑊,𝑣
Allowed substitution hints:   𝐵(𝑣)   𝑇(𝑣,𝑢)   𝐺(𝑣,𝑢)   𝐻(𝑣,𝑢)   𝐾(𝑣,𝑢)   (𝑣,𝑢)

Proof of Theorem dihglblem2N
Dummy variables 𝑥 𝑦 𝑤 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 dihglblem.b . 2 𝐵 = (Base‘𝐾)
2 dihglblem.l . 2 = (le‘𝐾)
3 dihglblem.g . 2 𝐺 = (glb‘𝐾)
4 simpl1l 1255 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → 𝐾 ∈ HL)
5 hllat 35070 . . . 4 (𝐾 ∈ HL → 𝐾 ∈ Lat)
64, 5syl 17 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → 𝐾 ∈ Lat)
7 simp1l 1216 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) → 𝐾 ∈ HL)
8 hlclat 35065 . . . . . 6 (𝐾 ∈ HL → 𝐾 ∈ CLat)
97, 8syl 17 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) → 𝐾 ∈ CLat)
10 dihglblem.t . . . . . 6 𝑇 = {𝑢𝐵 ∣ ∃𝑣𝑆 𝑢 = (𝑣 𝑊)}
11 ssrab2 3793 . . . . . 6 {𝑢𝐵 ∣ ∃𝑣𝑆 𝑢 = (𝑣 𝑊)} ⊆ 𝐵
1210, 11eqsstri 3741 . . . . 5 𝑇𝐵
131, 3clatglbcl 17236 . . . . 5 ((𝐾 ∈ CLat ∧ 𝑇𝐵) → (𝐺𝑇) ∈ 𝐵)
149, 12, 13sylancl 697 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) → (𝐺𝑇) ∈ 𝐵)
1514adantr 472 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → (𝐺𝑇) ∈ 𝐵)
16 simpl2 1206 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → 𝑆𝐵)
17 simpr 479 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → 𝑥𝑆)
1816, 17sseldd 3710 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → 𝑥𝐵)
19 simpl1r 1257 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → 𝑊𝐻)
20 dihglblem.h . . . . . 6 𝐻 = (LHyp‘𝐾)
211, 20lhpbase 35704 . . . . 5 (𝑊𝐻𝑊𝐵)
2219, 21syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → 𝑊𝐵)
23 dihglblem.m . . . . 5 = (meet‘𝐾)
241, 23latmcl 17174 . . . 4 ((𝐾 ∈ Lat ∧ 𝑥𝐵𝑊𝐵) → (𝑥 𝑊) ∈ 𝐵)
256, 18, 22, 24syl3anc 1439 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → (𝑥 𝑊) ∈ 𝐵)
264, 8syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → 𝐾 ∈ CLat)
27 eqidd 2725 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → (𝑥 𝑊) = (𝑥 𝑊))
28 oveq1 6772 . . . . . . . . 9 (𝑣 = 𝑥 → (𝑣 𝑊) = (𝑥 𝑊))
2928eqeq2d 2734 . . . . . . . 8 (𝑣 = 𝑥 → ((𝑥 𝑊) = (𝑣 𝑊) ↔ (𝑥 𝑊) = (𝑥 𝑊)))
3029rspcev 3413 . . . . . . 7 ((𝑥𝑆 ∧ (𝑥 𝑊) = (𝑥 𝑊)) → ∃𝑣𝑆 (𝑥 𝑊) = (𝑣 𝑊))
3117, 27, 30syl2anc 696 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → ∃𝑣𝑆 (𝑥 𝑊) = (𝑣 𝑊))
32 eqeq1 2728 . . . . . . . 8 (𝑢 = (𝑥 𝑊) → (𝑢 = (𝑣 𝑊) ↔ (𝑥 𝑊) = (𝑣 𝑊)))
3332rexbidv 3154 . . . . . . 7 (𝑢 = (𝑥 𝑊) → (∃𝑣𝑆 𝑢 = (𝑣 𝑊) ↔ ∃𝑣𝑆 (𝑥 𝑊) = (𝑣 𝑊)))
3433elrab 3469 . . . . . 6 ((𝑥 𝑊) ∈ {𝑢𝐵 ∣ ∃𝑣𝑆 𝑢 = (𝑣 𝑊)} ↔ ((𝑥 𝑊) ∈ 𝐵 ∧ ∃𝑣𝑆 (𝑥 𝑊) = (𝑣 𝑊)))
3525, 31, 34sylanbrc 701 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → (𝑥 𝑊) ∈ {𝑢𝐵 ∣ ∃𝑣𝑆 𝑢 = (𝑣 𝑊)})
3635, 10syl6eleqr 2814 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → (𝑥 𝑊) ∈ 𝑇)
371, 2, 3clatglble 17247 . . . . 5 ((𝐾 ∈ CLat ∧ 𝑇𝐵 ∧ (𝑥 𝑊) ∈ 𝑇) → (𝐺𝑇) (𝑥 𝑊))
3812, 37mp3an2 1525 . . . 4 ((𝐾 ∈ CLat ∧ (𝑥 𝑊) ∈ 𝑇) → (𝐺𝑇) (𝑥 𝑊))
3926, 36, 38syl2anc 696 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → (𝐺𝑇) (𝑥 𝑊))
401, 2, 23latmle1 17198 . . . 4 ((𝐾 ∈ Lat ∧ 𝑥𝐵𝑊𝐵) → (𝑥 𝑊) 𝑥)
416, 18, 22, 40syl3anc 1439 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → (𝑥 𝑊) 𝑥)
421, 2, 6, 15, 25, 18, 39, 41lattrd 17180 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑥𝑆) → (𝐺𝑇) 𝑥)
43 eqeq1 2728 . . . . . . . 8 (𝑢 = 𝑤 → (𝑢 = (𝑣 𝑊) ↔ 𝑤 = (𝑣 𝑊)))
4443rexbidv 3154 . . . . . . 7 (𝑢 = 𝑤 → (∃𝑣𝑆 𝑢 = (𝑣 𝑊) ↔ ∃𝑣𝑆 𝑤 = (𝑣 𝑊)))
45 oveq1 6772 . . . . . . . . 9 (𝑣 = 𝑦 → (𝑣 𝑊) = (𝑦 𝑊))
4645eqeq2d 2734 . . . . . . . 8 (𝑣 = 𝑦 → (𝑤 = (𝑣 𝑊) ↔ 𝑤 = (𝑦 𝑊)))
4746cbvrexv 3275 . . . . . . 7 (∃𝑣𝑆 𝑤 = (𝑣 𝑊) ↔ ∃𝑦𝑆 𝑤 = (𝑦 𝑊))
4844, 47syl6bb 276 . . . . . 6 (𝑢 = 𝑤 → (∃𝑣𝑆 𝑢 = (𝑣 𝑊) ↔ ∃𝑦𝑆 𝑤 = (𝑦 𝑊)))
4948, 10elrab2 3472 . . . . 5 (𝑤𝑇 ↔ (𝑤𝐵 ∧ ∃𝑦𝑆 𝑤 = (𝑦 𝑊)))
50 simp3 1130 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑦𝑆)
51 simp13 1224 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → ∀𝑥𝑆 𝑧 𝑥)
52 breq2 4764 . . . . . . . . . . . 12 (𝑥 = 𝑦 → (𝑧 𝑥𝑧 𝑦))
5352rspcva 3411 . . . . . . . . . . 11 ((𝑦𝑆 ∧ ∀𝑥𝑆 𝑧 𝑥) → 𝑧 𝑦)
5450, 51, 53syl2anc 696 . . . . . . . . . 10 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑧 𝑦)
55 simp11l 1321 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) → 𝐾 ∈ HL)
56553ad2ant1 1125 . . . . . . . . . . . 12 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝐾 ∈ HL)
5756, 5syl 17 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝐾 ∈ Lat)
58 simp12 1223 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑧𝐵)
5956, 8syl 17 . . . . . . . . . . . 12 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝐾 ∈ CLat)
60 simp112 1340 . . . . . . . . . . . 12 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑆𝐵)
611, 3clatglbcl 17236 . . . . . . . . . . . 12 ((𝐾 ∈ CLat ∧ 𝑆𝐵) → (𝐺𝑆) ∈ 𝐵)
6259, 60, 61syl2anc 696 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → (𝐺𝑆) ∈ 𝐵)
63 simp11r 1322 . . . . . . . . . . . . 13 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) → 𝑊𝐻)
64633ad2ant1 1125 . . . . . . . . . . . 12 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑊𝐻)
6564, 21syl 17 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑊𝐵)
661, 2, 3clatleglb 17248 . . . . . . . . . . . . 13 ((𝐾 ∈ CLat ∧ 𝑧𝐵𝑆𝐵) → (𝑧 (𝐺𝑆) ↔ ∀𝑥𝑆 𝑧 𝑥))
6759, 58, 60, 66syl3anc 1439 . . . . . . . . . . . 12 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → (𝑧 (𝐺𝑆) ↔ ∀𝑥𝑆 𝑧 𝑥))
6851, 67mpbird 247 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑧 (𝐺𝑆))
69 simp113 1341 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → (𝐺𝑆) 𝑊)
701, 2, 57, 58, 62, 65, 68, 69lattrd 17180 . . . . . . . . . 10 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑧 𝑊)
7160, 50sseldd 3710 . . . . . . . . . . 11 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑦𝐵)
721, 2, 23latlem12 17200 . . . . . . . . . . 11 ((𝐾 ∈ Lat ∧ (𝑧𝐵𝑦𝐵𝑊𝐵)) → ((𝑧 𝑦𝑧 𝑊) ↔ 𝑧 (𝑦 𝑊)))
7357, 58, 71, 65, 72syl13anc 1441 . . . . . . . . . 10 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → ((𝑧 𝑦𝑧 𝑊) ↔ 𝑧 (𝑦 𝑊)))
7454, 70, 73mpbi2and 994 . . . . . . . . 9 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵𝑦𝑆) → 𝑧 (𝑦 𝑊))
75743expia 1114 . . . . . . . 8 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵) → (𝑦𝑆𝑧 (𝑦 𝑊)))
76 breq2 4764 . . . . . . . . 9 (𝑤 = (𝑦 𝑊) → (𝑧 𝑤𝑧 (𝑦 𝑊)))
7776biimprcd 240 . . . . . . . 8 (𝑧 (𝑦 𝑊) → (𝑤 = (𝑦 𝑊) → 𝑧 𝑤))
7875, 77syl6 35 . . . . . . 7 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵) → (𝑦𝑆 → (𝑤 = (𝑦 𝑊) → 𝑧 𝑤)))
7978rexlimdv 3132 . . . . . 6 (((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) ∧ 𝑤𝐵) → (∃𝑦𝑆 𝑤 = (𝑦 𝑊) → 𝑧 𝑤))
8079expimpd 630 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) → ((𝑤𝐵 ∧ ∃𝑦𝑆 𝑤 = (𝑦 𝑊)) → 𝑧 𝑤))
8149, 80syl5bi 232 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) → (𝑤𝑇𝑧 𝑤))
8281ralrimiv 3067 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) → ∀𝑤𝑇 𝑧 𝑤)
8355, 8syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) → 𝐾 ∈ CLat)
84 simp2 1129 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) → 𝑧𝐵)
851, 2, 3clatleglb 17248 . . . . 5 ((𝐾 ∈ CLat ∧ 𝑧𝐵𝑇𝐵) → (𝑧 (𝐺𝑇) ↔ ∀𝑤𝑇 𝑧 𝑤))
8612, 85mp3an3 1526 . . . 4 ((𝐾 ∈ CLat ∧ 𝑧𝐵) → (𝑧 (𝐺𝑇) ↔ ∀𝑤𝑇 𝑧 𝑤))
8783, 84, 86syl2anc 696 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) → (𝑧 (𝐺𝑇) ↔ ∀𝑤𝑇 𝑧 𝑤))
8882, 87mpbird 247 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) ∧ 𝑧𝐵 ∧ ∀𝑥𝑆 𝑧 𝑥) → 𝑧 (𝐺𝑇))
89 simp2 1129 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) → 𝑆𝐵)
901, 2, 3, 42, 88, 9, 89, 14isglbd 17239 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑆𝐵 ∧ (𝐺𝑆) 𝑊) → (𝐺𝑆) = (𝐺𝑇))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 383  w3a 1072   = wceq 1596  wcel 2103  wral 3014  wrex 3015  {crab 3018  wss 3680   class class class wbr 4760  cfv 6001  (class class class)co 6765  Basecbs 15980  lecple 16071  glbcglb 17065  meetcmee 17067  Latclat 17167  CLatccla 17229  HLchlt 35057  LHypclh 35690
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1835  ax-4 1850  ax-5 1952  ax-6 2018  ax-7 2054  ax-8 2105  ax-9 2112  ax-10 2132  ax-11 2147  ax-12 2160  ax-13 2355  ax-ext 2704  ax-rep 4879  ax-sep 4889  ax-nul 4897  ax-pow 4948  ax-pr 5011  ax-un 7066
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3an 1074  df-tru 1599  df-ex 1818  df-nf 1823  df-sb 2011  df-eu 2575  df-mo 2576  df-clab 2711  df-cleq 2717  df-clel 2720  df-nfc 2855  df-ne 2897  df-ral 3019  df-rex 3020  df-reu 3021  df-rab 3023  df-v 3306  df-sbc 3542  df-csb 3640  df-dif 3683  df-un 3685  df-in 3687  df-ss 3694  df-nul 4024  df-if 4195  df-pw 4268  df-sn 4286  df-pr 4288  df-op 4292  df-uni 4545  df-iun 4630  df-br 4761  df-opab 4821  df-mpt 4838  df-id 5128  df-xp 5224  df-rel 5225  df-cnv 5226  df-co 5227  df-dm 5228  df-rn 5229  df-res 5230  df-ima 5231  df-iota 5964  df-fun 6003  df-fn 6004  df-f 6005  df-f1 6006  df-fo 6007  df-f1o 6008  df-fv 6009  df-riota 6726  df-ov 6768  df-oprab 6769  df-poset 17068  df-lub 17096  df-glb 17097  df-join 17098  df-meet 17099  df-lat 17168  df-clat 17230  df-atl 35005  df-cvlat 35029  df-hlat 35058  df-lhyp 35694
This theorem is referenced by:  dihglblem3N  37003  dihglblem3aN  37004
  Copyright terms: Public domain W3C validator