Article 2: tuples and lists

giorgiosironi · Sep 18, 2012 · 653bf7e · 653bf7e
1 parent 3d621bd
commit 653bf7e
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/head_tail.erl b/head_tail.erl
@@ -0,0 +1,6 @@
+#!/usr/bin/escript
+head([]) -> throw( error);
+head([Element | _Tail]) -> Element.
+
+main(_) -> io:format("Head of [1]: ~p~n", [head([1])]),
+           io:format("Head of [1, 2]: ~p~n", [head([1, 2])]).