S.I/Lisp/

FOREACH

=FOREACH(
    {1;2;3},
    INCREMENT)
-> {2;3;4}
        

DEFINE(
    FOREACH,
    LAMBDA(
        range,
        function_to_apply,
        MAP(
            range,
            function_to_apply)))
        

Help us optimize this function