История изменений
Исправление monk, (текущая версия) :
Если я правильно понял, что автору надо (выбрать все элементы меньше a), то будет просто (filter (lambda (x) (< x a) lst). Или сокращённо (filter (</c a) lst).
В переменных автора:
(define *left-A-lst* (filter (</c *A-distance*) *distance-lst*))
Исходная версия monk, :
Если я правильно понял, что автору надо (выбрать все элементы меньше a), то будет просто (filter (lambda (x) (< x a) lst). Или сокращённо (filter (</c a) lst).
Ну или в переменных автора:
(define *left-A-lst* (filter (</c *A-distance*) *distance-lst*))