%% goal: answer(X0, X1)

answer(substring_last_char, X) :- substring("abcd", 3, 1, X).