| Mathbox for Norm Megill |
< Previous
Next >
Nearby theorems |
||
| Mirrors > Home > MPE Home > Th. List > Mathboxes > lcfrlem21 | Structured version Visualization version GIF version | ||
| Description: Lemma for lcfr 42845. (Contributed by NM, 11-Mar-2015.) |
| Ref | Expression |
|---|---|
| lcfrlem17.h | ⊢ 𝐻 = (LHyp‘𝐾) |
| lcfrlem17.o | ⊢ ⊥ = ((ocH‘𝐾)‘𝑊) |
| lcfrlem17.u | ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊) |
| lcfrlem17.v | ⊢ 𝑉 = (Base‘𝑈) |
| lcfrlem17.p | ⊢ + = (+g‘𝑈) |
| lcfrlem17.z | ⊢ 0 = (0g‘𝑈) |
| lcfrlem17.n | ⊢ 𝑁 = (LSpan‘𝑈) |
| lcfrlem17.a | ⊢ 𝐴 = (LSAtoms‘𝑈) |
| lcfrlem17.k | ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻)) |
| lcfrlem17.x | ⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 })) |
| lcfrlem17.y | ⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 })) |
| lcfrlem17.ne | ⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑌})) |
| Ref | Expression |
|---|---|
| lcfrlem21 | ⊢ (𝜑 → ((𝑁‘{𝑋, 𝑌}) ∩ ( ⊥ ‘{(𝑋 + 𝑌)})) ∈ 𝐴) |
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | lcfrlem17.h | . . 3 ⊢ 𝐻 = (LHyp‘𝐾) | |
| 2 | lcfrlem17.o | . . 3 ⊢ ⊥ = ((ocH‘𝐾)‘𝑊) | |
| 3 | lcfrlem17.u | . . 3 ⊢ 𝑈 = ((DVecH‘𝐾)‘𝑊) | |
| 4 | lcfrlem17.v | . . 3 ⊢ 𝑉 = (Base‘𝑈) | |
| 5 | lcfrlem17.p | . . 3 ⊢ + = (+g‘𝑈) | |
| 6 | lcfrlem17.z | . . 3 ⊢ 0 = (0g‘𝑈) | |
| 7 | lcfrlem17.n | . . 3 ⊢ 𝑁 = (LSpan‘𝑈) | |
| 8 | lcfrlem17.a | . . 3 ⊢ 𝐴 = (LSAtoms‘𝑈) | |
| 9 | lcfrlem17.k | . . . 4 ⊢ (𝜑 → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻)) | |
| 10 | 9 | adantr 486 | . . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 ∈ ( ⊥ ‘{(𝑋 + 𝑌)})) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻)) |
| 11 | lcfrlem17.x | . . . 4 ⊢ (𝜑 → 𝑋 ∈ (𝑉 ∖ { 0 })) | |
| 12 | 11 | adantr 486 | . . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 ∈ ( ⊥ ‘{(𝑋 + 𝑌)})) → 𝑋 ∈ (𝑉 ∖ { 0 })) |
| 13 | lcfrlem17.y | . . . 4 ⊢ (𝜑 → 𝑌 ∈ (𝑉 ∖ { 0 })) | |
| 14 | 13 | adantr 486 | . . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 ∈ ( ⊥ ‘{(𝑋 + 𝑌)})) → 𝑌 ∈ (𝑉 ∖ { 0 })) |
| 15 | lcfrlem17.ne | . . . 4 ⊢ (𝜑 → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑌})) | |
| 16 | 15 | adantr 486 | . . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 ∈ ( ⊥ ‘{(𝑋 + 𝑌)})) → (𝑁‘{𝑋}) ≠ (𝑁‘{𝑌})) |
| 17 | simpr 490 | . . 3 ⊢ ((𝜑 ∧ ¬ 𝑋 ∈ ( ⊥ ‘{(𝑋 + 𝑌)})) → ¬ 𝑋 ∈ ( ⊥ ‘{(𝑋 + 𝑌)})) | |
| 18 | 1, 2, 3, 4, 5, 6, 7, 8, 10, 12, 14, 16, 17 | lcfrlem20 42822 | . 2 ⊢ ((𝜑 ∧ ¬ 𝑋 ∈ ( ⊥ ‘{(𝑋 + 𝑌)})) → ((𝑁‘{𝑋, 𝑌}) ∩ ( ⊥ ‘{(𝑋 + 𝑌)})) ∈ 𝐴) |
| 19 | 1, 3, 9 | dvhlmod 42370 | . . . . . . . . 9 ⊢ (𝜑 → 𝑈 ∈ LMod) |
| 20 | 11 | eldifad 4054 | . . . . . . . . 9 ⊢ (𝜑 → 𝑋 ∈ 𝑉) |
| 21 | 13 | eldifad 4054 | . . . . . . . . 9 ⊢ (𝜑 → 𝑌 ∈ 𝑉) |
| 22 | 4, 5 | lmodcom 21216 | . . . . . . . . 9 ⊢ ((𝑈 ∈ LMod ∧ 𝑋 ∈ 𝑉 ∧ 𝑌 ∈ 𝑉) → (𝑋 + 𝑌) = (𝑌 + 𝑋)) |
| 23 | 19, 20, 21, 22 | syl3anc 1399 | . . . . . . . 8 ⊢ (𝜑 → (𝑋 + 𝑌) = (𝑌 + 𝑋)) |
| 24 | 23 | sneqd 4596 | . . . . . . 7 ⊢ (𝜑 → {(𝑋 + 𝑌)} = {(𝑌 + 𝑋)}) |
| 25 | 24 | fveq2d 6915 | . . . . . 6 ⊢ (𝜑 → ( ⊥ ‘{(𝑋 + 𝑌)}) = ( ⊥ ‘{(𝑌 + 𝑋)})) |
| 26 | 25 | eleq2d 2850 | . . . . 5 ⊢ (𝜑 → (𝑌 ∈ ( ⊥ ‘{(𝑋 + 𝑌)}) ↔ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)}))) |
| 27 | 26 | biimprd 251 | . . . 4 ⊢ (𝜑 → (𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)}) → 𝑌 ∈ ( ⊥ ‘{(𝑋 + 𝑌)}))) |
| 28 | 27 | con3dimp 414 | . . 3 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑋 + 𝑌)})) → ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) |
| 29 | prcom 4693 | . . . . . . . 8 ⊢ {𝑋, 𝑌} = {𝑌, 𝑋} | |
| 30 | 29 | fveq2i 6914 | . . . . . . 7 ⊢ (𝑁‘{𝑋, 𝑌}) = (𝑁‘{𝑌, 𝑋}) |
| 31 | 30 | a1i 11 | . . . . . 6 ⊢ (𝜑 → (𝑁‘{𝑋, 𝑌}) = (𝑁‘{𝑌, 𝑋})) |
| 32 | 31, 25 | ineq12d 4121 | . . . . 5 ⊢ (𝜑 → ((𝑁‘{𝑋, 𝑌}) ∩ ( ⊥ ‘{(𝑋 + 𝑌)})) = ((𝑁‘{𝑌, 𝑋}) ∩ ( ⊥ ‘{(𝑌 + 𝑋)}))) |
| 33 | 32 | adantr 486 | . . . 4 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) → ((𝑁‘{𝑋, 𝑌}) ∩ ( ⊥ ‘{(𝑋 + 𝑌)})) = ((𝑁‘{𝑌, 𝑋}) ∩ ( ⊥ ‘{(𝑌 + 𝑋)}))) |
| 34 | 9 | adantr 486 | . . . . 5 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻)) |
| 35 | 13 | adantr 486 | . . . . 5 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) → 𝑌 ∈ (𝑉 ∖ { 0 })) |
| 36 | 11 | adantr 486 | . . . . 5 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) → 𝑋 ∈ (𝑉 ∖ { 0 })) |
| 37 | 15 | necomd 3014 | . . . . . 6 ⊢ (𝜑 → (𝑁‘{𝑌}) ≠ (𝑁‘{𝑋})) |
| 38 | 37 | adantr 486 | . . . . 5 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) → (𝑁‘{𝑌}) ≠ (𝑁‘{𝑋})) |
| 39 | simpr 490 | . . . . 5 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) → ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) | |
| 40 | 1, 2, 3, 4, 5, 6, 7, 8, 34, 35, 36, 38, 39 | lcfrlem20 42822 | . . . 4 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) → ((𝑁‘{𝑌, 𝑋}) ∩ ( ⊥ ‘{(𝑌 + 𝑋)})) ∈ 𝐴) |
| 41 | 33, 40 | eqeltrd 2864 | . . 3 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑌 + 𝑋)})) → ((𝑁‘{𝑋, 𝑌}) ∩ ( ⊥ ‘{(𝑋 + 𝑌)})) ∈ 𝐴) |
| 42 | 28, 41 | syldan 603 | . 2 ⊢ ((𝜑 ∧ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑋 + 𝑌)})) → ((𝑁‘{𝑋, 𝑌}) ∩ ( ⊥ ‘{(𝑋 + 𝑌)})) ∈ 𝐴) |
| 43 | 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 13, 15 | lcfrlem19 42821 | . 2 ⊢ (𝜑 → (¬ 𝑋 ∈ ( ⊥ ‘{(𝑋 + 𝑌)}) ∨ ¬ 𝑌 ∈ ( ⊥ ‘{(𝑋 + 𝑌)}))) |
| 44 | 18, 42, 43 | mpjaodan 973 | 1 ⊢ (𝜑 → ((𝑁‘{𝑋, 𝑌}) ∩ ( ⊥ ‘{(𝑋 + 𝑌)})) ∈ 𝐴) |
| Colors of variables: wff setvar class |
| This proof depends on syntax axioms: ¬ wn 3 → wi 4 ∧ wa 401 = wceq 1570 ∈ wcel 2147 ≠ wne 2959 ∖ cdif 4048 ∩ cin 4092 {csn 4588 {cpr 4590 ‘cfv 6561 (class class class)co 7446 Basecbs 17419 +gcplusg 17460 0gc0g 17642 LModclmod 21168 LSpanclspn 21279 LSAtomsclsa 40234 HLchlt 40610 LHypclh 41244 DVecHcdvh 42338 ocHcoch 42607 |
| 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 5236 ax-sep 5253 ax-nul 5264 ax-pow 5332 ax-pr 5396 ax-un 7778 ax-cnex 11286 ax-resscn 11287 ax-1cn 11288 ax-icn 11289 ax-addcl 11290 ax-addrcl 11291 ax-mulcl 11292 ax-mulrcl 11293 ax-mulcom 11294 ax-addass 11295 ax-mulass 11296 ax-distr 11297 ax-i2m1 11298 ax-1ne0 11299 ax-1rid 11300 ax-rnegex 11301 ax-rrecex 11302 ax-cnre 11303 ax-pre-lttri 11304 ax-pre-lttrn 11305 ax-pre-ltadd 11306 ax-pre-mulgt0 11307 ax-riotaBAD 40213 |
| This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 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-nel 3066 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-pss 4017 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-tp 4593 df-op 4839 df-uni 4871 df-int 4911 df-iun 4956 df-iin 4957 df-br 5107 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5551 df-eprel 5556 df-po 5564 df-so 5565 df-fr 5609 df-we 5611 df-xp 5662 df-rel 5663 df-cnv 5664 df-co 5665 df-dm 5666 df-rn 5667 df-res 5668 df-ima 5669 df-pred 6325 df-ord 6386 df-on 6387 df-lim 6388 df-suc 6389 df-iota 6515 df-fun 6563 df-fn 6564 df-f 6565 df-f1 6566 df-fo 6567 df-f1o 6568 df-fv 6569 df-riota 7403 df-ov 7449 df-oprab 7450 df-mpo 7451 df-om 7905 df-1st 8028 df-2nd 8029 df-tpos 8274 df-undef 8321 df-frecs 8330 df-wrecs 8361 df-recs 8410 df-rdg 8449 df-1o 8507 df-2o 8508 df-er 8748 df-map 8880 df-en 9005 df-dom 9006 df-sdom 9007 df-fin 9008 df-pnf 11375 df-mnf 11376 df-xr 11377 df-ltxr 11378 df-le 11379 df-sub 11573 df-neg 11574 df-nn 12366 df-2 12435 df-3 12436 df-4 12437 df-5 12438 df-6 12439 df-n0 12637 df-z 12724 df-uz 12996 df-fz 13670 df-struct 17357 df-sets 17374 df-slot 17392 df-ndx 17404 df-base 17420 df-ress 17441 df-plusg 17473 df-mulr 17474 df-sca 17476 df-vsca 17477 df-0g 17644 df-mre 17788 df-mrc 17789 df-acs 17791 df-proset 18500 df-poset 18519 df-plt 18534 df-lub 18550 df-glb 18551 df-join 18552 df-meet 18553 df-p0 18629 df-p1 18630 df-lat 18638 df-clat 18705 df-mgm 18848 df-sgrp 18940 df-mnd 18956 df-submnd 19011 df-grp 19179 df-minusg 19180 df-sbg 19181 df-subg 19365 df-cntz 19564 df-oppg 19593 df-lsm 19883 df-cmn 20029 df-abl 20030 df-mgp 20394 df-rng 20408 df-ur 20441 df-ring 20494 df-oppr 20600 df-dvdsr 20620 df-unit 20621 df-invr 20651 df-dvr 20664 df-drng 21015 df-lmod 21170 df-lss 21240 df-lsp 21280 df-lvec 21411 df-lsatoms 40236 df-lshyp 40237 df-lcv 40279 df-oposet 40436 df-ol 40438 df-oml 40439 df-covers 40526 df-ats 40527 df-atl 40558 df-cvlat 40582 df-hlat 40611 df-llines 40758 df-lplanes 40759 df-lvols 40760 df-lines 40761 df-psubsp 40763 df-pmap 40764 df-padd 41056 df-lhyp 41248 df-laut 41249 df-ldil 41364 df-ltrn 41365 df-trl 41419 df-tgrp 42003 df-tendo 42015 df-edring 42017 df-dveca 42263 df-disoa 42289 df-dvech 42339 df-dib 42399 df-dic 42433 df-dih 42489 df-doch 42608 df-djh 42655 |
| This theorem is used by: lcfrlem22 42824 lcfrlem40 42842 |
| Copyright terms: Public domain | W3C validator |