split([],[],[]).
split([H|T], [H|U], V) :- split(T, V, U).