Prolog - Ayuda con listas

Necesito hacer el predicado deleteN que toma un elemento X, un número N y una lista L. El predicado borra las N ocurrencias de X en la lista L, por ejemplo: deleteN(a,2,[a,b,c,a,d,a,e],X) acota a X con el valor [b,c,d,a,e].
Agradecere su ayuda

quetal necesito en codio fuente , la ver como funciona