In Racket mit der Funktion foldr Elemente der Liste zählen.

Question

Wie ist es möglich mit der Funktion foldr in Racket die Elemente einer Liste zu zählen ?

(define (mylength xs)
  (foldr ? ? xs))

(mylength (list 1 2 3)) -> Ergebnis 3

LG

Answer 1

(define (mylength xs)
  (foldr (lambda (x y) (add1 y)) 0 xs))