%% ?- answer(X0).

answer(X) :- reverse([], X).
