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

Theorem lflset 37521
Description: The set of linear functionals in a left module or left vector space. (Contributed by NM, 15-Apr-2014.) (Revised by Mario Carneiro, 24-Jun-2014.)
Hypotheses
Ref Expression
lflset.v 𝑉 = (Base‘𝑊)
lflset.a + = (+g𝑊)
lflset.d 𝐷 = (Scalar‘𝑊)
lflset.s · = ( ·𝑠𝑊)
lflset.k 𝐾 = (Base‘𝐷)
lflset.p = (+g𝐷)
lflset.t × = (.r𝐷)
lflset.f 𝐹 = (LFnl‘𝑊)
Assertion
Ref Expression
lflset (𝑊𝑋𝐹 = {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))})
Distinct variable groups:   𝑓,𝑟,𝐾   𝑥,𝑓,𝑦,𝑉   𝑓,𝑊   𝑥,𝑟,𝑦,𝑊
Allowed substitution hints:   𝐷(𝑥,𝑦,𝑓,𝑟)   + (𝑥,𝑦,𝑓,𝑟)   (𝑥,𝑦,𝑓,𝑟)   · (𝑥,𝑦,𝑓,𝑟)   × (𝑥,𝑦,𝑓,𝑟)   𝐹(𝑥,𝑦,𝑓,𝑟)   𝐾(𝑥,𝑦)   𝑉(𝑟)   𝑋(𝑥,𝑦,𝑓,𝑟)

