Include Paulo Moura's Logtalk OO LP system

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@53 b08c6af1-5177-4d33-ba66-4b1c6b8b522a

Logtalk/examples/inheritance/predicates.lgt

@@ -0,0 +1,25 @@
+
+:- category(predicates).
+
+
+	:- public(public/0).
+	:- mode(public, one).
+
+	:- protected(protected/0).
+	:- mode(protected, one).
+
+	:- private(private/0).
+	:- mode(private, one).
+
+
+	public :-
+		write('Public predicate declared and defined in category predicates.'), nl.
+
+	protected :-
+		write('Protected predicate declared and defined in category predicates.'), nl.
+
+	private :-
+		write('Private predicate declared and defined in category predicates.'), nl.
+
+
+:- end_category.