在Scheme中迭代(Iterating in Scheme)

 假设我在Scheme中有一个列表列表，如下所示： 
 
 (define a-list  (list (list a b) (list c d) (list e f) (list g h) (list i j)))
 
 我将如何定义一个消耗此列表的函数，以便我可以使用另一个函数来使用列表中的每个字母？ 
 
 例如，我有另一个功能 
 
(define (smorg a)
  (...))
 
 那么，我怎么去做smorg a，smorg b，smorg c ......？ 

Let's say that I have a list of lists in Scheme, like so:
 
 (define a-list  (list (list a b) (list c d) (list e f) (list g h) (list i j)))
 
How would I go about defining a function that would consume this list such that I could use another function to consume each letter in the list? 
 
For instance, I had another function 
 
(define (smorg a)
  (...))
 
So, how do I go about doing smorg a, smorg b, smorg c... ? 

原文：https://stackoverflow.com/questions/7426987