13 lines
93 B
Plaintext
13 lines
93 B
Plaintext
|
|
||
|
|
:- object(root).
|
||
|
|
|
||
|
|
|
||
|
|
:- public(p/1).
|
||
|
|
:- dynamic(p/1).
|
||
|
|
|
||
|
|
|
||
|
|
p(root).
|
||
|
|
|
||
|
|
|
||
|
|
:- end_object.
|