Multiplication in polynomial representation

poly_prod(p, n, xton, p1, p2)

Arguments

p	modulus
n	length of polynomials
xton	characteristic polynomial vector for the field (x to the n power)
p1	polynomial vector 1
p2	polynomial vector 2

the product of p1 and p2

gf <- create_galois_field(4)
a <- poly_prod(gf$p, gf$n, gf$xton, c(1, 0), c(0, 1))
stopifnot(all(a == c(0, 1)))