]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/project-euler/043/043.factor
Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...
[factor.git] / extra / project-euler / 043 / 043.factor
index 75241499e11fc90387fd3944d4ec2c3b68f33fd4..bea7313abd214ede4d5c55c6761f8d97464620f6 100644 (file)
@@ -36,7 +36,7 @@ IN: project-euler.043
 <PRIVATE
 
 : subseq-divisible? ( n index seq -- ? )
-    [ 1- dup 3 + ] dip subseq 10 digits>integer swap divisor? ;
+    [ 1 - dup 3 + ] dip subseq 10 digits>integer swap divisor? ;
 
 : interesting? ( seq -- ? )
     {