diff --git a/web-world/examples/forward-backward/forward-backward.rkt b/web-world/examples/forward-backward/forward-backward.rkt index 8f2365c..17b2040 100644 --- a/web-world/examples/forward-backward/forward-backward.rkt +++ b/web-world/examples/forward-backward/forward-backward.rkt @@ -21,7 +21,7 @@ updated-view])) (define (iterate n f x) - (if (= n 0) + (if (<= n 0) x (iterate (sub1 n ) f (f x))))