13 lines
120 B
Plaintext
13 lines
120 B
Plaintext
|
|
||
|
|
bar :-
|
||
|
|
write('bar predicate called'), nl.
|
||
|
|
|
||
|
|
|
||
|
|
:- object(bypass).
|
||
|
|
|
||
|
|
:- public(foo/2).
|
||
|
|
|
||
|
|
foo --> {{bar}}.
|
||
|
|
|
||
|
|
:- end_object.
|