updated comment

willdoescode · willdoescode · commit ac9367c7beb4 · 2021-01-29T23:08:18.000-08:00
diff --git a/src/Medium/SortList.hs b/src/Medium/SortList.hs
@@ -1,4 +1,6 @@
 module SortList ( sortList ) where
+
+-- Quick Sort
   
 sortList :: (Ord a) => [a] -> [a]
 sortList (x:xs) = sortList [y | y <- xs, y <= x] ++ [x] ++ sortList [y | y <- xs, y > x]
