qsort.hs - haskell - Some Haskell experiments, mostly a raytracer

summary refs log tree commit diff stats

path: root/qsort.hs

blob: f349b826bd921cc0f7a13524029e8046e59eb247 (plain)

1
2
3

qsort (x:xs) = qsort ( filter (< x) xs)  ++ [x] ++ qsort ( filter (> x) xs )
qsort [] = []