Zoek het voorlaatste element in een lijst.

?- before_last(X,[a,b,c,d]).
X = c