Users' Mathboxes Mathbox for Jiamin Zhao < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  veroquadmodzerod Structured version   Visualization version   GIF version

Theorem veroquadmodzerod 50882
Description: The columns of the Veronese matrix, weighted by the coefficients 𝐾, sum to the zero vector of fld freeLMod (1...6). (Contributed by Jiamin Zhao, 19-Aug-2026.)
Hypotheses
Ref Expression
veroquad.a 𝑉 = (𝑖 ∈ (1...6), 𝑗 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑗))
veroquad.f (𝜑𝐴:(1...6)⟶(ℝ ↑m (1...3)))
veroquad.k (𝜑𝐾:(1...6)⟶ℝ)
veroquad.q ((𝜑𝑖 ∈ (1...6)) → (((((𝐾‘1) · (((𝐴𝑖)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑖)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑖)‘3)↑2))) + ((((𝐾‘4) · (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2))) + ((𝐾‘5) · (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3)))) + ((𝐾‘6) · (((𝐴𝑖)‘3) · ((𝐴𝑖)‘1))))) = 0)
Assertion
Ref Expression
veroquadmodzerod (𝜑 → ((ℝfld freeLMod (1...6)) Σg (𝐾f ( ·𝑠 ‘(ℝfld freeLMod (1...6)))curry tpos 𝑉)) = (0g‘(ℝfld freeLMod (1...6))))
Distinct variable groups:   𝐴,𝑖,𝑗   𝑖,𝑉,𝑗   𝜑,𝑖   𝑖,𝐾
Allowed substitution hints:   𝜑(𝑗)   𝐾(𝑗)

