answer(head, zero).
answer(rest, [one, two, three, four]).
answer(last, four).
answer(take_three, [zero, one, two]).
answer(drop_three, [three, four]).
answer(slice_middle, [one, two, three]).
answer(slice_tail_empty, []).