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

Theorem eqlkr3 39119
Description: Two functionals with the same kernel are equal if they are equal at any nonzero value. (Contributed by NM, 2-Jan-2015.)
Hypotheses
Ref Expression
eqlkr3.v 𝑉 = (Base‘𝑊)
eqlkr3.s 𝑆 = (Scalar‘𝑊)
eqlkr3.r 𝑅 = (Base‘𝑆)
eqlkr3.o 0 = (0g𝑆)
eqlkr3.f 𝐹 = (LFnl‘𝑊)
eqlkr3.k 𝐾 = (LKer‘𝑊)
eqlkr3.w (𝜑𝑊 ∈ LVec)
eqlkr3.x (𝜑𝑋𝑉)
eqlkr3.g (𝜑𝐺𝐹)
eqlkr3.h (𝜑𝐻𝐹)
eqlkr3.e (𝜑 → (𝐾𝐺) = (𝐾𝐻))
eqlkr3.a (𝜑 → (𝐺𝑋) = (𝐻𝑋))
eqlkr3.n (𝜑 → (𝐺𝑋) ≠ 0 )
Assertion
Ref Expression
eqlkr3 (𝜑𝐺 = 𝐻)

Proof of Theorem eqlkr3
Dummy variables 𝑥 𝑟 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqlkr3.w . . . 4 (𝜑𝑊 ∈ LVec)
2 eqlkr3.g . . . 4 (𝜑𝐺𝐹)
3 eqlkr3.s . . . . 5 𝑆 = (Scalar‘𝑊)
4 eqlkr3.r . . . . 5 𝑅 = (Base‘𝑆)
5 eqlkr3.v . . . . 5 𝑉 = (Base‘𝑊)
6 eqlkr3.f . . . . 5 𝐹 = (LFnl‘𝑊)
73, 4, 5, 6lflf 39081 . . . 4 ((𝑊 ∈ LVec ∧ 𝐺𝐹) → 𝐺:𝑉𝑅)
81, 2, 7syl2anc 584 . . 3 (𝜑𝐺:𝑉𝑅)
98ffnd 6707 . 2 (𝜑𝐺 Fn 𝑉)
10 eqlkr3.h . . . 4 (𝜑𝐻𝐹)
113, 4, 5, 6lflf 39081 . . . 4 ((𝑊 ∈ LVec ∧ 𝐻𝐹) → 𝐻:𝑉𝑅)
121, 10, 11syl2anc 584 . . 3 (𝜑𝐻:𝑉𝑅)
1312ffnd 6707 . 2 (𝜑𝐻 Fn 𝑉)
14 eqlkr3.e . . . . . . 7 (𝜑 → (𝐾𝐺) = (𝐾𝐻))
15 eqid 2735 . . . . . . . 8 (.r𝑆) = (.r𝑆)
16 eqlkr3.k . . . . . . . 8 𝐾 = (LKer‘𝑊)
173, 4, 15, 5, 6, 16eqlkr 39117 . . . . . . 7 ((𝑊 ∈ LVec ∧ (𝐺𝐹𝐻𝐹) ∧ (𝐾𝐺) = (𝐾𝐻)) → ∃𝑟𝑅𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟))
181, 2, 10, 14, 17syl121anc 1377 . . . . . 6 (𝜑 → ∃𝑟𝑅𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟))
19 eqlkr3.x . . . . . . . . . . 11 (𝜑𝑋𝑉)
2019adantr 480 . . . . . . . . . 10 ((𝜑𝑟𝑅) → 𝑋𝑉)
21 fveq2 6876 . . . . . . . . . . . 12 (𝑥 = 𝑋 → (𝐻𝑥) = (𝐻𝑋))
22 fveq2 6876 . . . . . . . . . . . . 13 (𝑥 = 𝑋 → (𝐺𝑥) = (𝐺𝑋))
2322oveq1d 7420 . . . . . . . . . . . 12 (𝑥 = 𝑋 → ((𝐺𝑥)(.r𝑆)𝑟) = ((𝐺𝑋)(.r𝑆)𝑟))
2421, 23eqeq12d 2751 . . . . . . . . . . 11 (𝑥 = 𝑋 → ((𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟) ↔ (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)))
2524rspcv 3597 . . . . . . . . . 10 (𝑋𝑉 → (∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟) → (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)))
2620, 25syl 17 . . . . . . . . 9 ((𝜑𝑟𝑅) → (∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟) → (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)))
27 eqlkr3.a . . . . . . . . . . . . . . 15 (𝜑 → (𝐺𝑋) = (𝐻𝑋))
2827adantr 480 . . . . . . . . . . . . . 14 ((𝜑𝑟𝑅) → (𝐺𝑋) = (𝐻𝑋))
2928adantr 480 . . . . . . . . . . . . 13 (((𝜑𝑟𝑅) ∧ (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)) → (𝐺𝑋) = (𝐻𝑋))
30 simpr 484 . . . . . . . . . . . . 13 (((𝜑𝑟𝑅) ∧ (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)) → (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟))
3129, 30eqtr2d 2771 . . . . . . . . . . . 12 (((𝜑𝑟𝑅) ∧ (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)) → ((𝐺𝑋)(.r𝑆)𝑟) = (𝐺𝑋))
3231oveq2d 7421 . . . . . . . . . . 11 (((𝜑𝑟𝑅) ∧ (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)) → (((invr𝑆)‘(𝐺𝑋))(.r𝑆)((𝐺𝑋)(.r𝑆)𝑟)) = (((invr𝑆)‘(𝐺𝑋))(.r𝑆)(𝐺𝑋)))
333lvecdrng 21063 . . . . . . . . . . . . . . . . 17 (𝑊 ∈ LVec → 𝑆 ∈ DivRing)
341, 33syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝑆 ∈ DivRing)
3534adantr 480 . . . . . . . . . . . . . . 15 ((𝜑𝑟𝑅) → 𝑆 ∈ DivRing)
363, 4, 5, 6lflcl 39082 . . . . . . . . . . . . . . . . 17 ((𝑊 ∈ LVec ∧ 𝐺𝐹𝑋𝑉) → (𝐺𝑋) ∈ 𝑅)
371, 2, 19, 36syl3anc 1373 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐺𝑋) ∈ 𝑅)
3837adantr 480 . . . . . . . . . . . . . . 15 ((𝜑𝑟𝑅) → (𝐺𝑋) ∈ 𝑅)
39 eqlkr3.n . . . . . . . . . . . . . . . 16 (𝜑 → (𝐺𝑋) ≠ 0 )
4039adantr 480 . . . . . . . . . . . . . . 15 ((𝜑𝑟𝑅) → (𝐺𝑋) ≠ 0 )
41 eqlkr3.o . . . . . . . . . . . . . . . 16 0 = (0g𝑆)
42 eqid 2735 . . . . . . . . . . . . . . . 16 (1r𝑆) = (1r𝑆)
43 eqid 2735 . . . . . . . . . . . . . . . 16 (invr𝑆) = (invr𝑆)
444, 41, 15, 42, 43drnginvrl 20716 . . . . . . . . . . . . . . 15 ((𝑆 ∈ DivRing ∧ (𝐺𝑋) ∈ 𝑅 ∧ (𝐺𝑋) ≠ 0 ) → (((invr𝑆)‘(𝐺𝑋))(.r𝑆)(𝐺𝑋)) = (1r𝑆))
4535, 38, 40, 44syl3anc 1373 . . . . . . . . . . . . . 14 ((𝜑𝑟𝑅) → (((invr𝑆)‘(𝐺𝑋))(.r𝑆)(𝐺𝑋)) = (1r𝑆))
4645oveq1d 7420 . . . . . . . . . . . . 13 ((𝜑𝑟𝑅) → ((((invr𝑆)‘(𝐺𝑋))(.r𝑆)(𝐺𝑋))(.r𝑆)𝑟) = ((1r𝑆)(.r𝑆)𝑟))
47 lveclmod 21064 . . . . . . . . . . . . . . . . 17 (𝑊 ∈ LVec → 𝑊 ∈ LMod)
481, 47syl 17 . . . . . . . . . . . . . . . 16 (𝜑𝑊 ∈ LMod)
493lmodring 20825 . . . . . . . . . . . . . . . 16 (𝑊 ∈ LMod → 𝑆 ∈ Ring)
5048, 49syl 17 . . . . . . . . . . . . . . 15 (𝜑𝑆 ∈ Ring)
5150adantr 480 . . . . . . . . . . . . . 14 ((𝜑𝑟𝑅) → 𝑆 ∈ Ring)
524, 41, 43drnginvrcl 20713 . . . . . . . . . . . . . . 15 ((𝑆 ∈ DivRing ∧ (𝐺𝑋) ∈ 𝑅 ∧ (𝐺𝑋) ≠ 0 ) → ((invr𝑆)‘(𝐺𝑋)) ∈ 𝑅)
5335, 38, 40, 52syl3anc 1373 . . . . . . . . . . . . . 14 ((𝜑𝑟𝑅) → ((invr𝑆)‘(𝐺𝑋)) ∈ 𝑅)
54 simpr 484 . . . . . . . . . . . . . 14 ((𝜑𝑟𝑅) → 𝑟𝑅)
554, 15ringass 20213 . . . . . . . . . . . . . 14 ((𝑆 ∈ Ring ∧ (((invr𝑆)‘(𝐺𝑋)) ∈ 𝑅 ∧ (𝐺𝑋) ∈ 𝑅𝑟𝑅)) → ((((invr𝑆)‘(𝐺𝑋))(.r𝑆)(𝐺𝑋))(.r𝑆)𝑟) = (((invr𝑆)‘(𝐺𝑋))(.r𝑆)((𝐺𝑋)(.r𝑆)𝑟)))
5651, 53, 38, 54, 55syl13anc 1374 . . . . . . . . . . . . 13 ((𝜑𝑟𝑅) → ((((invr𝑆)‘(𝐺𝑋))(.r𝑆)(𝐺𝑋))(.r𝑆)𝑟) = (((invr𝑆)‘(𝐺𝑋))(.r𝑆)((𝐺𝑋)(.r𝑆)𝑟)))
574, 15, 42ringlidm 20229 . . . . . . . . . . . . . 14 ((𝑆 ∈ Ring ∧ 𝑟𝑅) → ((1r𝑆)(.r𝑆)𝑟) = 𝑟)
5851, 54, 57syl2anc 584 . . . . . . . . . . . . 13 ((𝜑𝑟𝑅) → ((1r𝑆)(.r𝑆)𝑟) = 𝑟)
5946, 56, 583eqtr3d 2778 . . . . . . . . . . . 12 ((𝜑𝑟𝑅) → (((invr𝑆)‘(𝐺𝑋))(.r𝑆)((𝐺𝑋)(.r𝑆)𝑟)) = 𝑟)
6059adantr 480 . . . . . . . . . . 11 (((𝜑𝑟𝑅) ∧ (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)) → (((invr𝑆)‘(𝐺𝑋))(.r𝑆)((𝐺𝑋)(.r𝑆)𝑟)) = 𝑟)
6145adantr 480 . . . . . . . . . . 11 (((𝜑𝑟𝑅) ∧ (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)) → (((invr𝑆)‘(𝐺𝑋))(.r𝑆)(𝐺𝑋)) = (1r𝑆))
6232, 60, 613eqtr3d 2778 . . . . . . . . . 10 (((𝜑𝑟𝑅) ∧ (𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟)) → 𝑟 = (1r𝑆))
6362ex 412 . . . . . . . . 9 ((𝜑𝑟𝑅) → ((𝐻𝑋) = ((𝐺𝑋)(.r𝑆)𝑟) → 𝑟 = (1r𝑆)))
6426, 63syld 47 . . . . . . . 8 ((𝜑𝑟𝑅) → (∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟) → 𝑟 = (1r𝑆)))
6564ancrd 551 . . . . . . 7 ((𝜑𝑟𝑅) → (∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟) → (𝑟 = (1r𝑆) ∧ ∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟))))
6665reximdva 3153 . . . . . 6 (𝜑 → (∃𝑟𝑅𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟) → ∃𝑟𝑅 (𝑟 = (1r𝑆) ∧ ∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟))))
6718, 66mpd 15 . . . . 5 (𝜑 → ∃𝑟𝑅 (𝑟 = (1r𝑆) ∧ ∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟)))
684, 42ringidcl 20225 . . . . . . 7 (𝑆 ∈ Ring → (1r𝑆) ∈ 𝑅)
6950, 68syl 17 . . . . . 6 (𝜑 → (1r𝑆) ∈ 𝑅)
70 oveq2 7413 . . . . . . . . 9 (𝑟 = (1r𝑆) → ((𝐺𝑥)(.r𝑆)𝑟) = ((𝐺𝑥)(.r𝑆)(1r𝑆)))
7170eqeq2d 2746 . . . . . . . 8 (𝑟 = (1r𝑆) → ((𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟) ↔ (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)(1r𝑆))))
7271ralbidv 3163 . . . . . . 7 (𝑟 = (1r𝑆) → (∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟) ↔ ∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)(1r𝑆))))
7372ceqsrexv 3634 . . . . . 6 ((1r𝑆) ∈ 𝑅 → (∃𝑟𝑅 (𝑟 = (1r𝑆) ∧ ∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟)) ↔ ∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)(1r𝑆))))
7469, 73syl 17 . . . . 5 (𝜑 → (∃𝑟𝑅 (𝑟 = (1r𝑆) ∧ ∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)𝑟)) ↔ ∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)(1r𝑆))))
7567, 74mpbid 232 . . . 4 (𝜑 → ∀𝑥𝑉 (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)(1r𝑆)))
7675r19.21bi 3234 . . 3 ((𝜑𝑥𝑉) → (𝐻𝑥) = ((𝐺𝑥)(.r𝑆)(1r𝑆)))
7748adantr 480 . . . . 5 ((𝜑𝑥𝑉) → 𝑊 ∈ LMod)
7877, 49syl 17 . . . 4 ((𝜑𝑥𝑉) → 𝑆 ∈ Ring)
791adantr 480 . . . . 5 ((𝜑𝑥𝑉) → 𝑊 ∈ LVec)
802adantr 480 . . . . 5 ((𝜑𝑥𝑉) → 𝐺𝐹)
81 simpr 484 . . . . 5 ((𝜑𝑥𝑉) → 𝑥𝑉)
823, 4, 5, 6lflcl 39082 . . . . 5 ((𝑊 ∈ LVec ∧ 𝐺𝐹𝑥𝑉) → (𝐺𝑥) ∈ 𝑅)
8379, 80, 81, 82syl3anc 1373 . . . 4 ((𝜑𝑥𝑉) → (𝐺𝑥) ∈ 𝑅)
844, 15, 42ringridm 20230 . . . 4 ((𝑆 ∈ Ring ∧ (𝐺𝑥) ∈ 𝑅) → ((𝐺𝑥)(.r𝑆)(1r𝑆)) = (𝐺𝑥))
8578, 83, 84syl2anc 584 . . 3 ((𝜑𝑥𝑉) → ((𝐺𝑥)(.r𝑆)(1r𝑆)) = (𝐺𝑥))
8676, 85eqtr2d 2771 . 2 ((𝜑𝑥𝑉) → (𝐺𝑥) = (𝐻𝑥))
879, 13, 86eqfnfvd 7024 1 (𝜑𝐺 = 𝐻)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1540  wcel 2108  wne 2932  wral 3051  wrex 3060  wf 6527  cfv 6531  (class class class)co 7405  Basecbs 17228  .rcmulr 17272  Scalarcsca 17274  0gc0g 17453  1rcur 20141  Ringcrg 20193  invrcinvr 20347  DivRingcdr 20689  LModclmod 20817  LVecclvec 21060  LFnlclfn 39075  LKerclk 39103
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 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-rep 5249  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7729  ax-cnex 11185  ax-resscn 11186  ax-1cn 11187  ax-icn 11188  ax-addcl 11189  ax-addrcl 11190  ax-mulcl 11191  ax-mulrcl 11192  ax-mulcom 11193  ax-addass 11194  ax-mulass 11195  ax-distr 11196  ax-i2m1 11197  ax-1ne0 11198  ax-1rid 11199  ax-rnegex 11200  ax-rrecex 11201  ax-cnre 11202  ax-pre-lttri 11203  ax-pre-lttrn 11204  ax-pre-ltadd 11205  ax-pre-mulgt0 11206
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 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3359  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-iun 4969  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6484  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-riota 7362  df-ov 7408  df-oprab 7409  df-mpo 7410  df-om 7862  df-1st 7988  df-2nd 7989  df-tpos 8225  df-frecs 8280  df-wrecs 8311  df-recs 8385  df-rdg 8424  df-er 8719  df-map 8842  df-en 8960  df-dom 8961  df-sdom 8962  df-pnf 11271  df-mnf 11272  df-xr 11273  df-ltxr 11274  df-le 11275  df-sub 11468  df-neg 11469  df-nn 12241  df-2 12303  df-3 12304  df-sets 17183  df-slot 17201  df-ndx 17213  df-base 17229  df-ress 17252  df-plusg 17284  df-mulr 17285  df-0g 17455  df-mgm 18618  df-sgrp 18697  df-mnd 18713  df-grp 18919  df-minusg 18920  df-sbg 18921  df-cmn 19763  df-abl 19764  df-mgp 20101  df-rng 20113  df-ur 20142  df-ring 20195  df-oppr 20297  df-dvdsr 20317  df-unit 20318  df-invr 20348  df-drng 20691  df-lmod 20819  df-lvec 21061  df-lfl 39076  df-lkr 39104
This theorem is referenced by:  lcfl6lem  41517
  Copyright terms: Public domain W3C validator