Как бы вы написали программу на Prolog для печати чисел от 1 до 10 с использованием рекурсии?

Как бы вы написали программу на Прологе для вывода чисел от 1 до 10 с использованием рекурсии?

I ' Я пробовал следующее, но это не сработало, вы можете сказать мне, почему?

print_numbers(10) :- write(10).

print_numbers(X) :- write(X),nl,X is X + 1, print_numbers(X).