qsprayDivision {qspray}

Division of two polynomials

Description

Division of two polynomials

Usage

qsprayDivision(qsprayA, qsprayB)

Arguments

qsprayA

a qspray object, the dividend

qsprayB

a qspray object, the divisor

Value

A list with two qspray objects, the quotient and the remainder.

Examples

library(qspray)
x <- qlone(1)
y <- qlone(2)
z <- qlone(3)
B <- x*y^2 + z*x^2 + 1
A <- B * (x^2*y^2*z^2 - 3) + x*y
divis <- qsprayDivision(A, B)
B * divis[["Q"]] + divis[["R"]] == A # should be TRUE