「ビットあみだくじ」をErlangで

趣味と勉強を兼ねて「ビットあみだくじ」(http://nabetani.sakura.ne.jp/hena/ord11bitamida/)をErlangでやってみました。

以下のソースをba.erlというファイルに保存し、Erlangのコンソールから「c(ba).」「ba:tests().」で実行できます。


1> c(ba).
{ok,ba}
2> ba:tests().
d6-7b-e1-9e -> 740631825, true
6f-dd-ff-ff -> 230685147, true
ok