2009/11/21

Erlang Hello world!, factorial, fibonacci

Hello world!

-module(hello).
-export([hello/0]).

hello () ->
    io : fwrite("Hello, world!~n", []).
% hello:hello().
% Hello, world!
% ok

factorial

-module(fact).
-export([fact/1]).

fact(1) ->
    1;
fact(N) ->
    N * fact(N-1).

% fact:fact(5).
% 120

fibonacci

% 一般的にファイル名と同じ名称を指定する
-module(fib).
% モジュール外から使用する関数とその引数の数を記述
-export([fib/1]).
% 全ての関数をエクスポートするには
% -compile(export_all).
% 定数定義、レコード定義のインクルード
% -include_lib("hoge.hrl").

fib(1) ->
    1;
fib(2) ->
    1;
fib(N) ->
    fib(N-1) + fib(N-2).

 

C-c C-k コンパイル

0 件のコメント:

コメントを投稿