# Wolfram Language & System 11.0 (2016)|Legacy Documentation

This is documentation for an earlier version of the Wolfram Language.
WOLFRAM LANGUAGE TUTORIAL

# Algebraic Operations on Polynomials

For many kinds of practical calculations, the only operations you will need to perform on polynomials are essentially structural ones.

If you do more advanced algebra with polynomials, however, you will have to use the algebraic operations discussed in this tutorial.

You should realize that most of the operations discussed in this tutorial work only on ordinary polynomials, with integer exponents and rationalnumber coefficients for each term.

 PolynomialQuotient[poly1,poly2,x] find the result of dividing the polynomial poly1 in x by poly2, dropping any remainder term PolynomialRemainder[poly1,poly2,x] find the remainder from dividing the polynomial poly1 in x by poly2 PolynomialQuotientRemainder[poly1,poly2,x] give the quotient and remainder in a list PolynomialMod[poly,m] reduce the polynomial poly modulo m PolynomialGCD[poly1,poly2] find the greatest common divisor of two polynomials PolynomialLCM[poly1,poly2] find the least common multiple of two polynomials PolynomialExtendedGCD[poly1,poly2] find the extended greatest common divisor of two polynomials Resultant[poly1,poly2,x] find the resultant of two polynomials Subresultants[poly1,poly2,x] find the principal subresultant coefficients of two polynomials Discriminant[poly,x] find the discriminant of the polynomial poly GroebnerBasis[{poly1,poly2,…},{x1,x2,…}] find the Gröbner basis for the polynomials polyi GroebnerBasis[{poly1,poly2,…},{x1,x2,…},{y1,y2,…}] find the Gröbner basis eliminating the yi PolynomialReduce[poly,{poly1,poly2,…},{x1,x2,…}] find a minimal representation of poly in terms of the polyi

Reduction of polynomials.

Given two polynomials and , one can always uniquely write , where the degree of is less than the degree of . PolynomialQuotient gives the quotient , and PolynomialRemainder gives the remainder .

This gives the remainder from dividing by .
 In[1]:=
 Out[1]=
Here is the quotient of and , with the remainder dropped.
 In[2]:=
 Out[2]=
This gives back the original expression.
 In[3]:=
 Out[3]=
Here the result depends on whether the polynomials are considered to be in x or y.
 In[4]:=
 Out[4]=

PolynomialMod is essentially the analog for polynomials of the function Mod for integers. When the modulus m is an integer, PolynomialMod[poly,m] simply reduces each coefficient in poly modulo the integer m. If m is a polynomial, then PolynomialMod[poly,m] effectively tries to get a polynomial with as low a degree as possible by subtracting from poly appropriate multiples q m of m. The multiplier q can itself be a polynomial, but its degree is always less than the degree of poly. PolynomialMod yields a final polynomial whose degree and leading coefficient are both as small as possible.

This reduces modulo . The result is simply the remainder from dividing the polynomials.
 In[5]:=
 Out[5]=
In this case, PolynomialMod and PolynomialRemainder do not give the same result.
 In[6]:=
 Out[6]=

The main difference between PolynomialMod and PolynomialRemainder is that while the former works simply by multiplying and subtracting polynomials, the latter uses division in getting its results. In addition, PolynomialMod allows reduction by several moduli at the same time. A typical case is reduction modulo both a polynomial and an integer.

This reduces the polynomial modulo both and .
 In[7]:=
 Out[7]=

PolynomialGCD[poly1,poly2] finds the highest degree polynomial that divides the polyi exactly. It gives the analog for polynomials of the integer function GCD.

PolynomialGCD gives the greatest common divisor of the two polynomials.
 In[8]:=
 Out[8]=
PolynomialExtendedGCD gives the extended greatest common divisor of the two polynomials.
 In[9]:=
 Out[9]=
The returned polynomials and can be used to represent the GCD in terms of the original polynomials.
 In[10]:=
 Out[10]=

The function Resultant[poly1,poly2,x] is used in a number of classical algebraic algorithms. The resultant of two polynomials and , both with leading coefficient one, is given by the product of all the differences between the roots of the polynomials. It turns out that for any pair of polynomials, the resultant is always a polynomial in their coefficients. By looking at when the resultant is zero, you can tell for what values of their parameters two polynomials have a common root. Two polynomials with leading coefficient one have common roots if exactly the first elements in the list Subresultants[poly1,poly2,x] are zero.

Here is the resultant with respect to y of two polynomials in x and y. The original polynomials have a common root in y only for values of x at which the resultant vanishes.
 In[11]:=
 Out[11]=

The function Discriminant[poly,x] is the product of the squares of the differences of its roots. It can be used to determine whether the polynomial has any repeated roots. The discriminant is equal to the resultant of the polynomial and its derivative, up to a factor independent of the variable.

This polynomial has a repeated root, so its discriminant vanishes.
 In[12]:=
 Out[12]=
This polynomial has distinct roots, so its discriminant is nonzero.
 In[13]:=
 Out[13]=

Gröbner bases appear in many modern algebraic algorithms and applications. The function GroebnerBasis[{poly1,poly2,},{x1,x2,}] takes a set of polynomials, and reduces this set to a canonical form from which many properties can conveniently be deduced. An important feature is that the set of polynomials obtained from GroebnerBasis always has exactly the same collection of common roots as the original set.

The is effectively redundant, and so does not appear in the Gröbner basis.
 In[14]:=
 Out[14]=
