Я пишу код хитрости, который получает список заданной длины, и мне нужно определить переменную для каждого элемента в списке. В настоящее время я должен сделать что-то вроде этого:
(define (foo l)
(let ((e-1 (car l))
(e-2 (cadr l))
(e-2 (caddr l))
; ...
(e-n (list-ref (- n 1)
l)))
(compute)))
Это становится очень утомительным. Могу ли я сделать что-то подобное вместо этого?
(define (foo l)
(symbol-def e-1 e-2 e-3 e-4 e-n l)
(compute))
Изменить: вопрос стал более специфичным для хитрости.