Tuples(S:LIST, N:INT):LIST
Tuples([1, 4, 7], 2); [[1, 1], [1, 4], [1, 7], [4, 1], [4, 4], [4, 7], [7, 1], [7, 4], [7, 7]] -------------------------------