The polynomial 1 has no roots, showing that the original polynomials have no common roots.
 In[15]:=
 Out[15]=
The polynomials are effectively unwound here, and can now be seen to have exactly five common roots.
 In[16]:=
 Out[16]=

PolynomialReduce[poly,{p1,p2,},{x1,x2,}] yields a list of polynomials with the property that is minimal and is exactly poly.

This writes in terms of and , leaving a remainder that depends only on .
 In[17]:=
 Out[17]=
 Factor[poly] factor a polynomial FactorSquareFree[poly] write a polynomial as a product of powers of square‐free factors FactorTerms[poly,x] factor out terms that do not depend on x FactorList[poly], FactorSquareFreeList[poly], FactorTermsList[poly] give results as lists of factors

Functions for factoring polynomials.

Factor, FactorTerms, and FactorSquareFree perform various degrees of factoring on polynomials. Factor does full factoring over the integers. FactorTerms extracts the "content" of the polynomial. FactorSquareFree pulls out any multiple factors that appear.

Here is a polynomial, in expanded form.
 In[18]:=
 Out[18]=
FactorTerms pulls out only the factor of 2 that does not depend on x.
 In[19]:=
 Out[19]=
FactorSquareFree factors out the 2 and the term , but leaves the rest unfactored.
 In[20]:=
 Out[20]=
Factor does full factoring, recovering the original form.
 In[21]:=
 Out[21]=

Particularly when you write programs that work with polynomials, you will often find it convenient to pick out pieces of polynomials in a standard form. The function FactorList gives a list of all the factors of a polynomial, together with their exponents. The first element of the list is always the overall numerical factor for the polynomial.

The form that FactorList returns is the analog for polynomials of the form produced by FactorInteger for integers.

Here is a list of the factors of the polynomial in the previous set of examples. Each element of the list gives the factor, together with its exponent.
 In[22]:=
 Out[22]=
 Factor[poly,GaussianIntegers->True] factor a polynomial, allowing coefficients that are Gaussian integers

Factoring polynomials with complex coefficients.

Factor and related functions usually handle only polynomials with ordinary integer or rationalnumber coefficients. If you set the option , however, then Factor will allow polynomials with coefficients that are complex numbers with rational real and imaginary parts. This often allows more extensive factorization to be performed.

This polynomial is irreducible when only ordinary integers are allowed.
 In[23]:=
 Out[23]=
When Gaussian integer coefficients are allowed, the polynomial factors.
 In[24]:=
 Out[24]=
 IrreduciblePolynomialQ[poly] test whether poly is an irreducible polynomial over the rationals IrreduciblePolynomialQ[poly,GaussianIntegers->True] test whether poly is irreducible over the Gaussian rationals IrreduciblePolynomialQ[poly,Extension->Automatic] test irreducibility over the rationals extended by the algebraic number coefficients of poly

Irreducibility testing.

A polynomial is irreducible over a field F if it cannot be represented as a product of two nonconstant polynomials with coefficients in F.

This polynomial is irreducible over the rationals.
 In[25]:=
 Out[25]=
Over the Gaussian rationals, the polynomial is reducible.
 In[26]:=
 Out[26]=
By default, algebraic numbers are treated as independent variables.
 In[27]:=
 Out[27]=
Over the rationals extended by Sqrt[2], the polynomial is reducible.
 In[28]:=
 Out[28]=
 Cyclotomic[n,x] give the cyclotomic polynomial of order n in x

Cyclotomic polynomials.

Cyclotomic polynomials arise as "elementary polynomials" in various algebraic algorithms. The cyclotomic polynomials are defined by , where runs over all positive integers less than that are relatively prime to .

This is the cyclotomic polynomial .
 In[29]:=
 Out[29]=
appears in the factors of .
 In[30]:=
 Out[30]=
 Decompose[poly,x] decompose poly, if possible, into a composition of a list of simpler polynomials

Decomposing polynomials.

Factorization is one important way of breaking down polynomials into simpler parts. Another, quite different, way is decomposition. When you factor a polynomial , you write it as a product of polynomials . Decomposing a polynomial consists of writing it as a composition of polynomials of the form .

Here is a simple example of Decompose. The original polynomial can be written as the polynomial , where is the polynomial .
 In[31]:=
 Out[31]=
Here are two polynomial functions.
 In[32]:=
This gives the composition of the two functions.
 In[33]:=
 Out[33]=
Decompose recovers the original functions.
 In[34]:=
 Out[34]=

Decompose[poly,x] is set up to give a list of polynomials in , which, if composed, reproduce the original polynomial. The original polynomial can contain variables other than , but the sequence of polynomials that Decompose produces are all intended to be considered as functions of .

Unlike factoring, the decomposition of polynomials is not completely unique. For example, the two sets of polynomials and , related by and give the same result on composition, so that . The Wolfram Language follows the convention of absorbing any constant terms into the first polynomial in the list produced by Decompose.

 InterpolatingPolynomial[{f1,f2,…},x] give a polynomial in x which is equal to fi when x is the integer i InterpolatingPolynomial[{{x1,f1},{x2,f2},…},x] give a polynomial in x which is equal to fi when x is xi

Generating interpolating polynomials.

This yields a quadratic polynomial which goes through the specified three points.
 In[35]:=
 Out[35]=
When x is 0, the polynomial has value 2.
 In[36]:=
 Out[36]=