8 lines
189 B
Prolog
8 lines
189 B
Prolog
repeat(_, 0).
|
|
repeat(Callable, Times) :-
|
|
succ(TimesLess1, Times),
|
|
Callable,
|
|
repeat(Callable, TimesLess1).
|
|
|
|
test :- write('Hello, World'), nl.
|
|
test(Name) :- format('Hello, ~w~n', Name).
|