Prolog - elementos duplicados en lista

Necesito hacer un predicado nodups que toma una lista L con los valores duplicados y devuelve 2 listas L1 y L2. Donde L1 contiene los elementos de L sin duplicar y L2 los elementos duplicados. En caso de que en L1 no haya repetidos, entonces L = L1 y L2 = [], por ejemplo nodup([a,b,b,c,d,d,e,f,f],L1,L2) donde L1 toma [a,b,c,d,e,f] y L2=[b,d,f]
Agradecere su ayuda.