Testing map timing

test.erl

-module(test).

-compile([export_all]).

map_time() ->
    Map = #{a => true,
            b => true,
            c => true,
            p => true,
            e => true,
            x => true},

    TestList = [a, b, c, c, d, a, a, b, c, c, d, a, a, b, c, c, d, a,
                e, f, g, h, i, i, j, k, c, c, l, l, a, p, o, m, d, a],

    Counter = lists:seq(0, 20000),

    Start = os:timestamp(),

    [begin
        lists:filter(
            fun(I) ->
                maps:is_key(I, Map)
            end, TestList)
    end || _ <- Counter],

    End = os:timestamp(),

    io:format(user, "Took ~pms to run~n", [timer:now_diff(End,Start) / 1000]).