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

Theorem trlfset 34265
Description: The set of all traces of lattice translations for a lattice 𝐾. (Contributed by NM, 20-May-2012.)
Hypotheses
Ref Expression
trlset.b 𝐵 = (Base‘𝐾)
trlset.l = (le‘𝐾)
trlset.j = (join‘𝐾)
trlset.m = (meet‘𝐾)
trlset.a 𝐴 = (Atoms‘𝐾)
trlset.h 𝐻 = (LHyp‘𝐾)
Assertion
Ref Expression
trlfset (𝐾𝐶 → (trL‘𝐾) = (𝑤𝐻 ↦ (𝑓 ∈ ((LTrn‘𝐾)‘𝑤) ↦ (𝑥𝐵𝑝𝐴𝑝 𝑤𝑥 = ((𝑝 (𝑓𝑝)) 𝑤))))))
Distinct variable groups:   𝐴,𝑝   𝑥,𝐵   𝑤,𝐻   𝑓,𝑝,𝑤,𝑥,𝐾
Allowed substitution hints:   𝐴(𝑥,𝑤,𝑓)   𝐵(𝑤,𝑓,𝑝)   𝐶(𝑥,𝑤,𝑓,𝑝)   𝐻(𝑥,𝑓,𝑝)   (𝑥,𝑤,𝑓,𝑝)   (𝑥,𝑤,𝑓,𝑝)   (𝑥,𝑤,𝑓,𝑝)

