road(burlington, X), road(X, Y), road(Y, H), format('You can get from Burlington to ~w which will get you to ~w and then to ~w in two hops.\n',[X, Y, H]), fail.

You can get from Burlington to newton which will get you to hardwick and then to redville in two hops.
You can get from Burlington to newton which will get you to hardwick and then to newton in two hops.
You can get from Burlington to newton which will get you to burr and then to newton in two hops.
You can get from Burlington to newton which will get you to hallsburg and then to newton in two hops.
You can get from Burlington to newton which will get you to hallsburg and then to burlington in two hops.
You can get from Burlington to newton which will get you to burlington and then to newton in two hops.
You can get from Burlington to newton which will get you to burlington and then to hallsburg in two hops.
You can get from Burlington to hallsburg which will get you to newton and then to hardwick in two hops.
You can get from Burlington to hallsburg which will get you to newton and then to burr in two hops.
You can get from Burlington to hallsburg which will get you to newton and then to hallsburg in two hops.
You can get from Burlington to hallsburg which will get you to newton and then to burlington in two hops.
You can get from Burlington to hallsburg which will get you to burlington and then to newton in two hops.
You can get from Burlington to hallsburg which will get you to burlington and then to hallsburg in two hops.