F#도 퀵소트 예쁘게 나옴

[CS(tkfkzo)]

let rec qsort l =

match l with

| [] -> []

| x::xs ->

let less =

xs

|> List.filter (fun e -> e < x)

|> qsort

let greater =

xs

|> List.filter (fun e -> e > x)

|> qsort

List.concat [less; [x]; greater]

파이프 파이프

[익명(211.109)]

흐름은 동일한 것 같은데 예쁘지는 않네요..

[커헠(msca8h)]

오 쩐다 - return 0;