Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...

[factor.git] / extra / project-euler / 169 / 169.factor

diff --git a/extra/project-euler/169/169.factor b/extra/project-euler/169/169.factor
index 5f0b853f0db998207cbe1d9787bdd85fc4cc7bef..efd1c8ee60494ccb678dd5e03ddbc2b82853d38a 100644 (file)
--- a/extra/project-euler/169/169.factor
+++ b/extra/project-euler/169/169.factor
@@ -30,7 +30,7 @@ MEMO: fn ( n -- x )
     {
         { [ dup 2 < ]  [ drop 1 ] }
         { [ dup odd? ] [ 2/ fn ] }
-        [ 2/ [ fn ] [ 1- fn ] bi + ]
+        [ 2/ [ fn ] [ 1 - fn ] bi + ]
     } cond ;
 
 : euler169 ( -- result )