fd048651b6
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@55 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
17 lines
191 B
Plaintext
17 lines
191 B
Plaintext
|
|
:- object(airport).
|
|
|
|
|
|
:- public(fly/1).
|
|
:- mode(fly(?), zero_or_more).
|
|
|
|
:- public(airport/1).
|
|
:- mode(airport(?), zero_or_more).
|
|
|
|
|
|
airport(Airport) :-
|
|
self(Airport).
|
|
|
|
|
|
:- end_object.
|