Solution
travel(X,Y) :- onestep(X,Y). travel(X,Y) :- onestep(X,Z), travel(Z,Y). onestep(X,Y) :- byCar(X,Y). onestep(X,Y) :- byTrain(X,Y). onestep(X,Y) :- byPlane(X,Y).
Solution
travel(X,Y) :- onestep(X,Y). travel(X,Y) :- onestep(X,Z), travel(Z,Y). onestep(X,Y) :- byCar(X,Y). onestep(X,Y) :- byTrain(X,Y). onestep(X,Y) :- byPlane(X,Y). |