// time = 0.049 seconds data[41]:=[* <41, 1, 3, [ -1 ], 0, [ <2, x^3 + x^2 - 5*x - 1>, <3, x^3 - 4*x + 2>, <5, x^3 + 2*x^2 - 4*x - 4>, <7, x^3 - 6*x^2 + 8*x - 2>, <11, x^3 - 2*x^2 - 20*x + 50>, <13, x^3 + 2*x^2 - 12*x - 8>, <17, x^3 + 6*x^2 + 12*x + 8>, <19, x^3 - 4*x^2 - 16*x - 10> ]> *];