summaryrefslogtreecommitdiff
path: root/prime/prime.scm
diff options
context:
space:
mode:
Diffstat (limited to 'prime/prime.scm')
-rwxr-xr-xprime/prime.scm2
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)))))