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 38520
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 3488 . 2 (𝑊𝑋𝑊 ∈ V)
2 lflset.f . . 3 𝐹 = (LFnl‘𝑊)
3 fveq2 6891 . . . . . . . . 9 (𝑤 = 𝑊 → (Scalar‘𝑤) = (Scalar‘𝑊))
4 lflset.d . . . . . . . . 9 𝐷 = (Scalar‘𝑊)
53, 4eqtr4di 2785 . . . . . . . 8 (𝑤 = 𝑊 → (Scalar‘𝑤) = 𝐷)
65fveq2d 6895 . . . . . . 7 (𝑤 = 𝑊 → (Base‘(Scalar‘𝑤)) = (Base‘𝐷))
7 lflset.k . . . . . . 7 𝐾 = (Base‘𝐷)
86, 7eqtr4di 2785 . . . . . 6 (𝑤 = 𝑊 → (Base‘(Scalar‘𝑤)) = 𝐾)
9 fveq2 6891 . . . . . . 7 (𝑤 = 𝑊 → (Base‘𝑤) = (Base‘𝑊))
10 lflset.v . . . . . . 7 𝑉 = (Base‘𝑊)
119, 10eqtr4di 2785 . . . . . 6 (𝑤 = 𝑊 → (Base‘𝑤) = 𝑉)
128, 11oveq12d 7432 . . . . 5 (𝑤 = 𝑊 → ((Base‘(Scalar‘𝑤)) ↑m (Base‘𝑤)) = (𝐾m 𝑉))
13 fveq2 6891 . . . . . . . . . . . 12 (𝑤 = 𝑊 → (+g𝑤) = (+g𝑊))
14 lflset.a . . . . . . . . . . . 12 + = (+g𝑊)
1513, 14eqtr4di 2785 . . . . . . . . . . 11 (𝑤 = 𝑊 → (+g𝑤) = + )
16 fveq2 6891 . . . . . . . . . . . . 13 (𝑤 = 𝑊 → ( ·𝑠𝑤) = ( ·𝑠𝑊))
17 lflset.s . . . . . . . . . . . . 13 · = ( ·𝑠𝑊)
1816, 17eqtr4di 2785 . . . . . . . . . . . 12 (𝑤 = 𝑊 → ( ·𝑠𝑤) = · )
1918oveqd 7431 . . . . . . . . . . 11 (𝑤 = 𝑊 → (𝑟( ·𝑠𝑤)𝑥) = (𝑟 · 𝑥))
20 eqidd 2728 . . . . . . . . . . 11 (𝑤 = 𝑊𝑦 = 𝑦)
2115, 19, 20oveq123d 7435 . . . . . . . . . 10 (𝑤 = 𝑊 → ((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦) = ((𝑟 · 𝑥) + 𝑦))
2221fveq2d 6895 . . . . . . . . 9 (𝑤 = 𝑊 → (𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = (𝑓‘((𝑟 · 𝑥) + 𝑦)))
235fveq2d 6895 . . . . . . . . . . 11 (𝑤 = 𝑊 → (+g‘(Scalar‘𝑤)) = (+g𝐷))
24 lflset.p . . . . . . . . . . 11 = (+g𝐷)
2523, 24eqtr4di 2785 . . . . . . . . . 10 (𝑤 = 𝑊 → (+g‘(Scalar‘𝑤)) = )
265fveq2d 6895 . . . . . . . . . . . 12 (𝑤 = 𝑊 → (.r‘(Scalar‘𝑤)) = (.r𝐷))
27 lflset.t . . . . . . . . . . . 12 × = (.r𝐷)
2826, 27eqtr4di 2785 . . . . . . . . . . 11 (𝑤 = 𝑊 → (.r‘(Scalar‘𝑤)) = × )
2928oveqd 7431 . . . . . . . . . 10 (𝑤 = 𝑊 → (𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥)) = (𝑟 × (𝑓𝑥)))
30 eqidd 2728 . . . . . . . . . 10 (𝑤 = 𝑊 → (𝑓𝑦) = (𝑓𝑦))
3125, 29, 30oveq123d 7435 . . . . . . . . 9 (𝑤 = 𝑊 → ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦)))
3222, 31eqeq12d 2743 . . . . . . . 8 (𝑤 = 𝑊 → ((𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) ↔ (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))))
3311, 32raleqbidv 3337 . . . . . . 7 (𝑤 = 𝑊 → (∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) ↔ ∀𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))))
3411, 33raleqbidv 3337 . . . . . 6 (𝑤 = 𝑊 → (∀𝑥 ∈ (Base‘𝑤)∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) ↔ ∀𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))))
358, 34raleqbidv 3337 . . . . 5 (𝑤 = 𝑊 → (∀𝑟 ∈ (Base‘(Scalar‘𝑤))∀𝑥 ∈ (Base‘𝑤)∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦)) ↔ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))))
3612, 35rabeqbidv 3444 . . . 4 (𝑤 = 𝑊 → {𝑓 ∈ ((Base‘(Scalar‘𝑤)) ↑m (Base‘𝑤)) ∣ ∀𝑟 ∈ (Base‘(Scalar‘𝑤))∀𝑥 ∈ (Base‘𝑤)∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦))} = {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))})
37 df-lfl 38519 . . . 4 LFnl = (𝑤 ∈ V ↦ {𝑓 ∈ ((Base‘(Scalar‘𝑤)) ↑m (Base‘𝑤)) ∣ ∀𝑟 ∈ (Base‘(Scalar‘𝑤))∀𝑥 ∈ (Base‘𝑤)∀𝑦 ∈ (Base‘𝑤)(𝑓‘((𝑟( ·𝑠𝑤)𝑥)(+g𝑤)𝑦)) = ((𝑟(.r‘(Scalar‘𝑤))(𝑓𝑥))(+g‘(Scalar‘𝑤))(𝑓𝑦))})
38 ovex 7447 . . . . 5 (𝐾m 𝑉) ∈ V
3938rabex 5328 . . . 4 {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))} ∈ V
4036, 37, 39fvmpt 6999 . . 3 (𝑊 ∈ V → (LFnl‘𝑊) = {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))})
412, 40eqtrid 2779 . 2 (𝑊 ∈ V → 𝐹 = {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))})
421, 41syl 17 1 (𝑊𝑋𝐹 = {𝑓 ∈ (𝐾m 𝑉) ∣ ∀𝑟𝐾𝑥𝑉𝑦𝑉 (𝑓‘((𝑟 · 𝑥) + 𝑦)) = ((𝑟 × (𝑓𝑥)) (𝑓𝑦))})
Colors of variables: wff setvar class
Syntax hints:  wi 4   = wceq 1534  wcel 2099  wral 3056  {crab 3427  Vcvv 3469  cfv 6542  (class class class)co 7414  m cmap 8838  Basecbs 17173  +gcplusg 17226  .rcmulr 17227  Scalarcsca 17229   ·𝑠 cvsca 17230  LFnlclfn 38518
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2164  ax-ext 2698  ax-sep 5293  ax-nul 5300  ax-pr 5423
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2529  df-eu 2558  df-clab 2705  df-cleq 2719  df-clel 2805  df-nfc 2880  df-ne 2936  df-ral 3057  df-rex 3066  df-rab 3428  df-v 3471  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-nul 4319  df-if 4525  df-sn 4625  df-pr 4627  df-op 4631  df-uni 4904  df-br 5143  df-opab 5205  df-mpt 5226  df-id 5570  df-xp 5678  df-rel 5679  df-cnv 5680  df-co 5681  df-dm 5682  df-iota 6494  df-fun 6544  df-fv 6550  df-ov 7417  df-lfl 38519
This theorem is referenced by:  islfl  38521
  Copyright terms: Public domain W3C validator