为什么这在 DrRacket 中有效，但在控制台中的 Racket 中无效

Question

(define pick
    (lambda (num lat)
      (cond ((null? lat) (quote()))
            ((= (sub1 num) 0) (car lat))
            (else 
                  (pick (sub1 num) (cdr lat))))))
(define brees (quote (a b c d e touchdown g h i)))
(pick 6 brees)

DrRacket 中的语言设置为高级学生。定义后，它在 IronScheme 控制台中也可以正常工作 sub1.

错误信息是：

reference to undefined identifier: R

Answer 1

当我将其输入控制台时，我得到

Welcome to Racket v5.0.
> (define pick
    (lambda (num lat)
     (cond ((null? lat) (quote()))
        ((= (sub1 num) 0) (car lat))
        (else
              (pick (sub1 num) (cdr lat))))))
> (define brees (quote (a b c d e touchdown g h i)))
> (pick 6 brees)
'touchdown

你如何在控制台中运行它？如果您正在加载它，您可能需要 #lang Racket 对于第一行。