9 lines
77 B
Plaintext
9 lines
77 B
Plaintext
|
|
||
|
|
:- object(singletons(L)).
|
||
|
|
|
||
|
|
predicate(A) :-
|
||
|
|
write(C).
|
||
|
|
|
||
|
|
:- end_object.
|
||
|
|
|