Несколько вопросов про Racket

> 1. Как добавить элемент в конец списка? Да, не в начало, а в конец.
(append (list 1 2) (list 3))

3. Хочу, чтобы область видимости структуры распространялась только на 2 функции внутри модуля. Как это сделать?

 
(define (getFnG)
  (let ((x 0))
    (define (f nx) (set! x nx))
    (define (g) x)
    (cons f g)))

(define FnG (getFnG))

(define f (car FnG))
(define g (cdr FnG))

Я использую структуры, специфичные для Racket:

(struct point (x y))

>Я использую структуры, специфичные для Racket:

и что это меняет?

По поводу твоего кода: конструктор и селектор определены в глобальной области видимости, а мне так не нужно.

что мешает сделать его локально?

1. списки иммутабельные, по-этому только append

2. append+take/drop или for/list

3. если (struct ...) находится нвутри let-формы, то его область видимости ограничивается этой let-формой, то есть как-то так

(define-values (g h)
  (let ()
    (struct point (x))
    (define (g x) (point x))
    (define (h p) (point-x p))
    (values g h)))

3. Еще можно использовать пакеты (racket/package)

4. Всмысле - стоит ли использовать контракты? Стоит.

3. выдели их(структуру и функции) в отдельный модуль, в чем проблема?

Придется делать отдельный файл. Если это не единичный случай - будет неудобно, лучше пекеджи использовать.

1. Как добавить элемент в конец списка? Да, не в начало, а в конец.

Можно использовать mutable пары, хранить последнюю пару и делать set-mcdr! для добавления элемента.

(define lst (mcons 1 '()))
(define a1 (mcons 2 '()))
(set-mcdr! lst a1)
lst
--> {0 1}

(define a2 (mcons 3 '()))
(set-mcdr! a1 a2)
lst
--> {0 1 2}