On my machine at least, fib6 is 4% faster than fib5:
my @fib6_cache; sub fib6 { my $n = shift; $fib6_cache[ $n ] //= $n < 2 ? $n : ( $fib6_cache[ $n-1 ] //= fib6($n-1) ) + ( $fib6_cache[ $n-2 ] //= fib6($n-2) ); }
In reply to Re^2: Reminder to self: must use Memoize more often!
by tobyink
in thread Reminder to self: must use Memoize more often!
by tobyink
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |