[Date Index] [Thread Index] [Author Index]

PolynomialMod

• To: mathgroup at smc.vnet.net
• Subject: [mg121334] PolynomialMod
• From: Artur <grafix at csl.pl>
• Date: Sun, 11 Sep 2011 07:28:34 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Reply-to: grafix at csl.pl

Dear Mathematica Gurus,

Who is able help me to write Mathematica procedure which will be 
improovment of recent PolynomialMod.

If we do
PolynomialMod[ 1 + 3 #1 + 5 #1^2 + 5 #1^3 + 5 #1^4 + 3 #1^5 + #1^6, -1 + 
2 #1^2 + #1^3]
result is OK
1 + 6 #1 + 6 #1^2

But if we do
PolynomialMod[1 + 3 #1 + 5 #1^2 + 5 #1^3 + 5 #1^4 + 3 #1^5 + #1^6, -1 + 
(-(3/2) - (I Sqrt[23])/2) #1 + (3/2 - (I Sqrt[23])/2) #1^2 + #1^3]
Result is wrong
good should be
-2 + (-(1/2) - (I Sqrt[23])/2) x + x^2

Who is able to write good one procedure e.g. PolMod to automatic 
reduction of any degree polynomials by polynomial smaller degree?

Best wishes
Artur Jasinskii

• Follow-Ups:
  • Re: PolynomialMod
    • From: Andrzej Kozlowski <akoz@mimuw.edu.pl>