Welcome to the CHICKEN Scheme pasting service

reduction transformers added by certainty on Thu Aug 23 21:37:40 2012

(define ((mapping f) f1)
  (lambda (input result)
    (f1 (f input) result)))

(define ((filtering pred) combine)
  (lambda (input result)
    (if (pred input)
        (combine input result) result)))


(fold ((mapping add1) cons) (list)   (iota 10))
(fold ((mapping add1) +) 0 (iota 10))

(fold ((filtering odd?) cons) (list) (iota 10))
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
What's the one-argument procedure to check if a list is empty?