5 lines
91 B
Plaintext
5 lines
91 B
Plaintext
|
#include "reachin1000".
|
||
|
|
||
|
source(3).
|
||
|
reach(Y) :- edge(X,Y), reach(X).
|
||
|
reach(X) :- source(X).
|