Prolog - listas

Que tal, a ver si me pudieran ayudar con este ejercicio que nomas no me sale, la sentencia pide un dato, la posicion del dato en la lista, y la lista donde se insertará por ejemplo

insertar(4,5,[1,2,3,4,5,6])

la solucion seria [1,2,3,4,4,5,6] tengo esta función de contador creo que por ahi va la cosaç

contador([],0).
contador([Primero|Resto],Cuantos):-contador(Resto,Unomenos),Cuantos is Unomenos+1.

Si mal no recuerdo debes definir una lista de salida porque sino no unifica el algoritmo, o sea, L no es pasado por referencia. Diox ando un poco oxidado con esto jejeejejeeje estoy recordando las sintaxis poco a poco.

insert(n,0,L1,L2):- L1 = [ n | L2 ]
insert(n,m,[cab | cola], L2):- m1 = m - 1, insert(n,m1,cola,L2)