gistfile1.hs

mapList foo (h:hs) = foo(h):mapList foo hs 
mapList foo [] = []

-- last pattern is empty list
-- no imports / exports needed
-- single var assignment
-- type sefe ? type inference

data BookInfo = Book Int String [String]
                deriving (Show)

bookID      (Book id _ _     ) = id
bookTitle   (Book _ title _  ) = title
bookAuthors (Book _ _ authors) = authors

-- "_" wildcard same as in Erlang

gistfile2.hrl

-module(test).
-export([mapList/2]).

mapList(F, [H | T]) -> [ F(H) | mapList(F, T) ]; 
mapList(F, []) -> [].

% last pattern is empty list
% imports / exports in module
% single var assignment
% usage:  fib:mapList(fun(X) -> X+1 end, [1,2,3]).   => [2,3,4]
% dynamic typing, type unsafe ? 

{book, { _ , Title, _ }} = {book, { 1, "BigOne", ["srsly? ", "yes"]} }.

% same wildcard "_"