%% quicksort:qsort(List) %% Sort a list of items -module(quicksort). -export([qsort/1]). qsort([]) -> []; qsort([Pivot|Rest]) -> qsort([ X || X <- Rest
元素的两个子序列,然后递归的排序这两个子序列,再将结果的两个排好序的子序列串接起来。 qsort(a) = if iseod(first a) then a else follow(qsort(b0), qsort(b1)) fi where p = a < first a; b0 = a whenever