加算するプログラムを書きました。
ソース:
-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
0 件のコメント:
コメントを投稿