answer(a, [b, a]).
answer(b, [a, a]).
answer(a, [a, b]).