Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
|
|
@ -0,0 +1,18 @@
|
|||
% we start by defining an empty object
|
||||
:- object(foo).
|
||||
|
||||
% ensure that complementing categories are allowed
|
||||
:- set_logtalk_flag(complements, allow).
|
||||
|
||||
:- end_object.
|
||||
|
||||
% define a complementing category, adding a new predicate
|
||||
:- category(bar,
|
||||
complements(foo)).
|
||||
|
||||
:- public(bar/1).
|
||||
bar(1).
|
||||
bar(2).
|
||||
bar(3).
|
||||
|
||||
:- end_category.
|
||||
|
|
@ -0,0 +1,5 @@
|
|||
| ?- foo::bar(X).
|
||||
X = 1 ;
|
||||
X = 2 ;
|
||||
X = 3
|
||||
true
|
||||
Loading…
Add table
Add a link
Reference in a new issue