-module(fun).
-compile(export_all).

compute_square(L) ->
    lists:map(fun (X) -> X*X end,L).

test() ->
    [1,4,9] = compute_square([1,2,3]),
    ok.