// time = 0.159 seconds

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