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

Theorem dihmeetlem7N 39087
Description: Lemma for isomorphism H of a lattice meet. (Contributed by NM, 6-Apr-2014.) (New usage is discouraged.)
Hypotheses
Ref Expression
dihmeetlem7.b 𝐵 = (Base‘𝐾)
dihmeetlem7.l = (le‘𝐾)
dihmeetlem7.j = (join‘𝐾)
dihmeetlem7.m = (meet‘𝐾)
dihmeetlem7.a 𝐴 = (Atoms‘𝐾)
Assertion
Ref Expression
dihmeetlem7N (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → (((𝑋 𝑌) 𝑝) 𝑌) = (𝑋 𝑌))

Proof of Theorem dihmeetlem7N
StepHypRef Expression
1 simprr 773 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → ¬ 𝑝 𝑌)
2 simpl1 1193 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → 𝐾 ∈ HL)
3 hlatl 37137 . . . . . 6 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
42, 3syl 17 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → 𝐾 ∈ AtLat)
5 simprl 771 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → 𝑝𝐴)
6 simpl3 1195 . . . . 5 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → 𝑌𝐵)
7 dihmeetlem7.b . . . . . 6 𝐵 = (Base‘𝐾)
8 dihmeetlem7.l . . . . . 6 = (le‘𝐾)
9 dihmeetlem7.m . . . . . 6 = (meet‘𝐾)
10 eqid 2738 . . . . . 6 (0.‘𝐾) = (0.‘𝐾)
11 dihmeetlem7.a . . . . . 6 𝐴 = (Atoms‘𝐾)
127, 8, 9, 10, 11atnle 37094 . . . . 5 ((𝐾 ∈ AtLat ∧ 𝑝𝐴𝑌𝐵) → (¬ 𝑝 𝑌 ↔ (𝑝 𝑌) = (0.‘𝐾)))
134, 5, 6, 12syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → (¬ 𝑝 𝑌 ↔ (𝑝 𝑌) = (0.‘𝐾)))
141, 13mpbid 235 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → (𝑝 𝑌) = (0.‘𝐾))
1514oveq2d 7247 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → ((𝑋 𝑌) (𝑝 𝑌)) = ((𝑋 𝑌) (0.‘𝐾)))
162hllatd 37141 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → 𝐾 ∈ Lat)
17 simpl2 1194 . . . 4 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → 𝑋𝐵)
187, 9latmcl 17970 . . . 4 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋 𝑌) ∈ 𝐵)
1916, 17, 6, 18syl3anc 1373 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → (𝑋 𝑌) ∈ 𝐵)
207, 8, 9latmle2 17995 . . . 4 ((𝐾 ∈ Lat ∧ 𝑋𝐵𝑌𝐵) → (𝑋 𝑌) 𝑌)
2116, 17, 6, 20syl3anc 1373 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → (𝑋 𝑌) 𝑌)
22 dihmeetlem7.j . . . 4 = (join‘𝐾)
237, 8, 22, 9, 11atmod1i2 37636 . . 3 ((𝐾 ∈ HL ∧ (𝑝𝐴 ∧ (𝑋 𝑌) ∈ 𝐵𝑌𝐵) ∧ (𝑋 𝑌) 𝑌) → ((𝑋 𝑌) (𝑝 𝑌)) = (((𝑋 𝑌) 𝑝) 𝑌))
242, 5, 19, 6, 21, 23syl131anc 1385 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → ((𝑋 𝑌) (𝑝 𝑌)) = (((𝑋 𝑌) 𝑝) 𝑌))
25 hlol 37138 . . . 4 (𝐾 ∈ HL → 𝐾 ∈ OL)
262, 25syl 17 . . 3 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → 𝐾 ∈ OL)
277, 22, 10olj01 37002 . . 3 ((𝐾 ∈ OL ∧ (𝑋 𝑌) ∈ 𝐵) → ((𝑋 𝑌) (0.‘𝐾)) = (𝑋 𝑌))
2826, 19, 27syl2anc 587 . 2 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → ((𝑋 𝑌) (0.‘𝐾)) = (𝑋 𝑌))
2915, 24, 283eqtr3d 2786 1 (((𝐾 ∈ HL ∧ 𝑋𝐵𝑌𝐵) ∧ (𝑝𝐴 ∧ ¬ 𝑝 𝑌)) → (((𝑋 𝑌) 𝑝) 𝑌) = (𝑋 𝑌))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 399  w3a 1089   = wceq 1543  wcel 2111   class class class wbr 5067  cfv 6397  (class class class)co 7231  Basecbs 16784  lecple 16833  joincjn 17842  meetcmee 17843  0.cp0 17953  Latclat 17961  OLcol 36951  Atomscatm 37040  AtLatcal 37041  HLchlt 37127
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 2113  ax-9 2121  ax-10 2142  ax-11 2159  ax-12 2176  ax-ext 2709  ax-rep 5193  ax-sep 5206  ax-nul 5213  ax-pow 5272  ax-pr 5336  ax-un 7541
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 2072  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2887  df-ne 2942  df-ral 3067  df-rex 3068  df-reu 3069  df-rab 3071  df-v 3422  df-sbc 3709  df-csb 3826  df-dif 3883  df-un 3885  df-in 3887  df-ss 3897  df-nul 4252  df-if 4454  df-pw 4529  df-sn 4556  df-pr 4558  df-op 4562  df-uni 4834  df-iun 4920  df-iin 4921  df-br 5068  df-opab 5130  df-mpt 5150  df-id 5469  df-xp 5571  df-rel 5572  df-cnv 5573  df-co 5574  df-dm 5575  df-rn 5576  df-res 5577  df-ima 5578  df-iota 6355  df-fun 6399  df-fn 6400  df-f 6401  df-f1 6402  df-fo 6403  df-f1o 6404  df-fv 6405  df-riota 7188  df-ov 7234  df-oprab 7235  df-mpo 7236  df-1st 7779  df-2nd 7780  df-proset 17826  df-poset 17844  df-plt 17860  df-lub 17876  df-glb 17877  df-join 17878  df-meet 17879  df-p0 17955  df-lat 17962  df-clat 18029  df-oposet 36953  df-ol 36955  df-oml 36956  df-covers 37043  df-ats 37044  df-atl 37075  df-cvlat 37099  df-hlat 37128  df-psubsp 37280  df-pmap 37281  df-padd 37573
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator