// time = 0.19 seconds

data[87]:=[*
<87, 1, 2, [ -1, 1 ], 0, [
<2, x^2 - x - 1>,
<3, x^2 - 2*x + 1>,
<5, x^2 - 2*x - 4>,
<7, x^2 + 4*x - 1>,
<11, x^2 - 4*x - 1>,
<13, x^2 + 2*x - 19>,
<17, x^2 - 6*x + 9>,
<19, x^2 + 10*x + 20>
]>,
<87, 2, 3, [ 1, -1 ], 0, [
<2, x^3 - 2*x^2 - 4*x + 7>,
<3, x^3 + 3*x^2 + 3*x + 1>,
<5, x^3 - 16*x + 8>,
<7, x^3 - 4*x^2 - x + 8>,
<11, x^3 + 8*x^2 + 15*x + 4>,
<13, x^3 - 4*x^2 - 7*x + 26>,
<17, x^3 - 4*x^2 - 27*x + 94>,
<19, x^3 + 2*x^2 - 20*x + 16>
]>
*];