summaryrefslogtreecommitdiff
path: root/quicksort.hs
diff options
context:
space:
mode:
authorJed Barber <jjbarber@y7mail.com>2015-10-17 14:20:48 +1100
committerJed Barber <jjbarber@y7mail.com>2015-10-17 14:20:48 +1100
commit63c3043200de6b28a8c192f1b5625940435ea55e (patch)
treeab761edbbc71b2b2f28e0ef7e10b8adc58d44320 /quicksort.hs
parent5933f248c18914fbbce03102b340361a575eae3c (diff)
Organised source code a bit, added makefile with clean target
Diffstat (limited to 'quicksort.hs')
-rw-r--r--quicksort.hs12
1 files changed, 0 insertions, 12 deletions
diff --git a/quicksort.hs b/quicksort.hs
deleted file mode 100644
index 78330f3..0000000
--- a/quicksort.hs
+++ /dev/null
@@ -1,12 +0,0 @@
-
-
-
-quickSort :: Ord a => [a] -> [a]
-quickSort [] = []
-quickSort (x:xs) =
- let less = [ a | a <- xs, a < x ]
- equal = [ b | b <- (x:xs), b == x ]
- greater = [ c | c <- xs, c > x ]
- in quickSort less ++ equal ++ quickSort greater
-
-