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

Theorem lcv1 38414
Description: Covering property of a subspace plus an atom. (chcv1 32102 analog.) (Contributed by NM, 10-Jan-2015.)
Hypotheses
Ref Expression
lcv1.s 𝑆 = (LSubSpβ€˜π‘Š)
lcv1.p βŠ• = (LSSumβ€˜π‘Š)
lcv1.a 𝐴 = (LSAtomsβ€˜π‘Š)
lcv1.c 𝐢 = ( β‹–L β€˜π‘Š)
lcv1.w (πœ‘ β†’ π‘Š ∈ LVec)
lcv1.u (πœ‘ β†’ π‘ˆ ∈ 𝑆)
lcv1.q (πœ‘ β†’ 𝑄 ∈ 𝐴)
Assertion
Ref Expression
lcv1 (πœ‘ β†’ (Β¬ 𝑄 βŠ† π‘ˆ ↔ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)))

Proof of Theorem lcv1
Dummy variable π‘₯ is distinct from all other variables.
StepHypRef Expression
1 lcv1.q . . . . 5 (πœ‘ β†’ 𝑄 ∈ 𝐴)
2 lcv1.w . . . . . 6 (πœ‘ β†’ π‘Š ∈ LVec)
3 eqid 2724 . . . . . . 7 (Baseβ€˜π‘Š) = (Baseβ€˜π‘Š)
4 eqid 2724 . . . . . . 7 (LSpanβ€˜π‘Š) = (LSpanβ€˜π‘Š)
5 eqid 2724 . . . . . . 7 (0gβ€˜π‘Š) = (0gβ€˜π‘Š)
6 lcv1.a . . . . . . 7 𝐴 = (LSAtomsβ€˜π‘Š)
73, 4, 5, 6islsat 38364 . . . . . 6 (π‘Š ∈ LVec β†’ (𝑄 ∈ 𝐴 ↔ βˆƒπ‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)})𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})))
82, 7syl 17 . . . . 5 (πœ‘ β†’ (𝑄 ∈ 𝐴 ↔ βˆƒπ‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)})𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})))
91, 8mpbid 231 . . . 4 (πœ‘ β†’ βˆƒπ‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)})𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯}))
109adantr 480 . . 3 ((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) β†’ βˆƒπ‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)})𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯}))
11 lcv1.s . . . . . 6 𝑆 = (LSubSpβ€˜π‘Š)
12 lcv1.p . . . . . 6 βŠ• = (LSSumβ€˜π‘Š)
13 lcv1.c . . . . . 6 𝐢 = ( β‹–L β€˜π‘Š)
142adantr 480 . . . . . . 7 ((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) β†’ π‘Š ∈ LVec)
15143ad2ant1 1130 . . . . . 6 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ π‘Š ∈ LVec)
16 lcv1.u . . . . . . . 8 (πœ‘ β†’ π‘ˆ ∈ 𝑆)
1716adantr 480 . . . . . . 7 ((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) β†’ π‘ˆ ∈ 𝑆)
18173ad2ant1 1130 . . . . . 6 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ π‘ˆ ∈ 𝑆)
19 eldifi 4119 . . . . . . 7 (π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) β†’ π‘₯ ∈ (Baseβ€˜π‘Š))
20193ad2ant2 1131 . . . . . 6 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ π‘₯ ∈ (Baseβ€˜π‘Š))
21 simp1r 1195 . . . . . . 7 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ Β¬ 𝑄 βŠ† π‘ˆ)
22 simp3 1135 . . . . . . . 8 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯}))
2322sseq1d 4006 . . . . . . 7 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ (𝑄 βŠ† π‘ˆ ↔ ((LSpanβ€˜π‘Š)β€˜{π‘₯}) βŠ† π‘ˆ))
2421, 23mtbid 324 . . . . . 6 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ Β¬ ((LSpanβ€˜π‘Š)β€˜{π‘₯}) βŠ† π‘ˆ)
253, 11, 4, 12, 13, 15, 18, 20, 24lsmcv2 38402 . . . . 5 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ π‘ˆπΆ(π‘ˆ βŠ• ((LSpanβ€˜π‘Š)β€˜{π‘₯})))
2622oveq2d 7418 . . . . 5 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ (π‘ˆ βŠ• 𝑄) = (π‘ˆ βŠ• ((LSpanβ€˜π‘Š)β€˜{π‘₯})))
2725, 26breqtrrd 5167 . . . 4 (((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) ∧ π‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)}) ∧ 𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯})) β†’ π‘ˆπΆ(π‘ˆ βŠ• 𝑄))
2827rexlimdv3a 3151 . . 3 ((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) β†’ (βˆƒπ‘₯ ∈ ((Baseβ€˜π‘Š) βˆ– {(0gβ€˜π‘Š)})𝑄 = ((LSpanβ€˜π‘Š)β€˜{π‘₯}) β†’ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)))
2910, 28mpd 15 . 2 ((πœ‘ ∧ Β¬ 𝑄 βŠ† π‘ˆ) β†’ π‘ˆπΆ(π‘ˆ βŠ• 𝑄))
302adantr 480 . . . 4 ((πœ‘ ∧ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)) β†’ π‘Š ∈ LVec)
3116adantr 480 . . . 4 ((πœ‘ ∧ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)) β†’ π‘ˆ ∈ 𝑆)
32 lveclmod 20950 . . . . . . 7 (π‘Š ∈ LVec β†’ π‘Š ∈ LMod)
332, 32syl 17 . . . . . 6 (πœ‘ β†’ π‘Š ∈ LMod)
3411, 6, 33, 1lsatlssel 38370 . . . . . 6 (πœ‘ β†’ 𝑄 ∈ 𝑆)
3511, 12lsmcl 20927 . . . . . 6 ((π‘Š ∈ LMod ∧ π‘ˆ ∈ 𝑆 ∧ 𝑄 ∈ 𝑆) β†’ (π‘ˆ βŠ• 𝑄) ∈ 𝑆)
3633, 16, 34, 35syl3anc 1368 . . . . 5 (πœ‘ β†’ (π‘ˆ βŠ• 𝑄) ∈ 𝑆)
3736adantr 480 . . . 4 ((πœ‘ ∧ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)) β†’ (π‘ˆ βŠ• 𝑄) ∈ 𝑆)
38 simpr 484 . . . 4 ((πœ‘ ∧ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)) β†’ π‘ˆπΆ(π‘ˆ βŠ• 𝑄))
3911, 13, 30, 31, 37, 38lcvpss 38397 . . 3 ((πœ‘ ∧ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)) β†’ π‘ˆ ⊊ (π‘ˆ βŠ• 𝑄))
4011lsssssubg 20801 . . . . . . 7 (π‘Š ∈ LMod β†’ 𝑆 βŠ† (SubGrpβ€˜π‘Š))
4133, 40syl 17 . . . . . 6 (πœ‘ β†’ 𝑆 βŠ† (SubGrpβ€˜π‘Š))
4241, 16sseldd 3976 . . . . 5 (πœ‘ β†’ π‘ˆ ∈ (SubGrpβ€˜π‘Š))
4341, 34sseldd 3976 . . . . 5 (πœ‘ β†’ 𝑄 ∈ (SubGrpβ€˜π‘Š))
4412, 42, 43lssnle 19590 . . . 4 (πœ‘ β†’ (Β¬ 𝑄 βŠ† π‘ˆ ↔ π‘ˆ ⊊ (π‘ˆ βŠ• 𝑄)))
4544adantr 480 . . 3 ((πœ‘ ∧ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)) β†’ (Β¬ 𝑄 βŠ† π‘ˆ ↔ π‘ˆ ⊊ (π‘ˆ βŠ• 𝑄)))
4639, 45mpbird 257 . 2 ((πœ‘ ∧ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)) β†’ Β¬ 𝑄 βŠ† π‘ˆ)
4729, 46impbida 798 1 (πœ‘ β†’ (Β¬ 𝑄 βŠ† π‘ˆ ↔ π‘ˆπΆ(π‘ˆ βŠ• 𝑄)))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 395   ∧ w3a 1084   = wceq 1533   ∈ wcel 2098  βˆƒwrex 3062   βˆ– cdif 3938   βŠ† wss 3941   ⊊ wpss 3942  {csn 4621   class class class wbr 5139  β€˜cfv 6534  (class class class)co 7402  Basecbs 17149  0gc0g 17390  SubGrpcsubg 19043  LSSumclsm 19550  LModclmod 20702  LSubSpclss 20774  LSpanclspn 20814  LVecclvec 20946  LSAtomsclsa 38347   β‹–L clcv 38391
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5276  ax-sep 5290  ax-nul 5297  ax-pow 5354  ax-pr 5418  ax-un 7719  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3771  df-csb 3887  df-dif 3944  df-un 3946  df-in 3948  df-ss 3958  df-pss 3960  df-nul 4316  df-if 4522  df-pw 4597  df-sn 4622  df-pr 4624  df-op 4628  df-uni 4901  df-int 4942  df-iun 4990  df-br 5140  df-opab 5202  df-mpt 5223  df-tr 5257  df-id 5565  df-eprel 5571  df-po 5579  df-so 5580  df-fr 5622  df-we 5624  df-xp 5673  df-rel 5674  df-cnv 5675  df-co 5676  df-dm 5677  df-rn 5678  df-res 5679  df-ima 5680  df-pred 6291  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6486  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-riota 7358  df-ov 7405  df-oprab 7406  df-mpo 7407  df-om 7850  df-1st 7969  df-2nd 7970  df-tpos 8207  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-er 8700  df-en 8937  df-dom 8938  df-sdom 8939  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-sub 11445  df-neg 11446  df-nn 12212  df-2 12274  df-3 12275  df-sets 17102  df-slot 17120  df-ndx 17132  df-base 17150  df-ress 17179  df-plusg 17215  df-mulr 17216  df-0g 17392  df-mgm 18569  df-sgrp 18648  df-mnd 18664  df-submnd 18710  df-grp 18862  df-minusg 18863  df-sbg 18864  df-subg 19046  df-cntz 19229  df-lsm 19552  df-cmn 19698  df-abl 19699  df-mgp 20036  df-rng 20054  df-ur 20083  df-ring 20136  df-oppr 20232  df-dvdsr 20255  df-unit 20256  df-invr 20286  df-drng 20585  df-lmod 20704  df-lss 20775  df-lsp 20815  df-lvec 20947  df-lsatoms 38349  df-lcv 38392
This theorem is referenced by:  lcv2  38415  lsatnle  38417  lsatcvat3  38425
  Copyright terms: Public domain W3C validator