Recursion 需要将Scheme中两个函数的结果与驱动程序相结合

我有一个方案分配，其中用户要输入一个数字列表，输出应该是列表中的最大值和最小值。作业中说我们可以有两个单独的函数，并将结果与驱动程序相结合，但我不知道如何做到这一点。以下是我到目前为止的情况：

(define (findmin l) (if (null? (cdr l)) (car l)
 (if (< (car l) (findmin (cdr l)))(car l)
 (findmin (cdr l)))))

(define (findmax l) (if (null? (cdr l)) (car l)
 (if (> (car l) (findmax (cdr l)))(car l)
 (findmax (cdr l)))))

（定义（findmin l）（如果为空（cdr l））（车辆l）
（如果（<（左车）（findmin（cdr l）））（左车）
（财政司司长
（定义（findmax l）（如果（空）（cdr l））（车辆l）
（如果（>（左车）（findmax（cdr l）））（左车）
（findmax（cdr l(()()))）

我似乎无法回避必须为findmin输入一个列表，为findmax输入另一个列表。用户只需输入一个列表。

驱动程序：

(define (min-and-max l) (list (findmin l) (findmax l)))