Представление и обработка списков в турбо прологе

[Romashkinu]

Здравствуйте, прошу помочь написать программный код (желательно с объяснением) на языке турбо пролог. Задача звучит: сформировать список L1 из положительных элементов L. Заранее спасибо

 

[rrrFer]

еще актуально?

Добавлено: не проверял, пишу сразу на форум:

p([],[]).
p( [H|T], [H1|T1] ):-
H > 0, !, H1 = H,
p(T,T1);p(T,[H1|T1]),!.