6 lines
119 B
Perl
6 lines
119 B
Perl
|
lind(part).
|
||
|
|
lind(hani).
|
||
|
|
|
||
|
|
lendab(X):- write(X), lind(X), write(' lendab').
|
||
|
|
lendab(_):- write(' ei ole lind'),nl,!,fail.
|