Thanks for reply, but I'm not getting it to work :/
buy(X, L) :- at_home(YS), recipe(X,XS), kollabuy(XS, YS, L).
kollabuy([], _, _).
kollabuy([X|XS], YS, L) :- kopa(X, YS, L), kollabuy(XS, YS, L).
%No : when the homelist is empty, you have not foud the ingredient, you need to buy it and know...