erlang:使用 fun 来编写一个成绩排序

-module(test).
-export([f/1]).

f(List)->
lists:foreach(funshow/1,lists:sort(fun({_,A},{_,B})-> A>B end,lists:map(funadd/1,List))).

show({Name,Grage})->
io:format("~-15w:~15w~n",[Name,Grage]).

add({Name,A,B})->
{Name,A+B}.

在这里是故意不对名字进行排序的，主要是为了_ 这个表示为空

 

结果:

 
1> c(test).
{ok,test}
2> test:f([{a,10,20},{b,20,30},{c,10,20}]).
b              :             50
c              :             30
a              :             30
ok
3>