Proof of Theorem trlfset
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 elex 3181 . 2 (𝐾𝐶𝐾 ∈ V)
2 fveq2 6085 . . . . 5 (𝑘 = 𝐾 → (LHyp‘𝑘) = (LHyp‘𝐾))
3 trlset.h . . . . 5 𝐻 = (LHyp‘𝐾)
42, 3syl6eqr 2658 . . . 4 (𝑘 = 𝐾 → (LHyp‘𝑘) = 𝐻)
5 fveq2 6085 . . . . . 6 (𝑘 = 𝐾 → (LTrn‘𝑘) = (LTrn‘𝐾))
65fveq1d 6087 . . . . 5 (𝑘 = 𝐾 → ((LTrn‘𝑘)‘𝑤) = ((LTrn‘𝐾)‘𝑤))
7 fveq2 6085 . . . . . . 7 (𝑘 = 𝐾 → (Base‘𝑘) = (Base‘𝐾))
8 trlset.b . . . . . . 7 𝐵 = (Base‘𝐾)
97, 8syl6eqr 2658 . . . . . 6 (𝑘 = 𝐾 → (Base‘𝑘) = 𝐵)
10 fveq2 6085 . . . . . . . 8 (𝑘 = 𝐾 → (Atoms‘𝑘) = (Atoms‘𝐾))
11 trlset.a . . . . . . . 8 𝐴 = (Atoms‘𝐾)
1210, 11syl6eqr 2658 . . . . . . 7 (𝑘 = 𝐾 → (Atoms‘𝑘) = 𝐴)
13 fveq2 6085 . . . . . . . . . . 11 (𝑘 = 𝐾 → (le‘𝑘) = (le‘𝐾))
14 trlset.l . . . . . . . . . . 11 = (le‘𝐾)
1513, 14syl6eqr 2658 . . . . . . . . . 10 (𝑘 = 𝐾 → (le‘𝑘) = )
1615breqd 4585 . . . . . . . . 9 (𝑘 = 𝐾 → (𝑝(le‘𝑘)𝑤𝑝 𝑤))
1716notbid 306 . . . . . . . 8 (𝑘 = 𝐾 → (¬ 𝑝(le‘𝑘)𝑤 ↔ ¬ 𝑝 𝑤))
18 fveq2 6085 . . . . . . . . . . 11 (𝑘 = 𝐾 → (meet‘𝑘) = (meet‘𝐾))
19 trlset.m . . . . . . . . . . 11 = (meet‘𝐾)
2018, 19syl6eqr 2658 . . . . . . . . . 10 (𝑘 = 𝐾 → (meet‘𝑘) = )
21 fveq2 6085 . . . . . . . . . . . 12 (𝑘 = 𝐾 → (join‘𝑘) = (join‘𝐾))
22 trlset.j . . . . . . . . . . . 12 = (join‘𝐾)
2321, 22syl6eqr 2658 . . . . . . . . . . 11 (𝑘 = 𝐾 → (join‘𝑘) = )
2423oveqd 6541 . . . . . . . . . 10 (𝑘 = 𝐾 → (𝑝(join‘𝑘)(𝑓𝑝)) = (𝑝 (𝑓𝑝)))
25 eqidd 2607 . . . . . . . . . 10 (𝑘 = 𝐾𝑤 = 𝑤)
2620, 24, 25oveq123d 6545 . . . . . . . . 9 (𝑘 = 𝐾 → ((𝑝(join‘𝑘)(𝑓𝑝))(meet‘𝑘)𝑤) = ((𝑝 (𝑓𝑝)) 𝑤))
2726eqeq2d 2616 . . . . . . . 8 (𝑘 = 𝐾 → (𝑥 = ((𝑝(join‘𝑘)(𝑓𝑝))(meet‘𝑘)𝑤) ↔ 𝑥 = ((𝑝 (𝑓𝑝)) 𝑤)))
2817, 27imbi12d 332 . . . . . . 7 (𝑘 = 𝐾 → ((¬ 𝑝(le‘𝑘)𝑤𝑥 = ((𝑝(join‘𝑘)(𝑓𝑝))(meet‘𝑘)𝑤)) ↔ (¬ 𝑝 𝑤𝑥 = ((𝑝 (𝑓𝑝)) 𝑤))))
2912, 28raleqbidv 3125 . . . . . 6 (𝑘 = 𝐾 → (∀𝑝 ∈ (Atoms‘𝑘)(¬ 𝑝(le‘𝑘)𝑤𝑥 = ((𝑝(join‘𝑘)(𝑓𝑝))(meet‘𝑘)𝑤)) ↔ ∀𝑝𝐴𝑝 𝑤𝑥 = ((𝑝 (𝑓𝑝)) 𝑤))))
309, 29riotaeqbidv 6489 . . . . 5 (𝑘 = 𝐾 → (𝑥 ∈ (Base‘𝑘)∀𝑝 ∈ (Atoms‘𝑘)(¬ 𝑝(le‘𝑘)𝑤𝑥 = ((𝑝(join‘𝑘)(𝑓𝑝))(meet‘𝑘)𝑤))) = (𝑥𝐵𝑝𝐴𝑝 𝑤𝑥 = ((𝑝 (𝑓𝑝)) 𝑤))))
316, 30mpteq12dv 4654 . . . 4 (𝑘 = 𝐾 → (𝑓 ∈ ((LTrn‘𝑘)‘𝑤) ↦ (𝑥 ∈ (Base‘𝑘)∀𝑝 ∈ (Atoms‘𝑘)(¬ 𝑝(le‘𝑘)𝑤𝑥 = ((𝑝(join‘𝑘)(𝑓𝑝))(meet‘𝑘)𝑤)))) = (𝑓 ∈ ((LTrn‘𝐾)‘𝑤) ↦ (𝑥𝐵𝑝𝐴𝑝 𝑤𝑥 = ((𝑝 (𝑓𝑝)) 𝑤)))))
324, 31mpteq12dv 4654 . . 3 (𝑘 = 𝐾 → (𝑤 ∈ (LHyp‘𝑘) ↦ (𝑓 ∈ ((LTrn‘𝑘)‘𝑤) ↦ (𝑥 ∈ (Base‘𝑘)∀𝑝 ∈ (Atoms‘𝑘)(¬ 𝑝(le‘𝑘)𝑤𝑥 = ((𝑝(join‘𝑘)(𝑓𝑝))(meet‘𝑘)𝑤))))) = (𝑤𝐻 ↦ (𝑓 ∈ ((LTrn‘𝐾)‘𝑤) ↦ (𝑥𝐵𝑝𝐴𝑝 𝑤𝑥 = ((𝑝 (𝑓𝑝)) 𝑤))))))
33 df-trl 34264 . . 3 trL = (𝑘 ∈ V ↦ (𝑤 ∈ (LHyp‘𝑘) ↦ (𝑓 ∈ ((LTrn‘𝑘)‘𝑤) ↦ (𝑥 ∈ (Base‘𝑘)∀𝑝 ∈ (Atoms‘𝑘)(¬ 𝑝(le‘𝑘)𝑤𝑥 = ((𝑝(join‘𝑘)(𝑓𝑝))(meet‘𝑘)𝑤))))))
34 fvex 6095 . . . . 5 (LHyp‘𝐾) ∈ V
353, 34eqeltri 2680 . . . 4 𝐻 ∈ V
3635mptex 6365 . . 3 (𝑤𝐻 ↦ (𝑓 ∈ ((LTrn‘𝐾)‘𝑤) ↦ (𝑥𝐵𝑝𝐴𝑝 𝑤𝑥 = ((𝑝 (𝑓𝑝)) 𝑤))))) ∈ V
3732, 33, 36fvmpt 6173 . 2 (𝐾 ∈ V → (trL‘𝐾) = (𝑤𝐻 ↦ (𝑓 ∈ ((LTrn‘𝐾)‘𝑤) ↦ (𝑥𝐵𝑝𝐴𝑝 𝑤𝑥 = ((𝑝 (𝑓𝑝)) 𝑤))))))
381, 37syl 17 1 (𝐾𝐶 → (trL‘𝐾) = (𝑤𝐻 ↦ (𝑓 ∈ ((LTrn‘𝐾)‘𝑤) ↦ (𝑥𝐵𝑝𝐴𝑝 𝑤𝑥 = ((𝑝 (𝑓𝑝)) 𝑤))))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4   = wceq 1474  wcel 1976  wral 2892  Vcvv 3169   class class class wbr 4574  cmpt 4634  cfv 5787  crio 6485  (class class class)co 6524  Basecbs 15638  lecple 15718  joincjn 16710  meetcmee 16711  Atomscatm 33368  LHypclh 34088  LTrncltrn 34205  trLctrl 34263
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1712  ax-4 1727  ax-5 1826  ax-6 1874  ax-7 1921  ax-9 1985  ax-10 2005  ax-11 2020  ax-12 2032  ax-13 2229  ax-ext 2586  ax-rep 4690  ax-sep 4700  ax-nul 4709  ax-pr 4825
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-3an 1032  df-tru 1477  df-ex 1695  df-nf 1700  df-sb 1867  df-eu 2458  df-mo 2459  df-clab 2593  df-cleq 2599  df-clel 2602  df-nfc 2736  df-ne 2778  df-ral 2897  df-rex 2898  df-reu 2899  df-rab 2901  df-v 3171  df-sbc 3399  df-csb 3496  df-dif 3539  df-un 3541  df-in 3543  df-ss 3550  df-nul 3871  df-if 4033  df-sn 4122  df-pr 4124  df-op 4128  df-uni 4364  df-iun 4448  df-br 4575  df-opab 4635  df-mpt 4636  df-id 4940  df-xp 5031  df-rel 5032  df-cnv 5033  df-co 5034  df-dm 5035  df-rn 5036  df-res 5037  df-ima 5038  df-iota 5751  df-fun 5789  df-fn 5790  df-f 5791  df-f1 5792  df-fo 5793  df-f1o 5794  df-fv 5795  df-riota 6486  df-ov 6527  df-trl 34264
This theorem is referenced by:  trlset  34266
  Copyright terms: Public domain W3C validator