project-euler.206: reduce memory usage
parent
e8f857f3f6
commit
9c3b94519d
|
@ -1,7 +1,8 @@
|
|||
! Copyright (c) 2010 Aaron Schaefer. All rights reserved.
|
||||
! The contents of this file are licensed under the Simplified BSD License
|
||||
! A copy of the license is available at http://factorcode.org/license.txt
|
||||
USING: grouping kernel math math.ranges project-euler.common sequences ;
|
||||
USING: grouping kernel math math.ranges project-euler.common
|
||||
sequences sequences.cords ;
|
||||
IN: project-euler.206
|
||||
|
||||
! http://projecteuler.net/index.php?section=problems&id=206
|
||||
|
@ -33,7 +34,7 @@ CONSTANT: hi 1389026570
|
|||
{ 1 2 3 4 5 6 7 8 9 0 } = ;
|
||||
|
||||
: candidates ( -- seq )
|
||||
lo lo 40 + [ hi 100 <range> ] bi@ append ;
|
||||
lo lo 40 + [ hi 100 <range> ] bi@ cord-append ;
|
||||
|
||||
PRIVATE>
|
||||
|
||||
|
|
Loading…
Reference in New Issue