-module(qsort).
-export([qsort1/1]).
qsort1([]) -> [];
qsort1([Pivor|T]) ->
qsort1([X || X <- T , X < Pivor]) ++
[Pivor] ++
qsort1([X || X <- T , X >= Pivor]).
快速排序
最新推荐文章于 2021-11-19 16:57:43 发布
-module(qsort).
-export([qsort1/1]).
qsort1([]) -> [];
qsort1([Pivor|T]) ->
qsort1([X || X <- T , X < Pivor]) ++
[Pivor] ++
qsort1([X || X <- T , X >= Pivor]).