Minor typo in solution for PE problem 49

db4
Aaron Schaefer 2009-04-02 12:10:51 -04:00
parent 5405f530b9
commit 59145c0672
1 changed files with 1 additions and 1 deletions

View File

@ -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 ;