4 lines
70 B
Factor
4 lines
70 B
Factor
|
|
USE: math.polynomials
|
||
|
|
|
||
|
|
{ -42 0 -12 1 } { -3 1 } p/mod ptrim [ . ] bi@
|