Prolog - Como se puede obtener los numeros de una lista de numeros y letras de una lista

numlista([],[]).

numlista([X|XS],[X|C]):-integer(X),numlista(XS,C).

numlista([X|XS],L):-not(integer(X)),numlista(XS,L).