]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/project-euler/070/070.factor
factor: fix some spacing
[factor.git] / extra / project-euler / 070 / 070.factor
index 07e45fff3d50c69fb93e49af624bca19a6112801..9ab0c388694cfc6a00c654f607f8b057f296d560 100644 (file)
@@ -60,8 +60,8 @@ IN: project-euler.070
 PRIVATE>
 
 : euler070 ( -- answer )
-   likely-prime-factors 2 all-combinations [ n-and-phi ] map
-   [ fit-requirements? ] filter minimum-ratio ;
+    likely-prime-factors 2 all-combinations [ n-and-phi ] map
+    [ fit-requirements? ] filter minimum-ratio ;
 
 ! [ euler070 ] 100 ave-time
 ! 379 ms ave run time - 1.15 SD (100 trials)