Learning Erlang

最新推荐文章于 2025-08-10 21:28:09 发布

kernel121

最新推荐文章于 2025-08-10 21:28:09 发布

阅读量115

点赞数

CC 4.0 BY-SA版权

分类专栏： Erlang 文章标签： Erlang 算法

本文链接：https://blog.youkuaiyun.com/kernel121/article/details/83555602

Erlang 专栏收录该内容

20 篇文章

订阅专栏

要开始高调学习Erlang了，先来报个到！ 8)


-module(tut).
-author(ecloud).
-export([fac/1, del/2]).

-include_lib("eunit/include/eunit.hrl").

%% @spec fac(integer()) -> integer().
-spec fac(integer()) -> integer().

fac(0) -> 1;
fac(N) -> N * fac(N-1).

-spec del(any(), list()) -> list().

del(Term, [Term|T] -> T;
del(Term, [H|T]) -> [H|del(Term, T)];
del(_Term, []) -> [].

register(tut, spawn(cp1@uss, fun() -> receive stop -> void end end)).

%% -------------------------------------------------------
%% Test
%% -------------------------------------------------------
fac_test_() -> 
[
    ?_assertEqual(fac(3), 6)
].