]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/project-euler/076/076.factor
Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...
[factor.git] / extra / project-euler / 076 / 076.factor
index e6ed9035d2b72e1fd702003551d77b247ff7718d..8615a272ae1cfd7e3bd042d8ea95aeb15a711675 100644 (file)
@@ -35,7 +35,7 @@ IN: project-euler.076
     over zero? [
         3drop
     ] [
-        [ [ 1-  2array ] dip at     ]
+        [ [ 1 -  2array ] dip at     ]
         [ [ use 2array ] dip at +   ]
         [ [     2array ] dip set-at ] 3tri
     ] if ;
@@ -46,7 +46,7 @@ IN: project-euler.076
 : (euler076) ( n -- m )
     dup init
     [ [ ways ] curry each-subproblem ]
-    [ [ dup 2array ] dip at 1- ] 2bi ;
+    [ [ dup 2array ] dip at 1 - ] 2bi ;
 
 PRIVATE>