%% ?- answer(X0, X1).

answer(lower, X) :- lowercase('HelloWorld', X).
answer(upper, X) :- uppercase(helloWorld, X).