Дан список, содержащий смешанный граф. Выбрать из него однонаправленные ветви и занести в результирующий граф - Prolog

Помогите, пожалуйста решить эту зайку. Очень прошу...

Листинг программы

?- task([(a,b),(b,c),(c,d),(d,c),(c,b)], X).
X = [ (a, b)].

Объяснение кода листинга программы

В данном коде:

В переменной task хранится список пар, представляющих собой ребра графа.
В переменной X будет храниться результирующий список однонаправленных ребер графа.
Код выводит значение переменной X, которое является списком пар.
Значение переменной X получено в результате обработки списка task с помощью логических операций и правил вывода.