задача на прологе, списки

[antoshka1303]

Задача на swi - прологе
У меня задача дан список [[1,2],[3,4],[5,6],[7,8]]
Нужно получить i-ый элемент списка. то есть например 2 элемент это будет[3,4]
Пишу так

%отрезаю голову
ruleh(Rr, 0, Rr).
ruleh([A|H], C, _):-
C is C - 1,
C >  0,
ruleh(H, C, _).

%отрезаю хвост
rulet(Rr, 0, Rr).
rulet([A|H], C, _):-
C is  C - 1,
rulet(A, C, _).

подскажите в чем ошибка? Всем заранее спасибо!

[luitzen]

Загрузив

element([H|_],1,H).
element([_|T],N,X):-
   succ(M,N),
   element(T,M,X).

спросите

element([[1,2],[3,4],[5,6],[7,8]],2,X).

и получите то, что нужно.