2ptrim ( p q -- p' q' )
Polynomials
Prev:ptrim ( p -- q )


Vocabulary
math.polynomials

Inputs
pa polynomial
qa polynomial


Outputs
p'a polynomial
q'a polynomial


Word description
Trims excess zeros from two polynomials.

Examples
USING: kernel math.polynomials prettyprint ; { 0 1 0 0 } { 1 0 0 } 2ptrim [ . ] bi@
{ 0 1 } { 1 }


Definition
USING: kernel ;

IN: math.polynomials

: 2ptrim ( p q -- p' q' ) [ ptrim ] bi@ ;