mult3(L,M).
mult3([],[]).
mult3([1],[3]).
mult3([2,3],[6,9]).

mult3([X],[Y]) :- mult(X,3,Y).

