Minor typo in solution for PE problem 49

diff --git a/extra/project-euler/049/049.factor b/extra/project-euler/049/049.factor
index 2fa51fa22158671f9fdd124ef3895b0ca3f881ca..15dd7ed6d2edfd1b6210b441af5ffb858d24f3b8 100644 (file)
--- a/extra/project-euler/049/049.factor
+++ b/extra/project-euler/049/049.factor
@@ -43,7 +43,7 @@ HINTS: count-digits fixnum ;
 
 : potential-sequences ( -- seq )
     1000 9999 primes-between
-    collect-permutations [ length 3 > ] filter ;
+    collect-permutations [ length 3 >= ] filter ;
 
 : arithmetic-terms ( m n -- seq )
     2dup [ swap - ] keep + 3array ;