2011年2月14日月曜日

Erlang プログラミング 加算してみる

ようやくErlangについての記事が書けました。
加算するプログラムを書きました。

ソース:
-module(lib_misc).
-export([sum/1]).

sum(L) -> sum(L,0).

sum([],N) -> N;
sum([H|T],N) -> sum(T,H+N).


ソースがあるカレントディレクトリでコマンドプロンプトからEShellとやらを起動する。

>erl
Erlang R13B01 (erts-5.7.2) [source] [rq:1] [async-threads:0] [kernel-poll:false] 

Eshell V5.7.2  (abort with ^G)

1> c(lib_misc).
{ok,lib_misc}
2> SUM = [1,2,3,4,5].
[1,2,3,4,5]
3> lib_misc:sum(SUM).
15