% Part 3


splitlist([H|T],Left,Pivot,Right):-
    (H == Pivot ->
      Right = T;
      splitlist(T,H,Pivot,Right)
    ).


% splitlist(L, Pivot):-
%   splitlist(L, [], Pivot, []).
%
% splitlist([H|T], B, Pivot, C):-
%   splitlist(T,B,Pivot,T).
%
splitlist([], Left, Pivot, Right):-
  write("HERE"),
  write(Left).
%