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

Theorem tendoex 40976
Description: Generalization of Lemma K of [Crawley] p. 118, cdlemk 40975. TODO: can this be used to shorten uses of cdlemk 40975? (Contributed by NM, 15-Oct-2013.)
Hypotheses
Ref Expression
tendoex.l = (le‘𝐾)
tendoex.h 𝐻 = (LHyp‘𝐾)
tendoex.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
tendoex.r 𝑅 = ((trL‘𝐾)‘𝑊)
tendoex.e 𝐸 = ((TEndo‘𝐾)‘𝑊)
Assertion
Ref Expression
tendoex (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) → ∃𝑢𝐸 (𝑢𝐹) = 𝑁)
Distinct variable groups:   𝑢,𝐸   𝑢,𝐹   𝑢,𝐾   𝑢,𝑁   𝑢,𝑅   𝑢,𝑇   𝑢,𝑊
Allowed substitution hints:   𝐻(𝑢)   (𝑢)

Proof of Theorem tendoex
Dummy variable is distinct from all other variables.
StepHypRef Expression
1 simpl1l 1225 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → 𝐾 ∈ HL)
2 hlop 39362 . . . . . . 7 (𝐾 ∈ HL → 𝐾 ∈ OP)
31, 2syl 17 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → 𝐾 ∈ OP)
4 simpl1 1192 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
5 simpl2r 1228 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → 𝑁𝑇)
6 eqid 2730 . . . . . . . 8 (Base‘𝐾) = (Base‘𝐾)
7 tendoex.h . . . . . . . 8 𝐻 = (LHyp‘𝐾)
8 tendoex.t . . . . . . . 8 𝑇 = ((LTrn‘𝐾)‘𝑊)
9 tendoex.r . . . . . . . 8 𝑅 = ((trL‘𝐾)‘𝑊)
106, 7, 8, 9trlcl 40165 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑁𝑇) → (𝑅𝑁) ∈ (Base‘𝐾))
114, 5, 10syl2anc 584 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → (𝑅𝑁) ∈ (Base‘𝐾))
12 simpr 484 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → (𝑅𝐹) ∈ (Atoms‘𝐾))
13 simpl3 1194 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → (𝑅𝑁) (𝑅𝐹))
14 tendoex.l . . . . . . 7 = (le‘𝐾)
15 eqid 2730 . . . . . . 7 (0.‘𝐾) = (0.‘𝐾)
16 eqid 2730 . . . . . . 7 (Atoms‘𝐾) = (Atoms‘𝐾)
176, 14, 15, 16leat 39293 . . . . . 6 (((𝐾 ∈ OP ∧ (𝑅𝑁) ∈ (Base‘𝐾) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) ∧ (𝑅𝑁) (𝑅𝐹)) → ((𝑅𝑁) = (𝑅𝐹) ∨ (𝑅𝑁) = (0.‘𝐾)))
183, 11, 12, 13, 17syl31anc 1375 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) ∈ (Atoms‘𝐾)) → ((𝑅𝑁) = (𝑅𝐹) ∨ (𝑅𝑁) = (0.‘𝐾)))
19 simp3 1138 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) → (𝑅𝑁) (𝑅𝐹))
20 breq2 5114 . . . . . . . . 9 ((𝑅𝐹) = (0.‘𝐾) → ((𝑅𝑁) (𝑅𝐹) ↔ (𝑅𝑁) (0.‘𝐾)))
2119, 20syl5ibcom 245 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) → ((𝑅𝐹) = (0.‘𝐾) → (𝑅𝑁) (0.‘𝐾)))
2221imp 406 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝑅𝑁) (0.‘𝐾))
23 simpl1l 1225 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) = (0.‘𝐾)) → 𝐾 ∈ HL)
2423, 2syl 17 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) = (0.‘𝐾)) → 𝐾 ∈ OP)
25 simpl1 1192 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
26 simpl2r 1228 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) = (0.‘𝐾)) → 𝑁𝑇)
2725, 26, 10syl2anc 584 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝑅𝑁) ∈ (Base‘𝐾))
286, 14, 15ople0 39187 . . . . . . . 8 ((𝐾 ∈ OP ∧ (𝑅𝑁) ∈ (Base‘𝐾)) → ((𝑅𝑁) (0.‘𝐾) ↔ (𝑅𝑁) = (0.‘𝐾)))
2924, 27, 28syl2anc 584 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) = (0.‘𝐾)) → ((𝑅𝑁) (0.‘𝐾) ↔ (𝑅𝑁) = (0.‘𝐾)))
3022, 29mpbid 232 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) = (0.‘𝐾)) → (𝑅𝑁) = (0.‘𝐾))
3130olcd 874 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) ∧ (𝑅𝐹) = (0.‘𝐾)) → ((𝑅𝑁) = (𝑅𝐹) ∨ (𝑅𝑁) = (0.‘𝐾)))
32 simp1 1136 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
33 simp2l 1200 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) → 𝐹𝑇)
3415, 16, 7, 8, 9trlator0 40172 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → ((𝑅𝐹) ∈ (Atoms‘𝐾) ∨ (𝑅𝐹) = (0.‘𝐾)))
3532, 33, 34syl2anc 584 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) → ((𝑅𝐹) ∈ (Atoms‘𝐾) ∨ (𝑅𝐹) = (0.‘𝐾)))
3618, 31, 35mpjaodan 960 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) → ((𝑅𝑁) = (𝑅𝐹) ∨ (𝑅𝑁) = (0.‘𝐾)))
37363expa 1118 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝑁) (𝑅𝐹)) → ((𝑅𝑁) = (𝑅𝐹) ∨ (𝑅𝑁) = (0.‘𝐾)))
38 eqcom 2737 . . . . 5 ((𝑅𝑁) = (𝑅𝐹) ↔ (𝑅𝐹) = (𝑅𝑁))
39 tendoex.e . . . . . . 7 𝐸 = ((TEndo‘𝐾)‘𝑊)
407, 8, 9, 39cdlemk 40975 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝐹) = (𝑅𝑁)) → ∃𝑢𝐸 (𝑢𝐹) = 𝑁)
41403expa 1118 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝐹) = (𝑅𝑁)) → ∃𝑢𝐸 (𝑢𝐹) = 𝑁)
4238, 41sylan2b 594 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝑁) = (𝑅𝐹)) → ∃𝑢𝐸 (𝑢𝐹) = 𝑁)
43 eqid 2730 . . . . . . 7 (𝑇 ↦ ( I ↾ (Base‘𝐾))) = (𝑇 ↦ ( I ↾ (Base‘𝐾)))
446, 7, 8, 39, 43tendo0cl 40791 . . . . . 6 ((𝐾 ∈ HL ∧ 𝑊𝐻) → (𝑇 ↦ ( I ↾ (Base‘𝐾))) ∈ 𝐸)
4544ad2antrr 726 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝑁) = (0.‘𝐾)) → (𝑇 ↦ ( I ↾ (Base‘𝐾))) ∈ 𝐸)
46 simplrl 776 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝑁) = (0.‘𝐾)) → 𝐹𝑇)
4743, 6tendo02 40788 . . . . . . 7 (𝐹𝑇 → ((𝑇 ↦ ( I ↾ (Base‘𝐾)))‘𝐹) = ( I ↾ (Base‘𝐾)))
4846, 47syl 17 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝑁) = (0.‘𝐾)) → ((𝑇 ↦ ( I ↾ (Base‘𝐾)))‘𝐹) = ( I ↾ (Base‘𝐾)))
496, 15, 7, 8, 9trlid0b 40179 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑁𝑇) → (𝑁 = ( I ↾ (Base‘𝐾)) ↔ (𝑅𝑁) = (0.‘𝐾)))
5049adantrl 716 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) → (𝑁 = ( I ↾ (Base‘𝐾)) ↔ (𝑅𝑁) = (0.‘𝐾)))
5150biimpar 477 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝑁) = (0.‘𝐾)) → 𝑁 = ( I ↾ (Base‘𝐾)))
5248, 51eqtr4d 2768 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝑁) = (0.‘𝐾)) → ((𝑇 ↦ ( I ↾ (Base‘𝐾)))‘𝐹) = 𝑁)
53 fveq1 6860 . . . . . . 7 (𝑢 = (𝑇 ↦ ( I ↾ (Base‘𝐾))) → (𝑢𝐹) = ((𝑇 ↦ ( I ↾ (Base‘𝐾)))‘𝐹))
5453eqeq1d 2732 . . . . . 6 (𝑢 = (𝑇 ↦ ( I ↾ (Base‘𝐾))) → ((𝑢𝐹) = 𝑁 ↔ ((𝑇 ↦ ( I ↾ (Base‘𝐾)))‘𝐹) = 𝑁))
5554rspcev 3591 . . . . 5 (((𝑇 ↦ ( I ↾ (Base‘𝐾))) ∈ 𝐸 ∧ ((𝑇 ↦ ( I ↾ (Base‘𝐾)))‘𝐹) = 𝑁) → ∃𝑢𝐸 (𝑢𝐹) = 𝑁)
5645, 52, 55syl2anc 584 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝑁) = (0.‘𝐾)) → ∃𝑢𝐸 (𝑢𝐹) = 𝑁)
5742, 56jaodan 959 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ ((𝑅𝑁) = (𝑅𝐹) ∨ (𝑅𝑁) = (0.‘𝐾))) → ∃𝑢𝐸 (𝑢𝐹) = 𝑁)
5837, 57syldan 591 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇)) ∧ (𝑅𝑁) (𝑅𝐹)) → ∃𝑢𝐸 (𝑢𝐹) = 𝑁)
59583impa 1109 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇) ∧ (𝑅𝑁) (𝑅𝐹)) → ∃𝑢𝐸 (𝑢𝐹) = 𝑁)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  wo 847  w3a 1086   = wceq 1540  wcel 2109  wrex 3054   class class class wbr 5110  cmpt 5191   I cid 5535  cres 5643  cfv 6514  Basecbs 17186  lecple 17234  0.cp0 18389  OPcops 39172  Atomscatm 39263  HLchlt 39350  LHypclh 39985  LTrncltrn 40102  trLctrl 40159  TEndoctendo 40753
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-rep 5237  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714  ax-riotaBAD 38953
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4875  df-iun 4960  df-iin 4961  df-br 5111  df-opab 5173  df-mpt 5192  df-id 5536  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-1st 7971  df-2nd 7972  df-undef 8255  df-map 8804  df-proset 18262  df-poset 18281  df-plt 18296  df-lub 18312  df-glb 18313  df-join 18314  df-meet 18315  df-p0 18391  df-p1 18392  df-lat 18398  df-clat 18465  df-oposet 39176  df-ol 39178  df-oml 39179  df-covers 39266  df-ats 39267  df-atl 39298  df-cvlat 39322  df-hlat 39351  df-llines 39499  df-lplanes 39500  df-lvols 39501  df-lines 39502  df-psubsp 39504  df-pmap 39505  df-padd 39797  df-lhyp 39989  df-laut 39990  df-ldil 40105  df-ltrn 40106  df-trl 40160  df-tendo 40756
This theorem is referenced by:  dva1dim  40986  dihjatcclem4  41422
  Copyright terms: Public domain W3C validator