diff --git a/internal-latency-prospect.rkt b/internal-latency-prospect.rkt index 1e2a716..cd96f24 100644 --- a/internal-latency-prospect.rkt +++ b/internal-latency-prospect.rkt @@ -89,7 +89,7 @@ (for ((n (list* 1 2 5 (let loop ((n 10)) - (if (>= n 3000) + (if (>= n 30000) '() (cons (inexact->exact (round n)) (loop (* n (sqrt (sqrt 2)))))))) diff --git a/internal-latency-symbols-not-fixnums.rkt b/internal-latency-symbols-not-fixnums.rkt index ecbf68d..2d04490 100644 --- a/internal-latency-symbols-not-fixnums.rkt +++ b/internal-latency-symbols-not-fixnums.rkt @@ -90,7 +90,7 @@ (for ((n (list* 1 2 5 (let loop ((n 10)) - (if (>= n 3000) + (if (>= n 30000) '() (cons (inexact->exact (round n)) (loop (* n (sqrt (sqrt 2)))))))) diff --git a/internal-latency.rkt b/internal-latency.rkt index 0fc3eb2..4aabc09 100644 --- a/internal-latency.rkt +++ b/internal-latency.rkt @@ -89,7 +89,7 @@ (for ((n (list* 1 2 5 (let loop ((n 10)) - (if (>= n 3000) + (if (>= n 30000) '() (cons (inexact->exact (round n)) (loop (* n (sqrt (sqrt 2))))))))