Add slice/3 predicate

Inspired by ruby each_slice function, slice list into chunks with N elements
in each chunk.

?- slice([1,2,3,4,5,6,7], 3, Xs).
Xs = [[1, 2, 3], [4, 5, 6], [7]].