Proof of Theorem veroquadmodzerod
Dummy variables 𝑛 𝑚 𝑢 𝑣 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 veroquad.k . . . . . . 7 (𝜑𝐾:(1...6)⟶ℝ)
21ffnd 6706 . . . . . 6 (𝜑𝐾 Fn (1...6))
3 veroquad.a . . . . . . . . . . . 12 𝑉 = (𝑖 ∈ (1...6), 𝑗 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑗))
4 2fveq3 6886 . . . . . . . . . . . . . 14 (𝑖 = 𝑢 → (veronese‘(𝐴𝑖)) = (veronese‘(𝐴𝑢)))
54fveq1d 6883 . . . . . . . . . . . . 13 (𝑖 = 𝑢 → ((veronese‘(𝐴𝑖))‘𝑗) = ((veronese‘(𝐴𝑢))‘𝑗))
6 fveq2 6881 . . . . . . . . . . . . 13 (𝑗 = 𝑣 → ((veronese‘(𝐴𝑢))‘𝑗) = ((veronese‘(𝐴𝑢))‘𝑣))
75, 6cbvmpov 7511 . . . . . . . . . . . 12 (𝑖 ∈ (1...6), 𝑗 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑗)) = (𝑢 ∈ (1...6), 𝑣 ∈ (1...6) ↦ ((veronese‘(𝐴𝑢))‘𝑣))
83, 7eqtri 2783 . . . . . . . . . . 11 𝑉 = (𝑢 ∈ (1...6), 𝑣 ∈ (1...6) ↦ ((veronese‘(𝐴𝑢))‘𝑣))
98tposmpo 8266 . . . . . . . . . 10 tpos 𝑉 = (𝑣 ∈ (1...6), 𝑢 ∈ (1...6) ↦ ((veronese‘(𝐴𝑢))‘𝑣))
109a1i 11 . . . . . . . . 9 (𝜑 → tpos 𝑉 = (𝑣 ∈ (1...6), 𝑢 ∈ (1...6) ↦ ((veronese‘(𝐴𝑢))‘𝑣)))
11 veroquad.f . . . . . . . . . . . 12 (𝜑𝐴:(1...6)⟶(ℝ ↑m (1...3)))
1211adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ (𝑣 ∈ (1...6) ∧ 𝑢 ∈ (1...6))) → 𝐴:(1...6)⟶(ℝ ↑m (1...3)))
13 simprr 785 . . . . . . . . . . 11 ((𝜑 ∧ (𝑣 ∈ (1...6) ∧ 𝑢 ∈ (1...6))) → 𝑢 ∈ (1...6))
1412, 13ffvelcdmd 7081 . . . . . . . . . 10 ((𝜑 ∧ (𝑣 ∈ (1...6) ∧ 𝑢 ∈ (1...6))) → (𝐴𝑢) ∈ (ℝ ↑m (1...3)))
15 simprl 783 . . . . . . . . . 10 ((𝜑 ∧ (𝑣 ∈ (1...6) ∧ 𝑢 ∈ (1...6))) → 𝑣 ∈ (1...6))
16 veronesefvcl 50870 . . . . . . . . . 10 (((𝐴𝑢) ∈ (ℝ ↑m (1...3)) ∧ 𝑣 ∈ (1...6)) → ((veronese‘(𝐴𝑢))‘𝑣) ∈ ℝ)
1714, 15, 16syl2anc 596 . . . . . . . . 9 ((𝜑 ∧ (𝑣 ∈ (1...6) ∧ 𝑢 ∈ (1...6))) → ((veronese‘(𝐴𝑢))‘𝑣) ∈ ℝ)
1810, 17fmpod 8075 . . . . . . . 8 (𝜑 → tpos 𝑉:((1...6) × (1...6))⟶ℝ)
19 ovex 7449 . . . . . . . . . 10 (1...6) ∈ V
20 1nn 12293 . . . . . . . . . . . 12 1 ∈ ℕ
21 6nn 12379 . . . . . . . . . . . 12 6 ∈ ℕ
22 1re 11257 . . . . . . . . . . . . 13 1 ∈ ℝ
23 6re 12380 . . . . . . . . . . . . 13 6 ∈ ℝ
24 1lt6 12477 . . . . . . . . . . . . 13 1 < 6
2522, 23, 24ltleii 11382 . . . . . . . . . . . 12 1 ≤ 6
26 elfz1b 13673 . . . . . . . . . . . 12 (1 ∈ (1...6) ↔ (1 ∈ ℕ ∧ 6 ∈ ℕ ∧ 1 ≤ 6))
2720, 21, 25, 26mpbir3an 1360 . . . . . . . . . . 11 1 ∈ (1...6)
2827ne0ii 4290 . . . . . . . . . 10 (1...6) ≠ ∅
29 eldifsn 4748 . . . . . . . . . 10 ((1...6) ∈ (V ∖ {∅}) ↔ ((1...6) ∈ V ∧ (1...6) ≠ ∅))
3019, 28, 29mpbir2an 724 . . . . . . . . 9 (1...6) ∈ (V ∖ {∅})
3130a1i 11 . . . . . . . 8 (𝜑 → (1...6) ∈ (V ∖ {∅}))
32 reex 11240 . . . . . . . . 9 ℝ ∈ V
3332a1i 11 . . . . . . . 8 (𝜑 → ℝ ∈ V)
34 curf 8876 . . . . . . . 8 ((tpos 𝑉:((1...6) × (1...6))⟶ℝ ∧ (1...6) ∈ (V ∖ {∅}) ∧ ℝ ∈ V) → curry tpos 𝑉:(1...6)⟶(ℝ ↑m (1...6)))
3518, 31, 33, 34syl3anc 1398 . . . . . . 7 (𝜑 → curry tpos 𝑉:(1...6)⟶(ℝ ↑m (1...6)))
3635ffnd 6706 . . . . . 6 (𝜑 → curry tpos 𝑉 Fn (1...6))
3719a1i 11 . . . . . 6 (𝜑 → (1...6) ∈ V)
38 inidm 4172 . . . . . 6 ((1...6) ∩ (1...6)) = (1...6)
39 eqidd 2761 . . . . . 6 ((𝜑𝑛 ∈ (1...6)) → (𝐾𝑛) = (𝐾𝑛))
4017ralrimivva 3205 . . . . . . . . . 10 (𝜑 → ∀𝑣 ∈ (1...6)∀𝑢 ∈ (1...6)((veronese‘(𝐴𝑢))‘𝑣) ∈ ℝ)
4140adantr 486 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...6)) → ∀𝑣 ∈ (1...6)∀𝑢 ∈ (1...6)((veronese‘(𝐴𝑢))‘𝑣) ∈ ℝ)
4228a1i 11 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...6)) → (1...6) ≠ ∅)
4319a1i 11 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...6)) → (1...6) ∈ V)
44 simpr 490 . . . . . . . . 9 ((𝜑𝑛 ∈ (1...6)) → 𝑛 ∈ (1...6))
459, 41, 42, 43, 44mpocurryvald 8273 . . . . . . . 8 ((𝜑𝑛 ∈ (1...6)) → (curry tpos 𝑉𝑛) = (𝑢 ∈ (1...6) ↦ 𝑛 / 𝑣((veronese‘(𝐴𝑢))‘𝑣)))
46 csbfv 6928 . . . . . . . . 9 𝑛 / 𝑣((veronese‘(𝐴𝑢))‘𝑣) = ((veronese‘(𝐴𝑢))‘𝑛)
4746mpteq2i 5201 . . . . . . . 8 (𝑢 ∈ (1...6) ↦ 𝑛 / 𝑣((veronese‘(𝐴𝑢))‘𝑣)) = (𝑢 ∈ (1...6) ↦ ((veronese‘(𝐴𝑢))‘𝑛))
4845, 47eqtrdi 2811 . . . . . . 7 ((𝜑𝑛 ∈ (1...6)) → (curry tpos 𝑉𝑛) = (𝑢 ∈ (1...6) ↦ ((veronese‘(𝐴𝑢))‘𝑛)))
49 2fveq3 6886 . . . . . . . . 9 (𝑢 = 𝑖 → (veronese‘(𝐴𝑢)) = (veronese‘(𝐴𝑖)))
5049fveq1d 6883 . . . . . . . 8 (𝑢 = 𝑖 → ((veronese‘(𝐴𝑢))‘𝑛) = ((veronese‘(𝐴𝑖))‘𝑛))
5150cbvmptv 5209 . . . . . . 7 (𝑢 ∈ (1...6) ↦ ((veronese‘(𝐴𝑢))‘𝑛)) = (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛))
5248, 51eqtrdi 2811 . . . . . 6 ((𝜑𝑛 ∈ (1...6)) → (curry tpos 𝑉𝑛) = (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛)))
532, 36, 37, 37, 38, 39, 52offval 7693 . . . . 5 (𝜑 → (𝐾f ( ·𝑠 ‘(ℝfld freeLMod (1...6)))curry tpos 𝑉) = (𝑛 ∈ (1...6) ↦ ((𝐾𝑛)( ·𝑠 ‘(ℝfld freeLMod (1...6)))(𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛)))))
54 eqid 2760 . . . . . . 7 (ℝfld freeLMod (1...6)) = (ℝfld freeLMod (1...6))
55 eqid 2760 . . . . . . 7 (Base‘(ℝfld freeLMod (1...6))) = (Base‘(ℝfld freeLMod (1...6)))
56 rebase 21851 . . . . . . 7 ℝ = (Base‘ℝfld)
571ffvelcdmda 7080 . . . . . . 7 ((𝜑𝑛 ∈ (1...6)) → (𝐾𝑛) ∈ ℝ)
58 refld 21864 . . . . . . . . . . . . 13 fld ∈ Field
5958elexi 3472 . . . . . . . . . . . 12 fld ∈ V
60 fzfi 14061 . . . . . . . . . . . 12 (1...6) ∈ Fin
6154, 56frlmfibas 22007 . . . . . . . . . . . 12 ((ℝfld ∈ V ∧ (1...6) ∈ Fin) → (ℝ ↑m (1...6)) = (Base‘(ℝfld freeLMod (1...6))))
6259, 60, 61mp2an 705 . . . . . . . . . . 11 (ℝ ↑m (1...6)) = (Base‘(ℝfld freeLMod (1...6)))
6362a1i 11 . . . . . . . . . 10 (𝜑 → (ℝ ↑m (1...6)) = (Base‘(ℝfld freeLMod (1...6))))
6463, 35feq3dd 6692 . . . . . . . . 9 (𝜑 → curry tpos 𝑉:(1...6)⟶(Base‘(ℝfld freeLMod (1...6))))
6564ffvelcdmda 7080 . . . . . . . 8 ((𝜑𝑛 ∈ (1...6)) → (curry tpos 𝑉𝑛) ∈ (Base‘(ℝfld freeLMod (1...6))))
6652, 65eqeltrrd 2861 . . . . . . 7 ((𝜑𝑛 ∈ (1...6)) → (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛)) ∈ (Base‘(ℝfld freeLMod (1...6))))
67 eqid 2760 . . . . . . 7 ( ·𝑠 ‘(ℝfld freeLMod (1...6))) = ( ·𝑠 ‘(ℝfld freeLMod (1...6)))
68 remulr 21856 . . . . . . 7 · = (.r‘ℝfld)
6954, 55, 56, 43, 57, 66, 67, 68frlmvscafval 22011 . . . . . 6 ((𝜑𝑛 ∈ (1...6)) → ((𝐾𝑛)( ·𝑠 ‘(ℝfld freeLMod (1...6)))(𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛))) = (((1...6) × {(𝐾𝑛)}) ∘f · (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛))))
7069mpteq2dva 5198 . . . . 5 (𝜑 → (𝑛 ∈ (1...6) ↦ ((𝐾𝑛)( ·𝑠 ‘(ℝfld freeLMod (1...6)))(𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛)))) = (𝑛 ∈ (1...6) ↦ (((1...6) × {(𝐾𝑛)}) ∘f · (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛)))))
71 fvexd 6896 . . . . . . . 8 ((𝜑𝑛 ∈ (1...6)) → (𝐾𝑛) ∈ V)
72 fnconstg 6766 . . . . . . . 8 ((𝐾𝑛) ∈ V → ((1...6) × {(𝐾𝑛)}) Fn (1...6))
7371, 72syl 18 . . . . . . 7 ((𝜑𝑛 ∈ (1...6)) → ((1...6) × {(𝐾𝑛)}) Fn (1...6))
74 fvex 6894 . . . . . . . . 9 ((veronese‘(𝐴𝑖))‘𝑛) ∈ V
75 eqid 2760 . . . . . . . . 9 (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛)) = (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛))
7674, 75fnmpti 6678 . . . . . . . 8 (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛)) Fn (1...6)
7776a1i 11 . . . . . . 7 ((𝜑𝑛 ∈ (1...6)) → (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛)) Fn (1...6))
78 simpr 490 . . . . . . . 8 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → 𝑚 ∈ (1...6))
79 fvex 6894 . . . . . . . . 9 (𝐾𝑛) ∈ V
8079fvconst2 7206 . . . . . . . 8 (𝑚 ∈ (1...6) → (((1...6) × {(𝐾𝑛)})‘𝑚) = (𝐾𝑛))
8178, 80syl 18 . . . . . . 7 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → (((1...6) × {(𝐾𝑛)})‘𝑚) = (𝐾𝑛))
82 2fveq3 6886 . . . . . . . . . 10 (𝑖 = 𝑚 → (veronese‘(𝐴𝑖)) = (veronese‘(𝐴𝑚)))
8382fveq1d 6883 . . . . . . . . 9 (𝑖 = 𝑚 → ((veronese‘(𝐴𝑖))‘𝑛) = ((veronese‘(𝐴𝑚))‘𝑛))
84 simpr 490 . . . . . . . . 9 ((𝜑𝑚 ∈ (1...6)) → 𝑚 ∈ (1...6))
85 fvexd 6896 . . . . . . . . 9 ((𝜑𝑚 ∈ (1...6)) → ((veronese‘(𝐴𝑚))‘𝑛) ∈ V)
8675, 83, 84, 85fvmptd3 7013 . . . . . . . 8 ((𝜑𝑚 ∈ (1...6)) → ((𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛))‘𝑚) = ((veronese‘(𝐴𝑚))‘𝑛))
8786adantlr 728 . . . . . . 7 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → ((𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛))‘𝑚) = ((veronese‘(𝐴𝑚))‘𝑛))
8873, 77, 43, 43, 38, 81, 87offval 7693 . . . . . 6 ((𝜑𝑛 ∈ (1...6)) → (((1...6) × {(𝐾𝑛)}) ∘f · (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛))) = (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))))
8988mpteq2dva 5198 . . . . 5 (𝜑 → (𝑛 ∈ (1...6) ↦ (((1...6) × {(𝐾𝑛)}) ∘f · (𝑖 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑛)))) = (𝑛 ∈ (1...6) ↦ (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛)))))
9053, 70, 893eqtrd 2799 . . . 4 (𝜑 → (𝐾f ( ·𝑠 ‘(ℝfld freeLMod (1...6)))curry tpos 𝑉) = (𝑛 ∈ (1...6) ↦ (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛)))))
9190oveq2d 7432 . . 3 (𝜑 → ((ℝfld freeLMod (1...6)) Σg (𝐾f ( ·𝑠 ‘(ℝfld freeLMod (1...6)))curry tpos 𝑉)) = ((ℝfld freeLMod (1...6)) Σg (𝑛 ∈ (1...6) ↦ (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))))))
92 eqid 2760 . . . 4 (0g‘(ℝfld freeLMod (1...6))) = (0g‘(ℝfld freeLMod (1...6)))
93 isfld 20932 . . . . . . . 8 (ℝfld ∈ Field ↔ (ℝfld ∈ DivRing ∧ ℝfld ∈ CRing))
9458, 93mpbi 233 . . . . . . 7 (ℝfld ∈ DivRing ∧ ℝfld ∈ CRing)
9594simpli 489 . . . . . 6 fld ∈ DivRing
96 drngring 20926 . . . . . 6 (ℝfld ∈ DivRing → ℝfld ∈ Ring)
9795, 96ax-mp 5 . . . . 5 fld ∈ Ring
9897a1i 11 . . . 4 (𝜑 → ℝfld ∈ Ring)
9957adantr 486 . . . . . . 7 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → (𝐾𝑛) ∈ ℝ)
100 simpll 779 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → 𝜑)
101100, 11syl 18 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → 𝐴:(1...6)⟶(ℝ ↑m (1...3)))
102101, 78ffvelcdmd 7081 . . . . . . . 8 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → (𝐴𝑚) ∈ (ℝ ↑m (1...3)))
103 simplr 781 . . . . . . . 8 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → 𝑛 ∈ (1...6))
104 veronesefvcl 50870 . . . . . . . 8 (((𝐴𝑚) ∈ (ℝ ↑m (1...3)) ∧ 𝑛 ∈ (1...6)) → ((veronese‘(𝐴𝑚))‘𝑛) ∈ ℝ)
105102, 103, 104syl2anc 596 . . . . . . 7 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → ((veronese‘(𝐴𝑚))‘𝑛) ∈ ℝ)
10699, 105remulcld 11288 . . . . . 6 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛)) ∈ ℝ)
107106fmpttd 7111 . . . . 5 ((𝜑𝑛 ∈ (1...6)) → (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))):(1...6)⟶ℝ)
10832, 19elmap 8885 . . . . 5 ((𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))) ∈ (ℝ ↑m (1...6)) ↔ (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))):(1...6)⟶ℝ)
109107, 108sylibr 237 . . . 4 ((𝜑𝑛 ∈ (1...6)) → (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))) ∈ (ℝ ↑m (1...6)))
110 eqid 2760 . . . . 5 (𝑛 ∈ (1...6) ↦ (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛)))) = (𝑛 ∈ (1...6) ↦ (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))))
11160a1i 11 . . . . 5 (𝜑 → (1...6) ∈ Fin)
112 fvexd 6896 . . . . 5 (𝜑 → (0g‘(ℝfld freeLMod (1...6))) ∈ V)
113110, 111, 109, 112fsuppmptdm 9353 . . . 4 (𝜑 → (𝑛 ∈ (1...6) ↦ (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛)))) finSupp (0g‘(ℝfld freeLMod (1...6))))
11454, 62, 92, 37, 37, 98, 109, 113frlmgsum 22017 . . 3 (𝜑 → ((ℝfld freeLMod (1...6)) Σg (𝑛 ∈ (1...6) ↦ (𝑚 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))))) = (𝑚 ∈ (1...6) ↦ (ℝfld Σg (𝑛 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))))))
1153, 11veronesematrowd 50879 . . . . . . . . . . . . 13 (𝜑 → curry 𝑉 = (𝑖 ∈ (1...6) ↦ (veronese‘(𝐴𝑖))))
116100, 115syl 18 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → curry 𝑉 = (𝑖 ∈ (1...6) ↦ (veronese‘(𝐴𝑖))))
117 fvexd 6896 . . . . . . . . . . . 12 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → (veronese‘(𝐴𝑚)) ∈ V)
11882, 116, 78, 117fvmptd4 7014 . . . . . . . . . . 11 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → (curry 𝑉𝑚) = (veronese‘(𝐴𝑚)))
119118fveq1d 6883 . . . . . . . . . 10 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → ((curry 𝑉𝑚)‘𝑛) = ((veronese‘(𝐴𝑚))‘𝑛))
120119eqcomd 2766 . . . . . . . . 9 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → ((veronese‘(𝐴𝑚))‘𝑛) = ((curry 𝑉𝑚)‘𝑛))
121120oveq2d 7432 . . . . . . . 8 (((𝜑𝑛 ∈ (1...6)) ∧ 𝑚 ∈ (1...6)) → ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛)) = ((𝐾𝑛) · ((curry 𝑉𝑚)‘𝑛)))
122121an32s 665 . . . . . . 7 (((𝜑𝑚 ∈ (1...6)) ∧ 𝑛 ∈ (1...6)) → ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛)) = ((𝐾𝑛) · ((curry 𝑉𝑚)‘𝑛)))
123122mpteq2dva 5198 . . . . . 6 ((𝜑𝑚 ∈ (1...6)) → (𝑛 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))) = (𝑛 ∈ (1...6) ↦ ((𝐾𝑛) · ((curry 𝑉𝑚)‘𝑛))))
124123oveq2d 7432 . . . . 5 ((𝜑𝑚 ∈ (1...6)) → (ℝfld Σg (𝑛 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛)))) = (ℝfld Σg (𝑛 ∈ (1...6) ↦ ((𝐾𝑛) · ((curry 𝑉𝑚)‘𝑛)))))
12582fveq1d 6883 . . . . . . . 8 (𝑖 = 𝑚 → ((veronese‘(𝐴𝑖))‘𝑗) = ((veronese‘(𝐴𝑚))‘𝑗))
126 fveq2 6881 . . . . . . . 8 (𝑗 = 𝑛 → ((veronese‘(𝐴𝑚))‘𝑗) = ((veronese‘(𝐴𝑚))‘𝑛))
127125, 126cbvmpov 7511 . . . . . . 7 (𝑖 ∈ (1...6), 𝑗 ∈ (1...6) ↦ ((veronese‘(𝐴𝑖))‘𝑗)) = (𝑚 ∈ (1...6), 𝑛 ∈ (1...6) ↦ ((veronese‘(𝐴𝑚))‘𝑛))
1283, 127eqtri 2783 . . . . . 6 𝑉 = (𝑚 ∈ (1...6), 𝑛 ∈ (1...6) ↦ ((veronese‘(𝐴𝑚))‘𝑛))
129 fveq2 6881 . . . . . . . . . . . . . 14 (𝑖 = 𝑚 → (𝐴𝑖) = (𝐴𝑚))
130129fveq1d 6883 . . . . . . . . . . . . 13 (𝑖 = 𝑚 → ((𝐴𝑖)‘1) = ((𝐴𝑚)‘1))
131130oveq1d 7431 . . . . . . . . . . . 12 (𝑖 = 𝑚 → (((𝐴𝑖)‘1)↑2) = (((𝐴𝑚)‘1)↑2))
132131oveq2d 7432 . . . . . . . . . . 11 (𝑖 = 𝑚 → ((𝐾‘1) · (((𝐴𝑖)‘1)↑2)) = ((𝐾‘1) · (((𝐴𝑚)‘1)↑2)))
133129fveq1d 6883 . . . . . . . . . . . . 13 (𝑖 = 𝑚 → ((𝐴𝑖)‘2) = ((𝐴𝑚)‘2))
134133oveq1d 7431 . . . . . . . . . . . 12 (𝑖 = 𝑚 → (((𝐴𝑖)‘2)↑2) = (((𝐴𝑚)‘2)↑2))
135134oveq2d 7432 . . . . . . . . . . 11 (𝑖 = 𝑚 → ((𝐾‘2) · (((𝐴𝑖)‘2)↑2)) = ((𝐾‘2) · (((𝐴𝑚)‘2)↑2)))
136132, 135oveq12d 7434 . . . . . . . . . 10 (𝑖 = 𝑚 → (((𝐾‘1) · (((𝐴𝑖)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑖)‘2)↑2))) = (((𝐾‘1) · (((𝐴𝑚)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑚)‘2)↑2))))
137129fveq1d 6883 . . . . . . . . . . . 12 (𝑖 = 𝑚 → ((𝐴𝑖)‘3) = ((𝐴𝑚)‘3))
138137oveq1d 7431 . . . . . . . . . . 11 (𝑖 = 𝑚 → (((𝐴𝑖)‘3)↑2) = (((𝐴𝑚)‘3)↑2))
139138oveq2d 7432 . . . . . . . . . 10 (𝑖 = 𝑚 → ((𝐾‘3) · (((𝐴𝑖)‘3)↑2)) = ((𝐾‘3) · (((𝐴𝑚)‘3)↑2)))
140136, 139oveq12d 7434 . . . . . . . . 9 (𝑖 = 𝑚 → ((((𝐾‘1) · (((𝐴𝑖)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑖)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑖)‘3)↑2))) = ((((𝐾‘1) · (((𝐴𝑚)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑚)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑚)‘3)↑2))))
141130, 133oveq12d 7434 . . . . . . . . . . . 12 (𝑖 = 𝑚 → (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2)) = (((𝐴𝑚)‘1) · ((𝐴𝑚)‘2)))
142141oveq2d 7432 . . . . . . . . . . 11 (𝑖 = 𝑚 → ((𝐾‘4) · (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2))) = ((𝐾‘4) · (((𝐴𝑚)‘1) · ((𝐴𝑚)‘2))))
143133, 137oveq12d 7434 . . . . . . . . . . . 12 (𝑖 = 𝑚 → (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3)) = (((𝐴𝑚)‘2) · ((𝐴𝑚)‘3)))
144143oveq2d 7432 . . . . . . . . . . 11 (𝑖 = 𝑚 → ((𝐾‘5) · (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3))) = ((𝐾‘5) · (((𝐴𝑚)‘2) · ((𝐴𝑚)‘3))))
145142, 144oveq12d 7434 . . . . . . . . . 10 (𝑖 = 𝑚 → (((𝐾‘4) · (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2))) + ((𝐾‘5) · (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3)))) = (((𝐾‘4) · (((𝐴𝑚)‘1) · ((𝐴𝑚)‘2))) + ((𝐾‘5) · (((𝐴𝑚)‘2) · ((𝐴𝑚)‘3)))))
146137, 130oveq12d 7434 . . . . . . . . . . 11 (𝑖 = 𝑚 → (((𝐴𝑖)‘3) · ((𝐴𝑖)‘1)) = (((𝐴𝑚)‘3) · ((𝐴𝑚)‘1)))
147146oveq2d 7432 . . . . . . . . . 10 (𝑖 = 𝑚 → ((𝐾‘6) · (((𝐴𝑖)‘3) · ((𝐴𝑖)‘1))) = ((𝐾‘6) · (((𝐴𝑚)‘3) · ((𝐴𝑚)‘1))))
148145, 147oveq12d 7434 . . . . . . . . 9 (𝑖 = 𝑚 → ((((𝐾‘4) · (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2))) + ((𝐾‘5) · (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3)))) + ((𝐾‘6) · (((𝐴𝑖)‘3) · ((𝐴𝑖)‘1)))) = ((((𝐾‘4) · (((𝐴𝑚)‘1) · ((𝐴𝑚)‘2))) + ((𝐾‘5) · (((𝐴𝑚)‘2) · ((𝐴𝑚)‘3)))) + ((𝐾‘6) · (((𝐴𝑚)‘3) · ((𝐴𝑚)‘1)))))
149140, 148oveq12d 7434 . . . . . . . 8 (𝑖 = 𝑚 → (((((𝐾‘1) · (((𝐴𝑖)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑖)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑖)‘3)↑2))) + ((((𝐾‘4) · (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2))) + ((𝐾‘5) · (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3)))) + ((𝐾‘6) · (((𝐴𝑖)‘3) · ((𝐴𝑖)‘1))))) = (((((𝐾‘1) · (((𝐴𝑚)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑚)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑚)‘3)↑2))) + ((((𝐾‘4) · (((𝐴𝑚)‘1) · ((𝐴𝑚)‘2))) + ((𝐾‘5) · (((𝐴𝑚)‘2) · ((𝐴𝑚)‘3)))) + ((𝐾‘6) · (((𝐴𝑚)‘3) · ((𝐴𝑚)‘1))))))
150149eqeq1d 2762 . . . . . . 7 (𝑖 = 𝑚 → ((((((𝐾‘1) · (((𝐴𝑖)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑖)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑖)‘3)↑2))) + ((((𝐾‘4) · (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2))) + ((𝐾‘5) · (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3)))) + ((𝐾‘6) · (((𝐴𝑖)‘3) · ((𝐴𝑖)‘1))))) = 0 ↔ (((((𝐾‘1) · (((𝐴𝑚)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑚)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑚)‘3)↑2))) + ((((𝐾‘4) · (((𝐴𝑚)‘1) · ((𝐴𝑚)‘2))) + ((𝐾‘5) · (((𝐴𝑚)‘2) · ((𝐴𝑚)‘3)))) + ((𝐾‘6) · (((𝐴𝑚)‘3) · ((𝐴𝑚)‘1))))) = 0))
151 veroquad.q . . . . . . . . 9 ((𝜑𝑖 ∈ (1...6)) → (((((𝐾‘1) · (((𝐴𝑖)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑖)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑖)‘3)↑2))) + ((((𝐾‘4) · (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2))) + ((𝐾‘5) · (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3)))) + ((𝐾‘6) · (((𝐴𝑖)‘3) · ((𝐴𝑖)‘1))))) = 0)
152151ralrimiva 3154 . . . . . . . 8 (𝜑 → ∀𝑖 ∈ (1...6)(((((𝐾‘1) · (((𝐴𝑖)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑖)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑖)‘3)↑2))) + ((((𝐾‘4) · (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2))) + ((𝐾‘5) · (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3)))) + ((𝐾‘6) · (((𝐴𝑖)‘3) · ((𝐴𝑖)‘1))))) = 0)
153152adantr 486 . . . . . . 7 ((𝜑𝑚 ∈ (1...6)) → ∀𝑖 ∈ (1...6)(((((𝐾‘1) · (((𝐴𝑖)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑖)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑖)‘3)↑2))) + ((((𝐾‘4) · (((𝐴𝑖)‘1) · ((𝐴𝑖)‘2))) + ((𝐾‘5) · (((𝐴𝑖)‘2) · ((𝐴𝑖)‘3)))) + ((𝐾‘6) · (((𝐴𝑖)‘3) · ((𝐴𝑖)‘1))))) = 0)
154150, 153, 84rspcdva 3577 . . . . . 6 ((𝜑𝑚 ∈ (1...6)) → (((((𝐾‘1) · (((𝐴𝑚)‘1)↑2)) + ((𝐾‘2) · (((𝐴𝑚)‘2)↑2))) + ((𝐾‘3) · (((𝐴𝑚)‘3)↑2))) + ((((𝐾‘4) · (((𝐴𝑚)‘1) · ((𝐴𝑚)‘2))) + ((𝐾‘5) · (((𝐴𝑚)‘2) · ((𝐴𝑚)‘3)))) + ((𝐾‘6) · (((𝐴𝑚)‘3) · ((𝐴𝑚)‘1))))) = 0)
155128, 11, 1, 154veroquadgsumlem 50881 . . . . 5 ((𝜑𝑚 ∈ (1...6)) → (ℝfld Σg (𝑛 ∈ (1...6) ↦ ((𝐾𝑛) · ((curry 𝑉𝑚)‘𝑛)))) = 0)
156124, 155eqtrd 2795 . . . 4 ((𝜑𝑚 ∈ (1...6)) → (ℝfld Σg (𝑛 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛)))) = 0)
157156mpteq2dva 5198 . . 3 (𝜑 → (𝑚 ∈ (1...6) ↦ (ℝfld Σg (𝑛 ∈ (1...6) ↦ ((𝐾𝑛) · ((veronese‘(𝐴𝑚))‘𝑛))))) = (𝑚 ∈ (1...6) ↦ 0))
15891, 114, 1573eqtrd 2799 . 2 (𝜑 → ((ℝfld freeLMod (1...6)) Σg (𝐾f ( ·𝑠 ‘(ℝfld freeLMod (1...6)))curry tpos 𝑉)) = (𝑚 ∈ (1...6) ↦ 0))
159 fconstmpt 5717 . . 3 ((1...6) × {0}) = (𝑚 ∈ (1...6) ↦ 0)
160 re0g 21857 . . . . 5 0 = (0g‘ℝfld)
16154, 160frlm0 21999 . . . 4 ((ℝfld ∈ Ring ∧ (1...6) ∈ V) → ((1...6) × {0}) = (0g‘(ℝfld freeLMod (1...6))))
16297, 19, 161mp2an 705 . . 3 ((1...6) × {0}) = (0g‘(ℝfld freeLMod (1...6)))
163159, 162eqtr3i 2785 . 2 (𝑚 ∈ (1...6) ↦ 0) = (0g‘(ℝfld freeLMod (1...6)))
164158, 163eqtrdi 2811 1 (𝜑 → ((ℝfld freeLMod (1...6)) Σg (𝐾f ( ·𝑠 ‘(ℝfld freeLMod (1...6)))curry tpos 𝑉)) = (0g‘(ℝfld freeLMod (1...6))))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wa 401   = wceq 1570  wcel 2145  wne 2955  wral 3076  Vcvv 3450  csb 3847  cdif 3896  c0 4279  {csn 4584   class class class wbr 5103  cmpt 5186   × cxp 5653   Fn wfn 6530  wf 6531  cfv 6535  (class class class)co 7416  cmpo 7418  f cof 7682  tpos ctpos 8228  curry ccur 8268  m cmap 8833  Fincfn 8959  cr 11148  0cc0 11149  1c1 11150   + caddc 11152   · cmul 11154  cle 11293  cn 12282  2c2 12344  3c3 12345  4c4 12346  5c5 12347  6c6 12348  ...cfz 13586  cexp 14150  Basecbs 17326   ·𝑠 cvsca 17371  0gc0g 17549   Σg cgsu 17550  Ringcrg 20398  CRingccrg 20399  DivRingcdr 20919  Fieldcfield 20920  fldcrefld 21849   freeLMod cfrlm 21991  veronesecveronese 50866
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 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pow 5330  ax-pr 5398  ax-un 7742  ax-cnex 11205  ax-resscn 11206  ax-1cn 11207  ax-icn 11208  ax-addcl 11209  ax-addrcl 11210  ax-mulcl 11211  ax-mulrcl 11212  ax-mulcom 11213  ax-addass 11214  ax-mulass 11215  ax-distr 11216  ax-i2m1 11217  ax-1ne0 11218  ax-1rid 11219  ax-rnegex 11220  ax-rrecex 11221  ax-cnre 11222  ax-pre-lttri 11223  ax-pre-lttrn 11224  ax-pre-ltadd 11225  ax-pre-mulgt0 11226  ax-addf 11228  ax-mulf 11229
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 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-se 5609  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6301  df-ord 6362  df-on 6363  df-lim 6364  df-suc 6365  df-iota 6491  df-fun 6537  df-fn 6538  df-f 6539  df-f1 6540  df-fo 6541  df-f1o 6542  df-fv 6543  df-isom 6544  df-riota 7373  df-ov 7419  df-oprab 7420  df-mpo 7421  df-of 7684  df-om 7869  df-1st 7992  df-2nd 7993  df-supp 8164  df-tpos 8229  df-cur 8270  df-frecs 8285  df-wrecs 8316  df-recs 8365  df-rdg 8404  df-1o 8462  df-er 8703  df-map 8835  df-ixp 8912  df-en 8960  df-dom 8961  df-sdom 8962  df-fin 8963  df-fsupp 9339  df-sup 9419  df-oi 9489  df-card 9969  df-pnf 11294  df-mnf 11295  df-xr 11296  df-ltxr 11297  df-le 11298  df-sub 11492  df-neg 11493  df-div 11921  df-nn 12283  df-2 12352  df-3 12353  df-4 12354  df-5 12355  df-6 12356  df-7 12357  df-8 12358  df-9 12359  df-n0 12554  df-z 12641  df-dec 12762  df-uz 12913  df-fz 13587  df-fzo 13735  df-seq 14091  df-exp 14151  df-hash 14420  df-struct 17264  df-sets 17281  df-slot 17299  df-ndx 17311  df-base 17327  df-ress 17348  df-plusg 17380  df-mulr 17381  df-starv 17382  df-sca 17383  df-vsca 17384  df-ip 17385  df-tset 17386  df-ple 17387  df-ds 17389  df-unif 17390  df-hom 17391  df-cco 17392  df-0g 17551  df-gsum 17552  df-prds 17557  df-pws 17559  df-mgm 18755  df-sgrp 18847  df-mnd 18863  df-mhm 18917  df-grp 19086  df-minusg 19087  df-sbg 19088  df-subg 19272  df-cntz 19470  df-cmn 19935  df-abl 19936  df-mgp 20300  df-rng 20314  df-ur 20347  df-ring 20400  df-cring 20401  df-oppr 20506  df-dvdsr 20526  df-unit 20527  df-invr 20557  df-dvr 20570  df-subrng 20737  df-subrg 20761  df-drng 20921  df-field 20922  df-lmod 21076  df-lss 21146  df-sra 21387  df-rgmod 21388  df-cnfld 21618  df-refld 21850  df-dsmm 21977  df-frlm 21992  df-veronese 50867
This theorem is used by:  veroquadnolindfd  50883
  Copyright terms: Public domain W3C validator