From 73a30641a030d3765e977e53e0e5df70ddb4f09d Mon Sep 17 00:00:00 2001 From: pmoura Date: Mon, 12 Feb 2007 10:33:01 +0000 Subject: [PATCH] Fixed typo on nextto/3 documentation pointed out by Christian Thaeter. git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1794 b08c6af1-5177-4d33-ba66-4b1c6b8b522a --- library/lists.yap | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/library/lists.yap b/library/lists.yap index 3166b1205..96099d0e5 100644 --- a/library/lists.yap +++ b/library/lists.yap @@ -96,7 +96,7 @@ memberchk(Element, [_|Rest]) :- % nextto(X, Y, List) % is true when X and Y appear side-by-side in List. It could be written as -% nextto(X, Y, List) :- append(_, [X,Y], List). +% nextto(X, Y, List) :- append(_, [X,Y,_], List). % It may be used to enumerate successive pairs from the list. nextto(X,Y, [X,Y|_]).