关于排序和其他

%%以下是erlang程序设计上的例子

%%感叹一句,如此简洁的排序啊……

lib_misc.erl

qsort([])->[];

qsort([Pivot|T])->

  qsort([X||X<-T,X<Pivot])

  ++[Pivot]++

%% ++ 在这里起连接列表的作用,不是其他语言中的++

  qsort([X||X<-T,X>=Pivot]).

%%变位词

perms([])->[[]];

perms(L)->[[H|T]||H<-L,T<-perms(L--[H])].%% -- 表示分离

%%虽然不如第一个好,真搞不懂编译器是怎么工作的……,为何设计成这样子

posted on 2011-05-06 13:15  songqiuming  阅读(183)  评论(0编辑  收藏  举报

导航