Skip to content

Commit

Permalink
Fix typo in filter function
Browse files Browse the repository at this point in the history
  • Loading branch information
mm0821 committed Feb 5, 2024
1 parent a8fffda commit c8876de
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion 15-loops.scrbl
Original file line number Diff line number Diff line change
Expand Up @@ -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)
Expand Down

0 comments on commit c8876de

Please sign in to comment.