Proof of Theorem lflset
Dummy variable 𝑤 is distinct from all other variables.
StepHypRef Expression
1 elex 3463 . 2 (𝑊𝑋𝑊 ∈ V)
2 lflset.f . . 3 𝐹 = (LFnl‘𝑊)
3 fveq2 6842 . . . . . . . . 9 (𝑤 = 𝑊 → (Scalar‘𝑤) = (Scalar‘𝑊))
4 lflset.d . . . . . . . . 9 𝐷 = (Scalar‘𝑊)
53, 4eqtr4di 2794 . . . . . . . 8 (𝑤 = 𝑊 → (Scalar‘𝑤) = 𝐷)
65fveq2d 6846 . . . . . . 7 (𝑤 = 𝑊 → (Base‘(Scalar‘𝑤)) = (Base‘𝐷))
7 lflset.k . . . . . . 7 𝐾 = (Base‘𝐷)
86, 7eqtr4di 2794 . . . . . 6 (𝑤 = 𝑊 → (Base‘(Scalar‘𝑤)) = 𝐾)
9 fveq2 6842 . . . . . . 7 (𝑤 = 𝑊 → (Base‘𝑤) = (Base‘𝑊))
10 lflset.v . . . . . . 7 𝑉 = (Base‘𝑊)
119, 10eqtr4di 2794 . . . . . 6 (𝑤 = 𝑊 → (Base‘𝑤) = 𝑉)
128, 11oveq12d 7375 . . . . 5 (𝑤 = 𝑊 → ((Base‘(Scalar‘𝑤)) ↑m (Base‘𝑤)) = (𝐾m 𝑉))
13 fveq2 6842 . . . . . . . . . . . 12 (𝑤 = 𝑊 → (+g𝑤) = (+g𝑊))
14 lflset.a . . . . . . . . . . . 12 + = (+g𝑊)
1513, 14eqtr4di 2794 . . . . . . . . . . 11 (𝑤 = 𝑊 → (+g𝑤) = + )
16 fveq2 6842 . . . . . . . . . . . . 13 (𝑤 = 𝑊 → ( ·𝑠𝑤) = ( ·𝑠𝑊))
17 lflset.s . . . . . . . . . . . . 13 · = ( ·𝑠𝑊)
1816, 17eqtr4di 2794 . . . . . . . . . . . 12 (𝑤 = 𝑊 → ( ·𝑠𝑤) = · )
1918oveqd 7374 . . . . . . . . . . 11 (𝑤 = 𝑊 → (𝑟( ·𝑠𝑤)𝑥) = (𝑟 · 𝑥))
20 eqidd 2737 . . . . . . . . . . 11 (𝑤 = 𝑊𝑦 = 𝑦)
2115, 19, 20oveq123d 7378 . . . . . . . . . 10 (𝑤 = 𝑊 → ((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦) = ((𝑟 · 𝑥) + 𝑦))
2221fveq2d 6846 . . . . . . . . 9 (𝑤 = 𝑊 → (𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = (𝑓‘((𝑟 · 𝑥) + 𝑦)))
235fveq2d 6846 . . . . . . . . . . 11 (𝑤 = 𝑊 → (+g‘(Scalar‘𝑤)) = (+g𝐷))
24 lflset.p . . . . . . . . . . 11 = (+g𝐷)
2523, 24eqtr4di 2794 . . . . . . . . . 10 (𝑤 = 𝑊 → (+g‘(Scalar‘𝑤)) = )
265fveq2d 6846 . . . . . . . . . . . 12 (𝑤 = 𝑊 → (.r‘(Scalar‘𝑤)) = (.r𝐷))
27 lflset.t . . . . . . . . . . . 12 × = (.r𝐷)
2826, 27eqtr4di 2794 . . . . . . . . . . 11 (𝑤 = 𝑊 → (.r‘(Scalar‘𝑤)) = × )
2928oveqd 7374 . . . . . . . . . 10 (𝑤 = 𝑊 → (𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥)) = (𝑟 × (𝑓𝑥)))
30 eqidd 2737 . . . . . . . . . 10 (𝑤 = 𝑊 → (𝑓𝑦) = (𝑓𝑦))
3125, 29, 30oveq123d 7378 . . . . . . . . 9 (𝑤 = 𝑊 → ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦)))
3222, 31eqeq12d 2752 . . . . . . . 8 (𝑤 = 𝑊 → ((𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) ↔ (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))))
3311, 32raleqbidv 3319 . . . . . . 7 (𝑤 = 𝑊 → (∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) ↔ ∀𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))))
3411, 33raleqbidv 3319 . . . . . 6 (𝑤 = 𝑊 → (∀𝑥 ∈ (Base‘𝑤)∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) ↔ ∀𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))))
358, 34raleqbidv 3319 . . . . 5 (𝑤 = 𝑊 → (∀𝑟 ∈ (Base‘(Scalar‘𝑤))∀𝑥 ∈ (Base‘𝑤)∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) ↔ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))))
3612, 35rabeqbidv 3424 . . . 4 (𝑤 = 𝑊 → {𝑓 ∈ ((Base‘(Scalar‘𝑤)) ↑m (Base‘𝑤)) ∣ ∀𝑟 ∈ (Base‘(Scalar‘𝑤))∀𝑥 ∈ (Base‘𝑤)∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦))} = {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))})
37 df-lfl 37520 . . . 4 LFnl = (𝑤 ∈ V ↦ {𝑓 ∈ ((Base‘(Scalar‘𝑤)) ↑m (Base‘𝑤)) ∣ ∀𝑟 ∈ (Base‘(Scalar‘𝑤))∀𝑥 ∈ (Base‘𝑤)∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦))})
38 ovex 7390 . . . . 5 (𝐾m 𝑉) ∈ V
3938rabex 5289 . . . 4 {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))} ∈ V
4036, 37, 39fvmpt 6948 . . 3 (𝑊 ∈ V → (LFnl‘𝑊) = {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))})
412, 40eqtrid 2788 . 2 (𝑊 ∈ V → 𝐹 = {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))})
421, 41syl 17 1 (𝑊𝑋𝐹 = {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))})
Colors of variables: wff setvar class
Syntax hints:  wi 4   = wceq 1541  wcel 2106  wral 3064  {crab 3407  Vcvv 3445  cfv 6496  (class class class)co 7357  m cmap 8765  Basecbs 17083  +gcplusg 17133  .rcmulr 17134  Scalarcsca 17136   ·𝑠 cvsca 17137  LFnlclfn 37519
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-sep 5256  ax-nul 5263  ax-pr 5384
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2889  df-ne 2944  df-ral 3065  df-rex 3074  df-rab 3408  df-v 3447  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-nul 4283  df-if 4487  df-sn 4587  df-pr 4589  df-op 4593  df-uni 4866  df-br 5106  df-opab 5168  df-mpt 5189  df-id 5531  df-xp 5639  df-rel 5640  df-cnv 5641  df-co 5642  df-dm 5643  df-iota 6448  df-fun 6498  df-fv 6504  df-ov 7360  df-lfl 37520
This theorem is referenced by:  islfl  37522
  Copyright terms: Public domain W3C validator