%% ?- answer.

answer :-
    char_code(Char, -1).