Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Finding a path between two lists
- %declare the list
- circle_line([cc1,cc2,cc3,cc4,cc5,cc6,cc7,cc8,cc9,cc10,cc11,cc12,cc13,cc14,cc15,cc16]).
- %the predicate that finds the station i need
- check_for_station(A) :- circle_line(X),
- member(A,X),
- write(A),nl.
Add Comment
Please, Sign In to add comment