Theorem trlle 41507

Description: The trace of a lattice translation is less than the fiducial co-atom 𝑊. (Contributed by NM, 25-May-2012.)

Hypotheses

Ref	Expression
trlle.l	⊢ ≤ = (le‘𝐾)
trlle.h	⊢ 𝐻 = (LHyp‘𝐾)
trlle.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
trlle.r	⊢ 𝑅 = ((trL‘𝐾)‘𝑊)

Assertion

Ref	Expression
trlle	⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (𝑅‘𝐹) ≤ 𝑊)

Proof of Theorem trlle

Step	Hyp	Ref	Expression
1		trlle.l	. . . . 5 ⊢ ≤ = (le‘𝐾)
2		eqid 2763	. . . . 5 ⊢ (oc‘𝐾) = (oc‘𝐾)
3		eqid 2763	. . . . 5 ⊢ (Atoms‘𝐾) = (Atoms‘𝐾)
4		trlle.h	. . . . 5 ⊢ 𝐻 = (LHyp‘𝐾)
5	1, 2, 3, 4	lhpocnel 41341	. . . 4 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (((oc‘𝐾)‘𝑊) ∈ (Atoms‘𝐾) ∧ ¬ ((oc‘𝐾)‘𝑊) ≤ 𝑊))
6	5	adantr 486	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (((oc‘𝐾)‘𝑊) ∈ (Atoms‘𝐾) ∧ ¬ ((oc‘𝐾)‘𝑊) ≤ 𝑊))
7		eqid 2763	. . . 4 ⊢ (join‘𝐾) = (join‘𝐾)
8		eqid 2763	. . . 4 ⊢ (meet‘𝐾) = (meet‘𝐾)
9		trlle.t	. . . 4 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
10		trlle.r	. . . 4 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
11	1, 7, 8, 3, 4, 9, 10	trlval2 41486	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ (((oc‘𝐾)‘𝑊) ∈ (Atoms‘𝐾) ∧ ¬ ((oc‘𝐾)‘𝑊) ≤ 𝑊)) → (𝑅‘𝐹) = ((((oc‘𝐾)‘𝑊)(join‘𝐾)(𝐹‘((oc‘𝐾)‘𝑊)))(meet‘𝐾)𝑊))
12	6, 11	mpd3an3 1492	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (𝑅‘𝐹) = ((((oc‘𝐾)‘𝑊)(join‘𝐾)(𝐹‘((oc‘𝐾)‘𝑊)))(meet‘𝐾)𝑊))
13		hllat 40686	. . . 4 ⊢ (𝐾 ∈ HL → 𝐾 ∈ Lat)
14	13	ad2antrr 739	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐾 ∈ Lat)
15		hlop 40685	. . . . . 6 ⊢ (𝐾 ∈ HL → 𝐾 ∈ OP)
16	15	ad2antrr 739	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝐾 ∈ OP)
17		eqid 2763	. . . . . . 7 ⊢ (Base‘𝐾) = (Base‘𝐾)
18	17, 4	lhpbase 41321	. . . . . 6 ⊢ (𝑊 ∈ 𝐻 → 𝑊 ∈ (Base‘𝐾))
19	18	ad2antlr 740	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → 𝑊 ∈ (Base‘𝐾))
20	17, 2	opoccl 40517	. . . . 5 ⊢ ((𝐾 ∈ OP ∧ 𝑊 ∈ (Base‘𝐾)) → ((oc‘𝐾)‘𝑊) ∈ (Base‘𝐾))
21	16, 19, 20	syl2anc 596	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ((oc‘𝐾)‘𝑊) ∈ (Base‘𝐾))
22	17, 4, 9	ltrncl 41448	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ ((oc‘𝐾)‘𝑊) ∈ (Base‘𝐾)) → (𝐹‘((oc‘𝐾)‘𝑊)) ∈ (Base‘𝐾))
23	21, 22	mpd3an3 1492	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (𝐹‘((oc‘𝐾)‘𝑊)) ∈ (Base‘𝐾))
24	17, 7	latjcl 18663	. . . 4 ⊢ ((𝐾 ∈ Lat ∧ ((oc‘𝐾)‘𝑊) ∈ (Base‘𝐾) ∧ (𝐹‘((oc‘𝐾)‘𝑊)) ∈ (Base‘𝐾)) → (((oc‘𝐾)‘𝑊)(join‘𝐾)(𝐹‘((oc‘𝐾)‘𝑊))) ∈ (Base‘𝐾))
25	14, 21, 23, 24	syl3anc 1399	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (((oc‘𝐾)‘𝑊)(join‘𝐾)(𝐹‘((oc‘𝐾)‘𝑊))) ∈ (Base‘𝐾))
26	17, 1, 8	latmle2 18689	. . 3 ⊢ ((𝐾 ∈ Lat ∧ (((oc‘𝐾)‘𝑊)(join‘𝐾)(𝐹‘((oc‘𝐾)‘𝑊))) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) → ((((oc‘𝐾)‘𝑊)(join‘𝐾)(𝐹‘((oc‘𝐾)‘𝑊)))(meet‘𝐾)𝑊) ≤ 𝑊)
27	14, 25, 19, 26	syl3anc 1399	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ((((oc‘𝐾)‘𝑊)(join‘𝐾)(𝐹‘((oc‘𝐾)‘𝑊)))(meet‘𝐾)𝑊) ≤ 𝑊)
28	12, 27	eqbrtrd 5133	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (𝑅‘𝐹) ≤ 𝑊)

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2147   class class class wbr 5108  ‘cfv 6566  (class class class)co 7451  Basecbs 17431  lecple 17479  occoc 17480  joincjn 18535  meetcmee 18536  Latclat 18655  OPcops 40495  Atomscatm 40586  HLchlt 40673  LHypclh 41307  LTrncltrn 41424  trLctrl 41481

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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783

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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-op 4841  df-uni 4873  df-iun 4958  df-br 5109  df-opab 5174  df-mpt 5193  df-id 5553  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-riota 7408  df-ov 7454  df-oprab 7455  df-mpo 7456  df-map 8887  df-proset 18518  df-poset 18537  df-plt 18552  df-lub 18568  df-glb 18569  df-join 18570  df-meet 18571  df-p0 18647  df-p1 18648  df-lat 18656  df-oposet 40499  df-ol 40501  df-oml 40502  df-covers 40589  df-ats 40590  df-atl 40621  df-cvlat 40645  df-hlat 40674  df-lhyp 41311  df-laut 41312  df-ldil 41427  df-ltrn 41428  df-trl 41482

This theorem is used by:  trlne  41508  cdlemc5  41518  cdlemg6c  41943  cdlemg10c  41962  cdlemg10  41964  cdlemg17dALTN  41987  cdlemg27a  42015  cdlemg31b0N  42017  cdlemg31b0a  42018  cdlemg27b  42019  cdlemg31c  42022  cdlemg35  42036  cdlemh2  42139  cdlemh  42140  cdlemk3  42156  cdlemk9  42162  cdlemk9bN  42163  cdlemk10  42166  cdlemk12  42173  cdlemk14  42177  cdlemk12u  42195  cdlemkfid1N  42244  cdlemk47  42272  dia1N  42376  dia1dim  42384  dia2dimlem1  42387  dia2dimlem10  42396  dib1dim  42488  cdlemn2a  42519  dih1dimb  42563  dihopelvalcpre  42571  dihwN  42612  dihglblem5apreN  42614  dih1dimatlem  42652