%% ?- answer.

answer :-
    asserta(Clause).