Интригуйте, как создать список

Судя по некоторым другим вашим вопросам, я думаю, что у вас могут возникнуть проблемы с осмыслением основных концепций функционального языка, такого как Scheme.

На уровне, который вы изучаете Scheme (новичок), каждая функция, которую вы пишете, имеет вход и выход, а тело каждой функции представляет собой одно выражение. Какое бы значение ни было вычислено выражением, возвращается функцией.Нет необходимости явно «возвращать» что-либо, как в императивном языке, таком как Java или C; это просто происходит как прямое следствие вычисления выражения.

Тело функции - это одно выражение. Это не похоже на Java, где тело метода состоит из серии инструкций:

do this
then do that
then do something else
then return something (maybe)

Функции схемы оценивают одно выражение; больше ничего. Вот простая функция, которая добавляет 5 к любому числу, переданному в качестве аргумента:

(define (add5 x)
  (+ x 5))

Тело функции - (+ x 5) , это просто выражение, которое нужно вычислить. Значение x вставляется, функция + (сложение) применяется к x и 5, и возвращается результат.

Списки не сильно отличаются. Все, что вам нужно, это выражение, которое будет составлять список. Два уже упоминались: list используется для создания списка с нуля, если у вас уже есть все элементы; cons используется для добавления одного элемента в существующий список и часто используется рекурсивно.

Вот функция, которая использует число n и строит список (n n-1 n-2 ... 0)

(define (makelist n)
  (if (= n 0)
     (list 0)                       ; base case. Just return (0)
     (cons n (makelist (- n 1)))))  ; recursive case. Add n to the head of (n-1 n-2 ... 0)

Как в базовом, так и в рекурсивном случаях список возвращается путем простой оценки выражения, использующего одну из функций построения списка.

Вот еще один пример. Здесь используется наша функция add5 , чтобы добавить 5 к каждому элементу списка чисел (lon):

(define (add5list lon)
  (if (null? lon)
    `()                 ; base case: lon is empty. Return an empty list.
    (cons (add5 (car lon)) (add5list (cdr lon)))))  ; recursive case.
                                                    ; Add 5 to the head of lon and prepend it to the tail of lon

Опять же, как базовый, так и рекурсивный случаи возвращают списки путем вычисления выражений, которые приводят к спискам.

Главное, что нужно помнить о Scheme, - это то, что все функции что-то возвращают, и это что-то является просто результатом вычисления выражения. Тело функции Scheme - это одно выражение.

Вы, вероятно, захотите просто: '(2 3 5 7 11) или (список 2 3 5 7 11) ?

Вы также можете создавать списки, указав элемент и список, в который его нужно добавить: (cons 2 (cons 3 '()))

Вот пример возврата списка из функции :

(define returnlist 
  (lambda(a b c) 
    (cons a (cons b (cons c '())))
))

(returnlist 2 3 4)

Возвращаемым значением будет список: (список 2 3 4)

Другой не очень известный способ сделать это:

> ((lambda x x) 2 3 5 7 11)
(2 3 5 7 11)

то есть, сама функция "list" может быть определена как:

> (define list (lambda x x))