1 files changed, 0 insertions, 10 deletions
diff --git a/h17.hs b/h17.hs
deleted file mode 100644
index fa26f35..0000000
--- a/h17.hs
+++ /dev/null
@@ -1,10 +0,0 @@
-split :: [a] -> Int -> ([a],[a])
-split xs c = splitHelper [] xs c
-    where
-        splitHelper pre nxt 0 = (reverse pre, nxt)
-        splitHelper pre (x:nxt) c = splitHelper (x:pre) nxt (c-1)
-
-split' (x:xs) c | c>0 =
-    let (pre,nxt) = split' xs (c-1)
-        in (x:pre,nxt)
-split' xs _ = ([],xs)