RosettaCodeData/Task/Flatten-a-list/Erlang/flatten-a-list.erl

flatten([]) -> [];
flatten([H|T]) -> flatten(H) ++ flatten(T);
flatten(H) -> [H].