diff --git a/15-loops.scrbl b/15-loops.scrbl index 982605e..ac5fd5e 100644 --- a/15-loops.scrbl +++ b/15-loops.scrbl @@ -173,7 +173,7 @@ Sie sind wie folgt definiert: (define (filter f xs) (cond [(empty? xs) empty] [(cons? xs) (if (f (first xs)) - (cons (first xs) (filter1 f (rest xs))) + (cons (first xs) (filter f (rest xs))) (filter f (rest xs)))])) ; [X Y] (X -> (list-of Y)) (list-of X) -> (list-of Y)