Prolog - Problema con listas

Hola a todos...
Hace rato q no puedo codificar un predicado q reciba una lista y devuelva todas las siguientes combinaciones:

Listar(Lconocida, L1, L2)
Ej: Lconocida = [1,2,3,4], L1= [1], L2=[2,3,4];
L1= [1,2], L2=[3,4];
L1= [1,2,3], L2=[4];
Parece simple y seguro q lo es, pero no lo puedo hacer u.u.

gracias y saludos.

append(L1, L2, [1,2,3,4]).
L1 = [],
L2 = [1, 2, 3, 4] ;
L1 = [1],
L2 = [2, 3, 4] ;
L1 = [1, 2],
L2 = [3, 4] ;
L1 = [1, 2, 3],
L2 = [4] ;
L1 = [1, 2, 3, 4],
L2 = [] ;
false.