%% ?- answer.

answer :-
    atom_chars(Atom, Chars).