如何仅使用球拍中的lambda进行递归？

Question

我需要一些帮助，试图弄清楚如何仅使用lambda来递归下面的代码。

(define (mklist2 bind pure args)
  (define (helper bnd pr ttl lst)
    (cond [(empty? lst) (pure ttl)]
          [else (define (func t) (helper bnd pr (append ttl (list t)) (rest lst)))
           (bind (first lst) func)])
    )
  (helper bind pure empty args))

Answer 1

仅使用lambda递归？