blob: 2818688f950e6d76a69d804e8b783c30be54d0dd (
plain) (
tree)
|
|
-module(eep37).
-compile(export_all).
-spec self() -> fun(() -> fun()).
self() ->
fun Self() -> Self end.
-spec fact() -> fun((non_neg_integer()) -> non_neg_integer()).
fact() ->
fun Fact(N) when N > 0 ->
N * Fact(N - 1);
Fact(0) ->
1
end.
|