每个人都在各自的空间里狂悲狂喜，依旧无人喝彩。

-module(ex2).
-export([start/2]).

start(N,M)->
    statistics(runtime),
    statistics(wall_clock),
    L=create(N),
    post(L,M),
    {_,Time1} = statistics(runtime),
    {_,Time2} = statistics(wall_clock),
    io:format("total time: ~p(~p)ms~n",[Time1,Time2]).




create(N)->
    create(N,[]).

create(0,L)->
    L;
create(N,L)->
    Pid=spawn(fun loop/0),
    create(N-1,[Pid|L]).



loop()->
    receive
    cancel->
        void
end.





post(_,0)->
    void;
post(L,M) ->
    [A ! canel ||A<-L],
    post(L,M-1).