-module(quicksort).
-compile(export_all).

sort([]) ->
    [];
sort([H | T]) ->
    lists:append(
      [sort([X || X<-T, X=<H]),
       [H],
       sort([X || X<-T, X>=H])
      ]
     ).