 ! Copyright (c) 2007 Aaron Schaefer.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: kernel math math.parser memoize sequences ;
+USING: alien.syntax kernel math math.functions math.parser math.ranges memoize
+    sequences ;
 IN: project-euler.025
 
 ! http://projecteuler.net/index.php?section=problems&id=25

! [ euler025 ] 10 ave-time
! 5237 ms run / 72 ms GC ave time - 10 trials

MAIN: euler025

! SOLUTION
! --------

! Memoized brute force

MEMO: fib ( m -- n )
    dup 1 > [ 1 - dup fib swap 1 - fib + ] when ;

