From 8d2394c5f5968392ece3d6d73a5f98e267edf40f Mon Sep 17 00:00:00 2001 From: Abigail Date: Wed, 13 Oct 2021 20:13:02 +0200 Subject: Erlang solution for week 134 --- challenge-134/abigail/README.md | 1 + challenge-134/abigail/erlang/ch-1.erl | 22 ++++++++++++++++++++++ 2 files changed, 23 insertions(+) create mode 100644 challenge-134/abigail/erlang/ch-1.erl diff --git a/challenge-134/abigail/README.md b/challenge-134/abigail/README.md index 58fae311a4..7cb7880ca3 100644 --- a/challenge-134/abigail/README.md +++ b/challenge-134/abigail/README.md @@ -8,6 +8,7 @@ * [bc](bc/ch-1.bc) * [Befunge-93](befunge-93/ch-1.bf93) * [C](c/ch-1.c) +* [Erlang](erlang/ch-1.erl) * [Go](go/ch-1.go) * [Java](java/ch-1.java) * [Lua](lua/ch-1.lua) diff --git a/challenge-134/abigail/erlang/ch-1.erl b/challenge-134/abigail/erlang/ch-1.erl new file mode 100644 index 0000000000..0ce5451fb5 --- /dev/null +++ b/challenge-134/abigail/erlang/ch-1.erl @@ -0,0 +1,22 @@ +% +% See ../README.md +% + +% +% Run as: ln ch-1.erl ch1.erl +% erl -compile ch1 +% erl -noshell -s ch1 main -s init stop +% + +-module (ch1). +-export ([main/0]). + +func ([]) -> ok; +func ([H|T]) -> + io:fwrite ("1023456~w~n", [H]), + func (T). + + +main () -> + func ([789, 798, 879, 897, 978]). + -- cgit