// time = 0.159 seconds

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