]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/project-euler/175/175.factor
Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...
[factor.git] / extra / project-euler / 175 / 175.factor
index c99d670808a905f51d6b908a755dd440859b85fd..3473d9327c8dfd4180506326f72ced70ad69f2de 100644 (file)
@@ -42,7 +42,7 @@ IN: project-euler.175
 
 : compute ( vec ratio -- )
     {
-        { [ dup integer? ] [ 1- 0 add-bits ] }
+        { [ dup integer? ] [ 1 - 0 add-bits ] }
         { [ dup 1 < ] [ 1 over - / dupd compute 1 1 add-bits ] }
         [ [ 1 mod compute ] 2keep >integer 0 add-bits ]
     } cond ;