This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/Logtalk/examples/operators/SCRIPT

52 lines
701 B
Plaintext
Raw Normal View History

=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.18.0
Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
=================================================================
% start by loading the example:
| ?- logtalk_load(loader).
...
% operators declared inside an object are not visible outside:
| ?- double::(I double J).
Syntax error: Operator expected
% you must use instead:
| ?- double::double(I, J).
I = 1
J = 2 ;
I = 2
J = 4 ;
I = 3
J = 6
Yes
% operators also affect inputing of terms, enabling this example to work:
| ?- triple::triple(I, J).
I = 1
J = 3 ;
I = 2
J = 6 ;
I = 3
J = 9
Yes