Recherche:

Oui, j'ai répondu un peu vite.
En fait il faut créer une nouvelle règle qui exprime une liaison entre deux noeuds :

liaison(X, Y) :-
edge(X,Y); edge(Y,X).
Celà permet d'avoir un résultat,...

Tel que le graphe est défini, il n'y a pas de liaison entre e et c, donc path(e, c) échoue.
Si le graphe n'est pas orienté, on peut ajouter la règle :

edge(X, Y) :- edge(Y, X).