Задание по рекурсии. Вычислить n-го член арифметической прогрессии, у которой первый член равен 1, а шаг=2 - Prolog

Формулировка задачи:

помогите пожалуйста реализовать на прологе: нужно создать консольный проект и разработать рекурсивную программу вычисления n-го члена арифметической прогрессии, у которой первый член равен 1, а шаг = 2

Решение задачи: «Задание по рекурсии. Вычислить n-го член арифметической прогрессии, у которой первый член равен 1, а шаг=2»

Листинг программы

progr(1,1).
progr(N,MEM):-N1 is N-1
                    progr(N1,MEM1),
                    MEM is MEM1+2.

Объяснение кода листинга программы

Задается факт, что первый член арифметической прогрессии равен 1, второй член равен 3, третий член равен 5 и так далее.
Утверждение о том, что для любого натурального числа N можно вычислить MEM, где MEM - это N-й член арифметической прогрессии, а первый член прогрессии равен 1, а шаг равен 2.
Для вычисления N-го члена арифметической прогрессии используется рекурсия.
Рекурсивный вызов определяется следующим образом: N1 = N-1 MEM1 = результат рекурсивного вызова с N1 и MEM1 MEM = MEM1 + 2
Рекурсивный вызов продолжается до тех пор, пока N1 не станет равным 1.
Значение MEM является N-м членом арифметической прогрессии.