Metamath Proof Explorer


Theorem veronesevrowd

Description: The Veronese map at a point, expressed explicitly as a piecewise maps-to function on the six coordinates. (Contributed by Jiamin Zhao, 17-Aug-2026)

Ref Expression
Hypothesis veronesevrow.1 ( 𝜑𝑃 ∈ ( ℝ ↑m ( 1 ... 3 ) ) )
Assertion veronesevrowd ( 𝜑 → ( veronese ‘ 𝑃 ) = ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) )

Proof

Step Hyp Ref Expression
1 veronesevrow.1 ( 𝜑𝑃 ∈ ( ℝ ↑m ( 1 ... 3 ) ) )
2 ovex ( ( ( if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , 0 ) + if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , 0 ) ) + if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , 0 ) ) + ( ( if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , 0 ) + if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , 0 ) ) + if ( 𝑘 = 6 , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) , 0 ) ) ) ∈ V
3 eqid ( 𝑘 ∈ ( 1 ... 6 ) ↦ ( ( ( if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , 0 ) + if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , 0 ) ) + if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , 0 ) ) + ( ( if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , 0 ) + if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , 0 ) ) + if ( 𝑘 = 6 , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) , 0 ) ) ) ) = ( 𝑘 ∈ ( 1 ... 6 ) ↦ ( ( ( if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , 0 ) + if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , 0 ) ) + if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , 0 ) ) + ( ( if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , 0 ) + if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , 0 ) ) + if ( 𝑘 = 6 , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) , 0 ) ) ) )
4 2 3 fnmpti ( 𝑘 ∈ ( 1 ... 6 ) ↦ ( ( ( if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , 0 ) + if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , 0 ) ) + if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , 0 ) ) + ( ( if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , 0 ) + if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , 0 ) ) + if ( 𝑘 = 6 , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) , 0 ) ) ) ) Fn ( 1 ... 6 )
5 1 veronesevald ( 𝜑 → ( veronese ‘ 𝑃 ) = ( 𝑘 ∈ ( 1 ... 6 ) ↦ ( ( ( if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , 0 ) + if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , 0 ) ) + if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , 0 ) ) + ( ( if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , 0 ) + if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , 0 ) ) + if ( 𝑘 = 6 , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) , 0 ) ) ) ) )
6 5 fneq1d ( 𝜑 → ( ( veronese ‘ 𝑃 ) Fn ( 1 ... 6 ) ↔ ( 𝑘 ∈ ( 1 ... 6 ) ↦ ( ( ( if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , 0 ) + if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , 0 ) ) + if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , 0 ) ) + ( ( if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , 0 ) + if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , 0 ) ) + if ( 𝑘 = 6 , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) , 0 ) ) ) ) Fn ( 1 ... 6 ) ) )
7 4 6 mpbiri ( 𝜑 → ( veronese ‘ 𝑃 ) Fn ( 1 ... 6 ) )
8 ovex ( ( 𝑃 ‘ 1 ) ↑ 2 ) ∈ V
9 ovex ( ( 𝑃 ‘ 2 ) ↑ 2 ) ∈ V
10 ovex ( ( 𝑃 ‘ 3 ) ↑ 2 ) ∈ V
11 ovex ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) ∈ V
12 ovex ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) ∈ V
13 ovex ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ∈ V
14 12 13 ifex if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ∈ V
15 11 14 ifex if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ∈ V
16 10 15 ifex if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ∈ V
17 9 16 ifex if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ∈ V
18 8 17 ifex if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ∈ V
19 eqid ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) = ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) )
20 18 19 fnmpti ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) Fn ( 1 ... 6 )
21 20 a1i ( 𝜑 → ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) Fn ( 1 ... 6 ) )
22 1 veronesev1lem ( 𝜑 → ( ( veronese ‘ 𝑃 ) ‘ 1 ) = ( ( 𝑃 ‘ 1 ) ↑ 2 ) )
23 22 ad2antrr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 1 ) → ( ( veronese ‘ 𝑃 ) ‘ 1 ) = ( ( 𝑃 ‘ 1 ) ↑ 2 ) )
24 simpr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 1 ) → 𝑥 = 1 )
25 24 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 1 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( veronese ‘ 𝑃 ) ‘ 1 ) )
26 24 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 1 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 1 ) )
27 1nn 1 ∈ ℕ
28 6nn 6 ∈ ℕ
29 1re 1 ∈ ℝ
30 6re 6 ∈ ℝ
31 1lt6 1 < 6
32 29 30 31 ltleii 1 ≤ 6
33 elfz1b ( 1 ∈ ( 1 ... 6 ) ↔ ( 1 ∈ ℕ ∧ 6 ∈ ℕ ∧ 1 ≤ 6 ) )
34 27 28 32 33 mpbir3an 1 ∈ ( 1 ... 6 )
35 iftrue ( 𝑘 = 1 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = ( ( 𝑃 ‘ 1 ) ↑ 2 ) )
36 35 19 18 fvmpt3i ( 1 ∈ ( 1 ... 6 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 1 ) = ( ( 𝑃 ‘ 1 ) ↑ 2 ) )
37 34 36 ax-mp ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 1 ) = ( ( 𝑃 ‘ 1 ) ↑ 2 )
38 26 37 eqtrdi ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 1 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑃 ‘ 1 ) ↑ 2 ) )
39 23 25 38 3eqtr4d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 1 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
40 1 veronesev2lem ( 𝜑 → ( ( veronese ‘ 𝑃 ) ‘ 2 ) = ( ( 𝑃 ‘ 2 ) ↑ 2 ) )
41 40 ad2antrr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 2 ) → ( ( veronese ‘ 𝑃 ) ‘ 2 ) = ( ( 𝑃 ‘ 2 ) ↑ 2 ) )
42 simpr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 2 ) → 𝑥 = 2 )
43 42 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 2 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( veronese ‘ 𝑃 ) ‘ 2 ) )
44 42 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 2 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 2 ) )
45 2nn 2 ∈ ℕ
46 2re 2 ∈ ℝ
47 2lt6 2 < 6
48 46 30 47 ltleii 2 ≤ 6
49 elfz1b ( 2 ∈ ( 1 ... 6 ) ↔ ( 2 ∈ ℕ ∧ 6 ∈ ℕ ∧ 2 ≤ 6 ) )
50 45 28 48 49 mpbir3an 2 ∈ ( 1 ... 6 )
51 1ne2 1 ≠ 2
52 51 necomi 2 ≠ 1
53 neeq1 ( 𝑘 = 2 → ( 𝑘 ≠ 1 ↔ 2 ≠ 1 ) )
54 52 53 mpbiri ( 𝑘 = 2 → 𝑘 ≠ 1 )
55 54 neneqd ( 𝑘 = 2 → ¬ 𝑘 = 1 )
56 55 iffalsed ( 𝑘 = 2 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) )
57 iftrue ( 𝑘 = 2 → if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) = ( ( 𝑃 ‘ 2 ) ↑ 2 ) )
58 56 57 eqtrd ( 𝑘 = 2 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = ( ( 𝑃 ‘ 2 ) ↑ 2 ) )
59 58 19 18 fvmpt3i ( 2 ∈ ( 1 ... 6 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 2 ) = ( ( 𝑃 ‘ 2 ) ↑ 2 ) )
60 50 59 ax-mp ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 2 ) = ( ( 𝑃 ‘ 2 ) ↑ 2 )
61 44 60 eqtrdi ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 2 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑃 ‘ 2 ) ↑ 2 ) )
62 41 43 61 3eqtr4d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 2 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
63 39 62 jaodan ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ ( 𝑥 = 1 ∨ 𝑥 = 2 ) ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
64 1 veronesev3lem ( 𝜑 → ( ( veronese ‘ 𝑃 ) ‘ 3 ) = ( ( 𝑃 ‘ 3 ) ↑ 2 ) )
65 64 ad2antrr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 3 ) → ( ( veronese ‘ 𝑃 ) ‘ 3 ) = ( ( 𝑃 ‘ 3 ) ↑ 2 ) )
66 simpr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 3 ) → 𝑥 = 3 )
67 66 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 3 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( veronese ‘ 𝑃 ) ‘ 3 ) )
68 66 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 3 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 3 ) )
69 3nn 3 ∈ ℕ
70 3re 3 ∈ ℝ
71 3lt6 3 < 6
72 70 30 71 ltleii 3 ≤ 6
73 elfz1b ( 3 ∈ ( 1 ... 6 ) ↔ ( 3 ∈ ℕ ∧ 6 ∈ ℕ ∧ 3 ≤ 6 ) )
74 69 28 72 73 mpbir3an 3 ∈ ( 1 ... 6 )
75 1ne3 1 ≠ 3
76 75 necomi 3 ≠ 1
77 neeq1 ( 𝑘 = 3 → ( 𝑘 ≠ 1 ↔ 3 ≠ 1 ) )
78 76 77 mpbiri ( 𝑘 = 3 → 𝑘 ≠ 1 )
79 78 neneqd ( 𝑘 = 3 → ¬ 𝑘 = 1 )
80 79 iffalsed ( 𝑘 = 3 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) )
81 2ne3 2 ≠ 3
82 81 necomi 3 ≠ 2
83 neeq1 ( 𝑘 = 3 → ( 𝑘 ≠ 2 ↔ 3 ≠ 2 ) )
84 82 83 mpbiri ( 𝑘 = 3 → 𝑘 ≠ 2 )
85 84 neneqd ( 𝑘 = 3 → ¬ 𝑘 = 2 )
86 85 iffalsed ( 𝑘 = 3 → if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) = if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) )
87 iftrue ( 𝑘 = 3 → if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) = ( ( 𝑃 ‘ 3 ) ↑ 2 ) )
88 80 86 87 3eqtrd ( 𝑘 = 3 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = ( ( 𝑃 ‘ 3 ) ↑ 2 ) )
89 88 19 18 fvmpt3i ( 3 ∈ ( 1 ... 6 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 3 ) = ( ( 𝑃 ‘ 3 ) ↑ 2 ) )
90 74 89 ax-mp ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 3 ) = ( ( 𝑃 ‘ 3 ) ↑ 2 )
91 68 90 eqtrdi ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 3 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑃 ‘ 3 ) ↑ 2 ) )
92 65 67 91 3eqtr4d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 3 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
93 63 92 jaodan ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
94 1 veronesev4lem ( 𝜑 → ( ( veronese ‘ 𝑃 ) ‘ 4 ) = ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) )
95 94 ad2antrr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 4 ) → ( ( veronese ‘ 𝑃 ) ‘ 4 ) = ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) )
96 simpr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 4 ) → 𝑥 = 4 )
97 96 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 4 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( veronese ‘ 𝑃 ) ‘ 4 ) )
98 96 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 4 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 4 ) )
99 4nn 4 ∈ ℕ
100 4re 4 ∈ ℝ
101 4lt6 4 < 6
102 100 30 101 ltleii 4 ≤ 6
103 elfz1b ( 4 ∈ ( 1 ... 6 ) ↔ ( 4 ∈ ℕ ∧ 6 ∈ ℕ ∧ 4 ≤ 6 ) )
104 99 28 102 103 mpbir3an 4 ∈ ( 1 ... 6 )
105 1lt4 1 < 4
106 29 105 gtneii 4 ≠ 1
107 neeq1 ( 𝑘 = 4 → ( 𝑘 ≠ 1 ↔ 4 ≠ 1 ) )
108 106 107 mpbiri ( 𝑘 = 4 → 𝑘 ≠ 1 )
109 108 neneqd ( 𝑘 = 4 → ¬ 𝑘 = 1 )
110 109 iffalsed ( 𝑘 = 4 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) )
111 2lt4 2 < 4
112 46 111 gtneii 4 ≠ 2
113 neeq1 ( 𝑘 = 4 → ( 𝑘 ≠ 2 ↔ 4 ≠ 2 ) )
114 112 113 mpbiri ( 𝑘 = 4 → 𝑘 ≠ 2 )
115 114 neneqd ( 𝑘 = 4 → ¬ 𝑘 = 2 )
116 115 iffalsed ( 𝑘 = 4 → if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) = if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) )
117 110 116 eqtrd ( 𝑘 = 4 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) )
118 3lt4 3 < 4
119 70 118 gtneii 4 ≠ 3
120 neeq1 ( 𝑘 = 4 → ( 𝑘 ≠ 3 ↔ 4 ≠ 3 ) )
121 119 120 mpbiri ( 𝑘 = 4 → 𝑘 ≠ 3 )
122 121 neneqd ( 𝑘 = 4 → ¬ 𝑘 = 3 )
123 122 iffalsed ( 𝑘 = 4 → if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) = if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) )
124 iftrue ( 𝑘 = 4 → if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) = ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) )
125 117 123 124 3eqtrd ( 𝑘 = 4 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) )
126 125 19 18 fvmpt3i ( 4 ∈ ( 1 ... 6 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 4 ) = ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) )
127 104 126 ax-mp ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 4 ) = ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) )
128 98 127 eqtrdi ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 4 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) )
129 95 97 128 3eqtr4d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 4 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
130 93 129 jaodan ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ ( ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ∨ 𝑥 = 4 ) ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
131 1 veronesev5lem ( 𝜑 → ( ( veronese ‘ 𝑃 ) ‘ 5 ) = ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) )
132 131 ad2antrr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 5 ) → ( ( veronese ‘ 𝑃 ) ‘ 5 ) = ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) )
133 simpr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 5 ) → 𝑥 = 5 )
134 133 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 5 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( veronese ‘ 𝑃 ) ‘ 5 ) )
135 133 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 5 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 5 ) )
136 5nn 5 ∈ ℕ
137 5re 5 ∈ ℝ
138 5lt6 5 < 6
139 137 30 138 ltleii 5 ≤ 6
140 elfz1b ( 5 ∈ ( 1 ... 6 ) ↔ ( 5 ∈ ℕ ∧ 6 ∈ ℕ ∧ 5 ≤ 6 ) )
141 136 28 139 140 mpbir3an 5 ∈ ( 1 ... 6 )
142 1lt5 1 < 5
143 29 142 gtneii 5 ≠ 1
144 neeq1 ( 𝑘 = 5 → ( 𝑘 ≠ 1 ↔ 5 ≠ 1 ) )
145 143 144 mpbiri ( 𝑘 = 5 → 𝑘 ≠ 1 )
146 145 neneqd ( 𝑘 = 5 → ¬ 𝑘 = 1 )
147 146 iffalsed ( 𝑘 = 5 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) )
148 2lt5 2 < 5
149 46 148 gtneii 5 ≠ 2
150 neeq1 ( 𝑘 = 5 → ( 𝑘 ≠ 2 ↔ 5 ≠ 2 ) )
151 149 150 mpbiri ( 𝑘 = 5 → 𝑘 ≠ 2 )
152 151 neneqd ( 𝑘 = 5 → ¬ 𝑘 = 2 )
153 152 iffalsed ( 𝑘 = 5 → if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) = if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) )
154 3lt5 3 < 5
155 70 154 gtneii 5 ≠ 3
156 neeq1 ( 𝑘 = 5 → ( 𝑘 ≠ 3 ↔ 5 ≠ 3 ) )
157 155 156 mpbiri ( 𝑘 = 5 → 𝑘 ≠ 3 )
158 157 neneqd ( 𝑘 = 5 → ¬ 𝑘 = 3 )
159 158 iffalsed ( 𝑘 = 5 → if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) = if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) )
160 147 153 159 3eqtrd ( 𝑘 = 5 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) )
161 4lt5 4 < 5
162 100 161 gtneii 5 ≠ 4
163 neeq1 ( 𝑘 = 5 → ( 𝑘 ≠ 4 ↔ 5 ≠ 4 ) )
164 162 163 mpbiri ( 𝑘 = 5 → 𝑘 ≠ 4 )
165 164 neneqd ( 𝑘 = 5 → ¬ 𝑘 = 4 )
166 165 iffalsed ( 𝑘 = 5 → if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) = if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) )
167 iftrue ( 𝑘 = 5 → if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) = ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) )
168 160 166 167 3eqtrd ( 𝑘 = 5 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) )
169 168 19 18 fvmpt3i ( 5 ∈ ( 1 ... 6 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 5 ) = ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) )
170 141 169 ax-mp ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 5 ) = ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) )
171 135 170 eqtrdi ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 5 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) )
172 132 134 171 3eqtr4d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 5 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
173 130 172 jaodan ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ ( ( ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ∨ 𝑥 = 4 ) ∨ 𝑥 = 5 ) ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
174 1 veronesev6lem ( 𝜑 → ( ( veronese ‘ 𝑃 ) ‘ 6 ) = ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) )
175 174 ad2antrr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 6 ) → ( ( veronese ‘ 𝑃 ) ‘ 6 ) = ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) )
176 simpr ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 6 ) → 𝑥 = 6 )
177 176 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 6 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( veronese ‘ 𝑃 ) ‘ 6 ) )
178 176 fveq2d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 6 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 6 ) )
179 30 leidi 6 ≤ 6
180 elfz1b ( 6 ∈ ( 1 ... 6 ) ↔ ( 6 ∈ ℕ ∧ 6 ∈ ℕ ∧ 6 ≤ 6 ) )
181 28 28 179 180 mpbir3an 6 ∈ ( 1 ... 6 )
182 29 31 gtneii 6 ≠ 1
183 neeq1 ( 𝑘 = 6 → ( 𝑘 ≠ 1 ↔ 6 ≠ 1 ) )
184 182 183 mpbiri ( 𝑘 = 6 → 𝑘 ≠ 1 )
185 184 neneqd ( 𝑘 = 6 → ¬ 𝑘 = 1 )
186 185 iffalsed ( 𝑘 = 6 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) )
187 46 47 gtneii 6 ≠ 2
188 neeq1 ( 𝑘 = 6 → ( 𝑘 ≠ 2 ↔ 6 ≠ 2 ) )
189 187 188 mpbiri ( 𝑘 = 6 → 𝑘 ≠ 2 )
190 189 neneqd ( 𝑘 = 6 → ¬ 𝑘 = 2 )
191 190 iffalsed ( 𝑘 = 6 → if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) = if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) )
192 70 71 gtneii 6 ≠ 3
193 neeq1 ( 𝑘 = 6 → ( 𝑘 ≠ 3 ↔ 6 ≠ 3 ) )
194 192 193 mpbiri ( 𝑘 = 6 → 𝑘 ≠ 3 )
195 194 neneqd ( 𝑘 = 6 → ¬ 𝑘 = 3 )
196 195 iffalsed ( 𝑘 = 6 → if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) = if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) )
197 186 191 196 3eqtrd ( 𝑘 = 6 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) )
198 100 101 gtneii 6 ≠ 4
199 neeq1 ( 𝑘 = 6 → ( 𝑘 ≠ 4 ↔ 6 ≠ 4 ) )
200 198 199 mpbiri ( 𝑘 = 6 → 𝑘 ≠ 4 )
201 200 neneqd ( 𝑘 = 6 → ¬ 𝑘 = 4 )
202 201 iffalsed ( 𝑘 = 6 → if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) = if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) )
203 137 138 gtneii 6 ≠ 5
204 neeq1 ( 𝑘 = 6 → ( 𝑘 ≠ 5 ↔ 6 ≠ 5 ) )
205 203 204 mpbiri ( 𝑘 = 6 → 𝑘 ≠ 5 )
206 205 neneqd ( 𝑘 = 6 → ¬ 𝑘 = 5 )
207 206 iffalsed ( 𝑘 = 6 → if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) = ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) )
208 197 202 207 3eqtrd ( 𝑘 = 6 → if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) = ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) )
209 208 19 18 fvmpt3i ( 6 ∈ ( 1 ... 6 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 6 ) = ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) )
210 181 209 ax-mp ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 6 ) = ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) )
211 178 210 eqtrdi ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 6 ) → ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) = ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) )
212 175 177 211 3eqtr4d ( ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) ∧ 𝑥 = 6 ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
213 simpr ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) → 𝑥 ∈ ( 1 ... 6 ) )
214 elnnuz ( 5 ∈ ℕ ↔ 5 ∈ ( ℤ ‘ 1 ) )
215 136 214 mpbi 5 ∈ ( ℤ ‘ 1 )
216 elfzp1 ( 5 ∈ ( ℤ ‘ 1 ) → ( 𝑥 ∈ ( 1 ... ( 5 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 5 ) ∨ 𝑥 = ( 5 + 1 ) ) ) )
217 215 216 ax-mp ( 𝑥 ∈ ( 1 ... ( 5 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 5 ) ∨ 𝑥 = ( 5 + 1 ) ) )
218 5p1e6 ( 5 + 1 ) = 6
219 218 oveq2i ( 1 ... ( 5 + 1 ) ) = ( 1 ... 6 )
220 219 eleq2i ( 𝑥 ∈ ( 1 ... ( 5 + 1 ) ) ↔ 𝑥 ∈ ( 1 ... 6 ) )
221 218 eqeq2i ( 𝑥 = ( 5 + 1 ) ↔ 𝑥 = 6 )
222 221 orbi2i ( ( 𝑥 ∈ ( 1 ... 5 ) ∨ 𝑥 = ( 5 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 5 ) ∨ 𝑥 = 6 ) )
223 217 220 222 3bitr3i ( 𝑥 ∈ ( 1 ... 6 ) ↔ ( 𝑥 ∈ ( 1 ... 5 ) ∨ 𝑥 = 6 ) )
224 elnnuz ( 4 ∈ ℕ ↔ 4 ∈ ( ℤ ‘ 1 ) )
225 99 224 mpbi 4 ∈ ( ℤ ‘ 1 )
226 elfzp1 ( 4 ∈ ( ℤ ‘ 1 ) → ( 𝑥 ∈ ( 1 ... ( 4 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 4 ) ∨ 𝑥 = ( 4 + 1 ) ) ) )
227 225 226 ax-mp ( 𝑥 ∈ ( 1 ... ( 4 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 4 ) ∨ 𝑥 = ( 4 + 1 ) ) )
228 4p1e5 ( 4 + 1 ) = 5
229 228 oveq2i ( 1 ... ( 4 + 1 ) ) = ( 1 ... 5 )
230 229 eleq2i ( 𝑥 ∈ ( 1 ... ( 4 + 1 ) ) ↔ 𝑥 ∈ ( 1 ... 5 ) )
231 228 eqeq2i ( 𝑥 = ( 4 + 1 ) ↔ 𝑥 = 5 )
232 231 orbi2i ( ( 𝑥 ∈ ( 1 ... 4 ) ∨ 𝑥 = ( 4 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 4 ) ∨ 𝑥 = 5 ) )
233 227 230 232 3bitr3i ( 𝑥 ∈ ( 1 ... 5 ) ↔ ( 𝑥 ∈ ( 1 ... 4 ) ∨ 𝑥 = 5 ) )
234 elnnuz ( 3 ∈ ℕ ↔ 3 ∈ ( ℤ ‘ 1 ) )
235 69 234 mpbi 3 ∈ ( ℤ ‘ 1 )
236 elfzp1 ( 3 ∈ ( ℤ ‘ 1 ) → ( 𝑥 ∈ ( 1 ... ( 3 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 3 ) ∨ 𝑥 = ( 3 + 1 ) ) ) )
237 235 236 ax-mp ( 𝑥 ∈ ( 1 ... ( 3 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 3 ) ∨ 𝑥 = ( 3 + 1 ) ) )
238 3p1e4 ( 3 + 1 ) = 4
239 238 oveq2i ( 1 ... ( 3 + 1 ) ) = ( 1 ... 4 )
240 239 eleq2i ( 𝑥 ∈ ( 1 ... ( 3 + 1 ) ) ↔ 𝑥 ∈ ( 1 ... 4 ) )
241 238 eqeq2i ( 𝑥 = ( 3 + 1 ) ↔ 𝑥 = 4 )
242 241 orbi2i ( ( 𝑥 ∈ ( 1 ... 3 ) ∨ 𝑥 = ( 3 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 3 ) ∨ 𝑥 = 4 ) )
243 237 240 242 3bitr3i ( 𝑥 ∈ ( 1 ... 4 ) ↔ ( 𝑥 ∈ ( 1 ... 3 ) ∨ 𝑥 = 4 ) )
244 2eluzge1 2 ∈ ( ℤ ‘ 1 )
245 elfzp1 ( 2 ∈ ( ℤ ‘ 1 ) → ( 𝑥 ∈ ( 1 ... ( 2 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 2 ) ∨ 𝑥 = ( 2 + 1 ) ) ) )
246 244 245 ax-mp ( 𝑥 ∈ ( 1 ... ( 2 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 2 ) ∨ 𝑥 = ( 2 + 1 ) ) )
247 2p1e3 ( 2 + 1 ) = 3
248 247 oveq2i ( 1 ... ( 2 + 1 ) ) = ( 1 ... 3 )
249 248 eleq2i ( 𝑥 ∈ ( 1 ... ( 2 + 1 ) ) ↔ 𝑥 ∈ ( 1 ... 3 ) )
250 247 eqeq2i ( 𝑥 = ( 2 + 1 ) ↔ 𝑥 = 3 )
251 250 orbi2i ( ( 𝑥 ∈ ( 1 ... 2 ) ∨ 𝑥 = ( 2 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 2 ) ∨ 𝑥 = 3 ) )
252 246 249 251 3bitr3i ( 𝑥 ∈ ( 1 ... 3 ) ↔ ( 𝑥 ∈ ( 1 ... 2 ) ∨ 𝑥 = 3 ) )
253 elnnuz ( 1 ∈ ℕ ↔ 1 ∈ ( ℤ ‘ 1 ) )
254 27 253 mpbi 1 ∈ ( ℤ ‘ 1 )
255 elfzp1 ( 1 ∈ ( ℤ ‘ 1 ) → ( 𝑥 ∈ ( 1 ... ( 1 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 1 ) ∨ 𝑥 = ( 1 + 1 ) ) ) )
256 254 255 ax-mp ( 𝑥 ∈ ( 1 ... ( 1 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 1 ) ∨ 𝑥 = ( 1 + 1 ) ) )
257 1p1e2 ( 1 + 1 ) = 2
258 257 oveq2i ( 1 ... ( 1 + 1 ) ) = ( 1 ... 2 )
259 258 eleq2i ( 𝑥 ∈ ( 1 ... ( 1 + 1 ) ) ↔ 𝑥 ∈ ( 1 ... 2 ) )
260 257 eqeq2i ( 𝑥 = ( 1 + 1 ) ↔ 𝑥 = 2 )
261 260 orbi2i ( ( 𝑥 ∈ ( 1 ... 1 ) ∨ 𝑥 = ( 1 + 1 ) ) ↔ ( 𝑥 ∈ ( 1 ... 1 ) ∨ 𝑥 = 2 ) )
262 256 259 261 3bitr3i ( 𝑥 ∈ ( 1 ... 2 ) ↔ ( 𝑥 ∈ ( 1 ... 1 ) ∨ 𝑥 = 2 ) )
263 elfz1eq ( 𝑥 ∈ ( 1 ... 1 ) → 𝑥 = 1 )
264 263 orim1i ( ( 𝑥 ∈ ( 1 ... 1 ) ∨ 𝑥 = 2 ) → ( 𝑥 = 1 ∨ 𝑥 = 2 ) )
265 262 264 sylbi ( 𝑥 ∈ ( 1 ... 2 ) → ( 𝑥 = 1 ∨ 𝑥 = 2 ) )
266 265 orim1i ( ( 𝑥 ∈ ( 1 ... 2 ) ∨ 𝑥 = 3 ) → ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) )
267 252 266 sylbi ( 𝑥 ∈ ( 1 ... 3 ) → ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) )
268 267 orim1i ( ( 𝑥 ∈ ( 1 ... 3 ) ∨ 𝑥 = 4 ) → ( ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ∨ 𝑥 = 4 ) )
269 243 268 sylbi ( 𝑥 ∈ ( 1 ... 4 ) → ( ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ∨ 𝑥 = 4 ) )
270 269 orim1i ( ( 𝑥 ∈ ( 1 ... 4 ) ∨ 𝑥 = 5 ) → ( ( ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ∨ 𝑥 = 4 ) ∨ 𝑥 = 5 ) )
271 233 270 sylbi ( 𝑥 ∈ ( 1 ... 5 ) → ( ( ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ∨ 𝑥 = 4 ) ∨ 𝑥 = 5 ) )
272 271 orim1i ( ( 𝑥 ∈ ( 1 ... 5 ) ∨ 𝑥 = 6 ) → ( ( ( ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ∨ 𝑥 = 4 ) ∨ 𝑥 = 5 ) ∨ 𝑥 = 6 ) )
273 223 272 sylbi ( 𝑥 ∈ ( 1 ... 6 ) → ( ( ( ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ∨ 𝑥 = 4 ) ∨ 𝑥 = 5 ) ∨ 𝑥 = 6 ) )
274 213 273 syl ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) → ( ( ( ( ( 𝑥 = 1 ∨ 𝑥 = 2 ) ∨ 𝑥 = 3 ) ∨ 𝑥 = 4 ) ∨ 𝑥 = 5 ) ∨ 𝑥 = 6 ) )
275 173 212 274 mpjaodan ( ( 𝜑𝑥 ∈ ( 1 ... 6 ) ) → ( ( veronese ‘ 𝑃 ) ‘ 𝑥 ) = ( ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) ‘ 𝑥 ) )
276 7 21 275 eqfnfvd ( 𝜑 → ( veronese ‘ 𝑃 ) = ( 𝑘 ∈ ( 1 ... 6 ) ↦ if ( 𝑘 = 1 , ( ( 𝑃 ‘ 1 ) ↑ 2 ) , if ( 𝑘 = 2 , ( ( 𝑃 ‘ 2 ) ↑ 2 ) , if ( 𝑘 = 3 , ( ( 𝑃 ‘ 3 ) ↑ 2 ) , if ( 𝑘 = 4 , ( ( 𝑃 ‘ 1 ) · ( 𝑃 ‘ 2 ) ) , if ( 𝑘 = 5 , ( ( 𝑃 ‘ 2 ) · ( 𝑃 ‘ 3 ) ) , ( ( 𝑃 ‘ 3 ) · ( 𝑃 ‘ 1 ) ) ) ) ) ) ) ) )