// time = 0.229 seconds

data[98]:=[*
<98, 1, 1, [ 1, -1 ], 0, [
<2, x + 1>,
<3, x - 2>,
<5, x>,
<7, x>,
<11, x>,
<13, x - 4>,
<17, x + 6>,
<19, x + 2>
]>,
<98, 2, 2, [ -1, 1 ], 0, [
<2, x^2 - 2*x + 1>,
<3, x^2 - 2>,
<5, x^2 - 8>,
<7, x^2>,
<11, x^2 + 4*x + 4>,
<13, x^2>,
<17, x^2 - 2>,
<19, x^2 - 50>
]>
*];