diff options
Diffstat (limited to 'prime/prime.scm')
-rwxr-xr-x | prime/prime.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/prime/prime.scm b/prime/prime.scm index e12dfb4..89915a1 100755 --- a/prime/prime.scm +++ b/prime/prime.scm @@ -14,4 +14,4 @@ by attempting division by number D,D-1,D-2..." #t (if (equal? (remainder n d) 0) #f - (prime-helper n (- d 1))))) + (prime-helper n (1- d))))) |