Mathbox for Norm Megill |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > Mathboxes > cdlemn4a | Structured version Visualization version GIF version |
Description: Part of proof of Lemma N of [Crawley] p. 121 line 32. (Contributed by NM, 24-Feb-2014.) |
Ref | Expression |
---|---|
cdlemn4.b | ⊢ 𝐵 = (Base‘𝐾) |
cdlemn4.l | ⊢ ≤ = (le‘𝐾) |
cdlemn4.a | ⊢ 𝐴 = (Atoms‘𝐾) |
cdlemn4.p | ⊢ 𝑃 = ((oc‘𝐾)‘𝑊) |
cdlemn4.h | ⊢ 𝐻 = (LHyp‘𝐾) |
cdlemn4.t | ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊) |
cdlemn4.o | ⊢ 𝑂 = (ℎ ∈ 𝑇 ↦ ( I ↾ 𝐵)) |
cdlemn4.u | ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊) |
cdlemn4.f | ⊢ 𝐹 = (℩ℎ ∈ 𝑇 (ℎ‘𝑃) = 𝑄) |
cdlemn4.g | ⊢ 𝐺 = (℩ℎ ∈ 𝑇 (ℎ‘𝑃) = 𝑅) |
cdlemn4.j | ⊢ 𝐽 = (℩ℎ ∈ 𝑇 (ℎ‘𝑄) = 𝑅) |
cdlemn4a.n | ⊢ 𝑁 = (LSpan‘𝑈) |
cdlemn4a.s | ⊢ ⊕ = (LSSum‘𝑈) |
Ref | Expression |
---|---|
cdlemn4a | ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → (𝑁‘{〈𝐺, ( I ↾ 𝑇)〉}) ⊆ ((𝑁‘{〈𝐹, ( I ↾ 𝑇)〉}) ⊕ (𝑁‘{〈𝐽, 𝑂〉}))) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | cdlemn4.b | . . . . 5 ⊢ 𝐵 = (Base‘𝐾) | |
2 | cdlemn4.l | . . . . 5 ⊢ ≤ = (le‘𝐾) | |
3 | cdlemn4.a | . . . . 5 ⊢ 𝐴 = (Atoms‘𝐾) | |
4 | cdlemn4.p | . . . . 5 ⊢ 𝑃 = ((oc‘𝐾)‘𝑊) | |
5 | cdlemn4.h | . . . . 5 ⊢ 𝐻 = (LHyp‘𝐾) | |
6 | cdlemn4.t | . . . . 5 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊) | |
7 | cdlemn4.o | . . . . 5 ⊢ 𝑂 = (ℎ ∈ 𝑇 ↦ ( I ↾ 𝐵)) | |
8 | cdlemn4.u | . . . . 5 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊) | |
9 | cdlemn4.f | . . . . 5 ⊢ 𝐹 = (℩ℎ ∈ 𝑇 (ℎ‘𝑃) = 𝑄) | |
10 | cdlemn4.g | . . . . 5 ⊢ 𝐺 = (℩ℎ ∈ 𝑇 (ℎ‘𝑃) = 𝑅) | |
11 | cdlemn4.j | . . . . 5 ⊢ 𝐽 = (℩ℎ ∈ 𝑇 (ℎ‘𝑄) = 𝑅) | |
12 | eqid 2818 | . . . . 5 ⊢ (+g‘𝑈) = (+g‘𝑈) | |
13 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12 | cdlemn4 38214 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → 〈𝐺, ( I ↾ 𝑇)〉 = (〈𝐹, ( I ↾ 𝑇)〉(+g‘𝑈)〈𝐽, 𝑂〉)) |
14 | 13 | sneqd 4569 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → {〈𝐺, ( I ↾ 𝑇)〉} = {(〈𝐹, ( I ↾ 𝑇)〉(+g‘𝑈)〈𝐽, 𝑂〉)}) |
15 | 14 | fveq2d 6667 | . 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → (𝑁‘{〈𝐺, ( I ↾ 𝑇)〉}) = (𝑁‘{(〈𝐹, ( I ↾ 𝑇)〉(+g‘𝑈)〈𝐽, 𝑂〉)})) |
16 | simp1 1128 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻)) | |
17 | 5, 8, 16 | dvhlmod 38126 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → 𝑈 ∈ LMod) |
18 | 2, 3, 5, 4 | lhpocnel2 37035 | . . . . . 6 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) |
19 | 18 | 3ad2ant1 1125 | . . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) |
20 | simp2 1129 | . . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) | |
21 | 2, 3, 5, 6, 9 | ltrniotacl 37595 | . . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊)) → 𝐹 ∈ 𝑇) |
22 | 16, 19, 20, 21 | syl3anc 1363 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → 𝐹 ∈ 𝑇) |
23 | eqid 2818 | . . . . . 6 ⊢ ((TEndo‘𝐾)‘𝑊) = ((TEndo‘𝐾)‘𝑊) | |
24 | 5, 6, 23 | tendoidcl 37785 | . . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → ( I ↾ 𝑇) ∈ ((TEndo‘𝐾)‘𝑊)) |
25 | 24 | 3ad2ant1 1125 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → ( I ↾ 𝑇) ∈ ((TEndo‘𝐾)‘𝑊)) |
26 | eqid 2818 | . . . . 5 ⊢ (Base‘𝑈) = (Base‘𝑈) | |
27 | 5, 6, 23, 8, 26 | dvhelvbasei 38104 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ ( I ↾ 𝑇) ∈ ((TEndo‘𝐾)‘𝑊))) → 〈𝐹, ( I ↾ 𝑇)〉 ∈ (Base‘𝑈)) |
28 | 16, 22, 25, 27 | syl12anc 832 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → 〈𝐹, ( I ↾ 𝑇)〉 ∈ (Base‘𝑈)) |
29 | 2, 3, 5, 6, 11 | ltrniotacl 37595 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → 𝐽 ∈ 𝑇) |
30 | 1, 5, 6, 23, 7 | tendo0cl 37806 | . . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) → 𝑂 ∈ ((TEndo‘𝐾)‘𝑊)) |
31 | 30 | 3ad2ant1 1125 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → 𝑂 ∈ ((TEndo‘𝐾)‘𝑊)) |
32 | 5, 6, 23, 8, 26 | dvhelvbasei 38104 | . . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐽 ∈ 𝑇 ∧ 𝑂 ∈ ((TEndo‘𝐾)‘𝑊))) → 〈𝐽, 𝑂〉 ∈ (Base‘𝑈)) |
33 | 16, 29, 31, 32 | syl12anc 832 | . . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → 〈𝐽, 𝑂〉 ∈ (Base‘𝑈)) |
34 | cdlemn4a.n | . . . 4 ⊢ 𝑁 = (LSpan‘𝑈) | |
35 | cdlemn4a.s | . . . 4 ⊢ ⊕ = (LSSum‘𝑈) | |
36 | 26, 12, 34, 35 | lspsntri 19798 | . . 3 ⊢ ((𝑈 ∈ LMod ∧ 〈𝐹, ( I ↾ 𝑇)〉 ∈ (Base‘𝑈) ∧ 〈𝐽, 𝑂〉 ∈ (Base‘𝑈)) → (𝑁‘{(〈𝐹, ( I ↾ 𝑇)〉(+g‘𝑈)〈𝐽, 𝑂〉)}) ⊆ ((𝑁‘{〈𝐹, ( I ↾ 𝑇)〉}) ⊕ (𝑁‘{〈𝐽, 𝑂〉}))) |
37 | 17, 28, 33, 36 | syl3anc 1363 | . 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → (𝑁‘{(〈𝐹, ( I ↾ 𝑇)〉(+g‘𝑈)〈𝐽, 𝑂〉)}) ⊆ ((𝑁‘{〈𝐹, ( I ↾ 𝑇)〉}) ⊕ (𝑁‘{〈𝐽, 𝑂〉}))) |
38 | 15, 37 | eqsstrd 4002 | 1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ (𝑅 ∈ 𝐴 ∧ ¬ 𝑅 ≤ 𝑊)) → (𝑁‘{〈𝐺, ( I ↾ 𝑇)〉}) ⊆ ((𝑁‘{〈𝐹, ( I ↾ 𝑇)〉}) ⊕ (𝑁‘{〈𝐽, 𝑂〉}))) |
Colors of variables: wff setvar class |
Syntax hints: ¬ wn 3 → wi 4 ∧ wa 396 ∧ w3a 1079 = wceq 1528 ∈ wcel 2105 ⊆ wss 3933 {csn 4557 〈cop 4563 class class class wbr 5057 ↦ cmpt 5137 I cid 5452 ↾ cres 5550 ‘cfv 6348 ℩crio 7102 (class class class)co 7145 Basecbs 16471 +gcplusg 16553 lecple 16560 occoc 16561 LSSumclsm 18688 LModclmod 19563 LSpanclspn 19672 Atomscatm 36279 HLchlt 36366 LHypclh 37000 LTrncltrn 37117 TEndoctendo 37768 DVecHcdvh 38094 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1787 ax-4 1801 ax-5 1902 ax-6 1961 ax-7 2006 ax-8 2107 ax-9 2115 ax-10 2136 ax-11 2151 ax-12 2167 ax-ext 2790 ax-rep 5181 ax-sep 5194 ax-nul 5201 ax-pow 5257 ax-pr 5320 ax-un 7450 ax-cnex 10581 ax-resscn 10582 ax-1cn 10583 ax-icn 10584 ax-addcl 10585 ax-addrcl 10586 ax-mulcl 10587 ax-mulrcl 10588 ax-mulcom 10589 ax-addass 10590 ax-mulass 10591 ax-distr 10592 ax-i2m1 10593 ax-1ne0 10594 ax-1rid 10595 ax-rnegex 10596 ax-rrecex 10597 ax-cnre 10598 ax-pre-lttri 10599 ax-pre-lttrn 10600 ax-pre-ltadd 10601 ax-pre-mulgt0 10602 ax-riotaBAD 35969 |
This theorem depends on definitions: df-bi 208 df-an 397 df-or 842 df-3or 1080 df-3an 1081 df-tru 1531 df-fal 1541 df-ex 1772 df-nf 1776 df-sb 2061 df-mo 2615 df-eu 2647 df-clab 2797 df-cleq 2811 df-clel 2890 df-nfc 2960 df-ne 3014 df-nel 3121 df-ral 3140 df-rex 3141 df-reu 3142 df-rmo 3143 df-rab 3144 df-v 3494 df-sbc 3770 df-csb 3881 df-dif 3936 df-un 3938 df-in 3940 df-ss 3949 df-pss 3951 df-nul 4289 df-if 4464 df-pw 4537 df-sn 4558 df-pr 4560 df-tp 4562 df-op 4564 df-uni 4831 df-int 4868 df-iun 4912 df-iin 4913 df-br 5058 df-opab 5120 df-mpt 5138 df-tr 5164 df-id 5453 df-eprel 5458 df-po 5467 df-so 5468 df-fr 5507 df-we 5509 df-xp 5554 df-rel 5555 df-cnv 5556 df-co 5557 df-dm 5558 df-rn 5559 df-res 5560 df-ima 5561 df-pred 6141 df-ord 6187 df-on 6188 df-lim 6189 df-suc 6190 df-iota 6307 df-fun 6350 df-fn 6351 df-f 6352 df-f1 6353 df-fo 6354 df-f1o 6355 df-fv 6356 df-riota 7103 df-ov 7148 df-oprab 7149 df-mpo 7150 df-om 7570 df-1st 7678 df-2nd 7679 df-tpos 7881 df-undef 7928 df-wrecs 7936 df-recs 7997 df-rdg 8035 df-1o 8091 df-oadd 8095 df-er 8278 df-map 8397 df-en 8498 df-dom 8499 df-sdom 8500 df-fin 8501 df-pnf 10665 df-mnf 10666 df-xr 10667 df-ltxr 10668 df-le 10669 df-sub 10860 df-neg 10861 df-nn 11627 df-2 11688 df-3 11689 df-4 11690 df-5 11691 df-6 11692 df-n0 11886 df-z 11970 df-uz 12232 df-fz 12881 df-struct 16473 df-ndx 16474 df-slot 16475 df-base 16477 df-sets 16478 df-ress 16479 df-plusg 16566 df-mulr 16567 df-sca 16569 df-vsca 16570 df-0g 16703 df-proset 17526 df-poset 17544 df-plt 17556 df-lub 17572 df-glb 17573 df-join 17574 df-meet 17575 df-p0 17637 df-p1 17638 df-lat 17644 df-clat 17706 df-mgm 17840 df-sgrp 17889 df-mnd 17900 df-submnd 17945 df-grp 18044 df-minusg 18045 df-sbg 18046 df-subg 18214 df-cntz 18385 df-lsm 18690 df-cmn 18837 df-abl 18838 df-mgp 19169 df-ur 19181 df-ring 19228 df-oppr 19302 df-dvdsr 19320 df-unit 19321 df-invr 19351 df-dvr 19362 df-drng 19433 df-lmod 19565 df-lss 19633 df-lsp 19673 df-lvec 19804 df-oposet 36192 df-ol 36194 df-oml 36195 df-covers 36282 df-ats 36283 df-atl 36314 df-cvlat 36338 df-hlat 36367 df-llines 36514 df-lplanes 36515 df-lvols 36516 df-lines 36517 df-psubsp 36519 df-pmap 36520 df-padd 36812 df-lhyp 37004 df-laut 37005 df-ldil 37120 df-ltrn 37121 df-trl 37175 df-tendo 37771 df-edring 37773 df-dvech 38095 |
This theorem is referenced by: cdlemn5pre 38216 |
Copyright terms: Public domain | W3C validator |