%% ?- answer(X0).

answer(Text) :- join([a, 'b', 3], '-', Text).