前回の記事で書いたソースをいじってみましょう。下記2点が気になりました。 リストに1つしか文字列がないときに期待通りの動きをしない。 これは、lists:all(Fun, []) が true を返すためですね。 1文字辿るのに2回もループを回している。 lists:all/2 と、…

お久しぶりです。No Programming, No Lifeで見掛けた表題のお題をErlangでやってみます。まず、文字列が2つのときを考えます。これは文字列のパターンマッチングを使えば問題なさそうですね。 -module(ahya). -compile(export_all). ahya([H1|T1], [H1|T2]) …