エンジニアのソフトウェア的愛情

または私は如何にして心配するのを止めてプログラムを・愛する・ようになったか

2016-03-03から1日間の記事一覧

もっと気軽に Prolog でフィボナッチ数列

先日、フィボナッチ数列を求める Prolog のコードを書いたわけですが。もっとすっきりと書けることに気がつきました。 add(X, Y, Z) :- Z is (X + Y). fib(N, Fib) :- length(Fib, N), append(Fib, [_], [1|Fib2]), append(Fib2, [_], [1|Fib3]), maplist(ad…