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

Theorem dihmeetlem2N 42270
Description: Isomorphism H of a conjunction. (Contributed by NM, 22-Mar-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
dihmeetlem2.b 𝐵 = (Base‘𝐾)
dihmeetlem2.m = (meet‘𝐾)
dihmeetlem2.h 𝐻 = (LHyp‘𝐾)
dihmeetlem2.i 𝐼 = ((DIsoH‘𝐾)‘𝑊)
dihmeetlem2.l = (le‘𝐾)
dihmeetlem2.j = (join‘𝐾)
dihmeetlem2.a 𝐴 = (Atoms‘𝐾)
dihmeetlem2.p 𝑃 = ((oc‘𝐾)‘𝑊)
dihmeetlem2.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
dihmeetlem2.r 𝑅 = ((trL‘𝐾)‘𝑊)
dihmeetlem2.e 𝐸 = ((TEndo‘𝐾)‘𝑊)
dihmeetlem2.g 𝐺 = (𝑇 (𝑃) = 𝑞)
dihmeetlem2.o 0 = (𝑇 ↦ ( I ↾ 𝐵))
Assertion
Ref Expression
dihmeetlem2N (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))

Proof of Theorem dihmeetlem2N
Dummy variable 𝑥 is distinct from all other variables.
StepHypRef Expression
1 eqid 2760 . . . . . 6 (glb‘𝐾) = (glb‘𝐾)
2 dihmeetlem2.m . . . . . 6 = (meet‘𝐾)
3 simp1l 1216 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝐾 ∈ HL)
4 simp2l 1218 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑋𝐵)
5 simp3l 1220 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑌𝐵)
61, 2, 3, 4, 5meetval 18510 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (𝑋 𝑌) = ((glb‘𝐾)‘{𝑋, 𝑌}))
76fveq2d 6878 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (((DIsoB‘𝐾)‘𝑊)‘(𝑋 𝑌)) = (((DIsoB‘𝐾)‘𝑊)‘((glb‘𝐾)‘{𝑋, 𝑌})))
8 simp1 1154 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
9 dihmeetlem2.b . . . . . . . . 9 𝐵 = (Base‘𝐾)
10 dihmeetlem2.l . . . . . . . . 9 = (le‘𝐾)
11 dihmeetlem2.h . . . . . . . . 9 𝐻 = (LHyp‘𝐾)
12 eqid 2760 . . . . . . . . 9 ((DIsoB‘𝐾)‘𝑊) = ((DIsoB‘𝐾)‘𝑊)
139, 10, 11, 12dibeldmN 42129 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (𝑋 ∈ dom ((DIsoB‘𝐾)‘𝑊) ↔ (𝑋𝐵𝑋 𝑊)))
1413biimpar 483 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊)) → 𝑋 ∈ dom ((DIsoB‘𝐾)‘𝑊))
15143adant3 1150 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑋 ∈ dom ((DIsoB‘𝐾)‘𝑊))
169, 10, 11, 12dibeldmN 42129 . . . . . . . 8 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (𝑌 ∈ dom ((DIsoB‘𝐾)‘𝑊) ↔ (𝑌𝐵𝑌 𝑊)))
1716biimpar 483 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑌 ∈ dom ((DIsoB‘𝐾)‘𝑊))
18173adant2 1149 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑌 ∈ dom ((DIsoB‘𝐾)‘𝑊))
19 prssg 4780 . . . . . . 7 ((𝑋𝐵𝑌𝐵) → ((𝑋 ∈ dom ((DIsoB‘𝐾)‘𝑊) ∧ 𝑌 ∈ dom ((DIsoB‘𝐾)‘𝑊)) ↔ {𝑋, 𝑌} ⊆ dom ((DIsoB‘𝐾)‘𝑊)))
204, 5, 19syl2anc 596 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → ((𝑋 ∈ dom ((DIsoB‘𝐾)‘𝑊) ∧ 𝑌 ∈ dom ((DIsoB‘𝐾)‘𝑊)) ↔ {𝑋, 𝑌} ⊆ dom ((DIsoB‘𝐾)‘𝑊)))
2115, 18, 20mpbi2and 725 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → {𝑋, 𝑌} ⊆ dom ((DIsoB‘𝐾)‘𝑊))
22 prnzg 4739 . . . . . 6 (𝑋𝐵 → {𝑋, 𝑌} ≠ ∅)
234, 22syl 18 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → {𝑋, 𝑌} ≠ ∅)
241, 11, 12dibglbN 42137 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ({𝑋, 𝑌} ⊆ dom ((DIsoB‘𝐾)‘𝑊) ∧ {𝑋, 𝑌} ≠ ∅)) → (((DIsoB‘𝐾)‘𝑊)‘((glb‘𝐾)‘{𝑋, 𝑌})) = 𝑥 ∈ {𝑋, 𝑌} (((DIsoB‘𝐾)‘𝑊)‘𝑥))
258, 21, 23, 24syl12anc 850 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (((DIsoB‘𝐾)‘𝑊)‘((glb‘𝐾)‘{𝑋, 𝑌})) = 𝑥 ∈ {𝑋, 𝑌} (((DIsoB‘𝐾)‘𝑊)‘𝑥))
267, 25eqtrd 2795 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (((DIsoB‘𝐾)‘𝑊)‘(𝑋 𝑌)) = 𝑥 ∈ {𝑋, 𝑌} (((DIsoB‘𝐾)‘𝑊)‘𝑥))
273hllatd 40335 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝐾 ∈ Lat)
289, 2latmcl 18561 . . . . 5 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋 𝑌) ∈ 𝐵)
2927, 4, 5, 28syl3anc 1398 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (𝑋 𝑌) ∈ 𝐵)
30 simp1r 1217 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑊𝐻)
319, 11lhpbase 40969 . . . . . 6 (𝑊𝐻𝑊𝐵)
3230, 31syl 18 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑊𝐵)
339, 10, 2latmle1 18585 . . . . . 6 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋 𝑌) 𝑋)
3427, 4, 5, 33syl3anc 1398 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (𝑋 𝑌) 𝑋)
35 simp2r 1219 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑋 𝑊)
369, 10, 27, 29, 4, 32, 34, 35lattrd 18567 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (𝑋 𝑌) 𝑊)
37 dihmeetlem2.i . . . . 5 𝐼 = ((DIsoH‘𝐾)‘𝑊)
389, 10, 11, 37, 12dihvalb 42208 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑋 𝑌) ∈ 𝐵 ∧ (𝑋 𝑌) 𝑊)) → (𝐼‘(𝑋 𝑌)) = (((DIsoB‘𝐾)‘𝑊)‘(𝑋 𝑌)))
398, 29, 36, 38syl12anc 850 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (𝐼‘(𝑋 𝑌)) = (((DIsoB‘𝐾)‘𝑊)‘(𝑋 𝑌)))
40 simpl1 1210 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ 𝑥 ∈ {𝑋, 𝑌}) → (𝐾 ∈ HL ∧ 𝑊𝐻))
41 vex 3454 . . . . . . 7 𝑥 ∈ V
4241elpr 4609 . . . . . 6 (𝑥 ∈ {𝑋, 𝑌} ↔ (𝑥 = 𝑋𝑥 = 𝑌))
43 simpl2 1211 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ 𝑥 = 𝑋) → (𝑋𝐵𝑋 𝑊))
44 eleq1 2848 . . . . . . . . . 10 (𝑥 = 𝑋 → (𝑥𝐵𝑋𝐵))
45 breq1 5106 . . . . . . . . . 10 (𝑥 = 𝑋 → (𝑥 𝑊𝑋 𝑊))
4644, 45anbi12d 644 . . . . . . . . 9 (𝑥 = 𝑋 → ((𝑥𝐵𝑥 𝑊) ↔ (𝑋𝐵𝑋 𝑊)))
4746adantl 487 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ 𝑥 = 𝑋) → ((𝑥𝐵𝑥 𝑊) ↔ (𝑋𝐵𝑋 𝑊)))
4843, 47mpbird 260 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ 𝑥 = 𝑋) → (𝑥𝐵𝑥 𝑊))
49 simpl3 1212 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ 𝑥 = 𝑌) → (𝑌𝐵𝑌 𝑊))
50 eleq1 2848 . . . . . . . . . 10 (𝑥 = 𝑌 → (𝑥𝐵𝑌𝐵))
51 breq1 5106 . . . . . . . . . 10 (𝑥 = 𝑌 → (𝑥 𝑊𝑌 𝑊))
5250, 51anbi12d 644 . . . . . . . . 9 (𝑥 = 𝑌 → ((𝑥𝐵𝑥 𝑊) ↔ (𝑌𝐵𝑌 𝑊)))
5352adantl 487 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ 𝑥 = 𝑌) → ((𝑥𝐵𝑥 𝑊) ↔ (𝑌𝐵𝑌 𝑊)))
5449, 53mpbird 260 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ 𝑥 = 𝑌) → (𝑥𝐵𝑥 𝑊))
5548, 54jaodan 972 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ (𝑥 = 𝑋𝑥 = 𝑌)) → (𝑥𝐵𝑥 𝑊))
5642, 55sylan2b 606 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ 𝑥 ∈ {𝑋, 𝑌}) → (𝑥𝐵𝑥 𝑊))
579, 10, 11, 37, 12dihvalb 42208 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑥𝐵𝑥 𝑊)) → (𝐼𝑥) = (((DIsoB‘𝐾)‘𝑊)‘𝑥))
5840, 56, 57syl2anc 596 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) ∧ 𝑥 ∈ {𝑋, 𝑌}) → (𝐼𝑥) = (((DIsoB‘𝐾)‘𝑊)‘𝑥))
5958iineq2dv 4977 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑥 ∈ {𝑋, 𝑌} (𝐼𝑥) = 𝑥 ∈ {𝑋, 𝑌} (((DIsoB‘𝐾)‘𝑊)‘𝑥))
6026, 39, 593eqtr4d 2805 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (𝐼‘(𝑋 𝑌)) = 𝑥 ∈ {𝑋, 𝑌} (𝐼𝑥))
61 fveq2 6874 . . . 4 (𝑥 = 𝑋 → (𝐼𝑥) = (𝐼𝑋))
62 fveq2 6874 . . . 4 (𝑥 = 𝑌 → (𝐼𝑥) = (𝐼𝑌))
6361, 62iinxprg 5049 . . 3 ((𝑋𝐵𝑌𝐵) → 𝑥 ∈ {𝑋, 𝑌} (𝐼𝑥) = ((𝐼𝑋) ∩ (𝐼𝑌)))
644, 5, 63syl2anc 596 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → 𝑥 ∈ {𝑋, 𝑌} (𝐼𝑥) = ((𝐼𝑋) ∩ (𝐼𝑌)))
6560, 64eqtrd 2795 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝐵𝑋 𝑊) ∧ (𝑌𝐵𝑌 𝑊)) → (𝐼‘(𝑋 𝑌)) = ((𝐼𝑋) ∩ (𝐼𝑌)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  wo 861  w3a 1103   = wceq 1570  wcel 2145  wne 2955  cin 3898  wss 3899  c0 4279  {cpr 4586   ciin 4952   class class class wbr 5103  cmpt 5186   I cid 5542  dom cdm 5648  cres 5650  cfv 6528  crio 7365  (class class class)co 7409  Basecbs 17334  lecple 17382  occoc 17383  glbcglb 18431  joincjn 18432  meetcmee 18433  Latclat 18552  Atomscatm 40234  HLchlt 40321  LHypclh 40955  LTrncltrn 41072  trLctrl 41129  TEndoctendo 41723  DIsoBcdib 42109  DIsoHcdih 42199
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7735
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-iin 4954  df-br 5104  df-opab 5168  df-mpt 5187  df-id 5543  df-xp 5654  df-rel 5655  df-cnv 5656  df-co 5657  df-dm 5658  df-rn 5659  df-res 5660  df-ima 5661  df-iota 6484  df-fun 6530  df-fn 6531  df-f 6532  df-f1 6533  df-fo 6534  df-f1o 6535  df-fv 6536  df-riota 7366  df-ov 7412  df-oprab 7413  df-mpo 7414  df-map 8828  df-proset 18415  df-poset 18434  df-plt 18449  df-lub 18465  df-glb 18466  df-join 18467  df-meet 18468  df-p0 18544  df-p1 18545  df-lat 18553  df-clat 18620  df-oposet 40147  df-ol 40149  df-oml 40150  df-covers 40237  df-ats 40238  df-atl 40269  df-cvlat 40293  df-hlat 40322  df-lhyp 40959  df-laut 40960  df-ldil 41075  df-ltrn 41076  df-trl 41130  df-disoa 42000  df-dib 42110  df-dih 42200
This theorem is used by:  dihmeetbN  42274
  Copyright terms: Public domain W3C validator