2017-07-28から1日間の記事一覧
さっき挙げたプログラムだとfib(40)ぐらいでもう数十秒ぐらいかかり、だいぶ遅いです。 メモ化再帰フィボナッチをメモしておきます fib 0 = 0 fib 1 = 1 fib x = (fiblist !! (x-1) + fiblist !! (x-2)) fiblist = [fib x | x <- [0,1..]] 実行結果 ghci> fi…
さっき挙げたプログラムだとfib(40)ぐらいでもう数十秒ぐらいかかり、だいぶ遅いです。 メモ化再帰フィボナッチをメモしておきます fib 0 = 0 fib 1 = 1 fib x = (fiblist !! (x-1) + fiblist !! (x-2)) fiblist = [fib x | x <- [0,1..]] 実行結果 ghci> fi…