mp.erl
mp.erl — 1 KB
Continguts del fitxer
-module (mp). -export ([map /2, map /3]). map (_, []) -> []; map (F, [H|T]) -> [F(H)| map(F, T)]. map (_, [], R) -> lists : reverse (R); map (F, [H|T], R) -> map(F, T, [F(H)|R]).
mp.erl — 1 KB
-module (mp). -export ([map /2, map /3]). map (_, []) -> []; map (F, [H|T]) -> [F(H)| map(F, T)]. map (_, [], R) -> lists : reverse (R); map (F, [H|T], R) -> map(F, T, [F(H)|R]).