From e03a223c9705975f81d27416f5bbaafc3f2c5453 Mon Sep 17 00:00:00 2001
From: wiss <wiss@cin.ufpe.br>
Date: Thu, 29 Oct 2020 15:26:28 -0300
Subject: [PATCH] Quicksort haskell

---
 Sorting/quickSort/Haskell/quickSort.hs | 5 +++++
 1 file changed, 5 insertions(+)
 create mode 100644 Sorting/quickSort/Haskell/quickSort.hs

diff --git a/Sorting/quickSort/Haskell/quickSort.hs b/Sorting/quickSort/Haskell/quickSort.hs
new file mode 100644
index 000000000..5a73b3b91
--- /dev/null
+++ b/Sorting/quickSort/Haskell/quickSort.hs
@@ -0,0 +1,5 @@
+ordernar ::[Int] -> [Int]
+ordernar [] = []
+ordernar (s:xs) = ordernar [x|x <- xs, (digitsInt (show x)) < (digitsInt (show s))]
+                  ++ [s] ++
+                  ordernar [x|x <- xs, (digitsInt (show x)) >= (digitsInt (show s))]
\ No newline at end of file