From 9c608c32a9387a1dd1cb045e5822733ad181ccf8 Mon Sep 17 00:00:00 2001 From: Determinant Date: Sun, 28 May 2017 20:29:11 -0400 Subject: finish vol 2 --- 11-20/14.hs | 4 ++++ 1 file changed, 4 insertions(+) create mode 100644 11-20/14.hs (limited to '11-20/14.hs') diff --git a/11-20/14.hs b/11-20/14.hs new file mode 100644 index 0000000..6071891 --- /dev/null +++ b/11-20/14.hs @@ -0,0 +1,4 @@ +dupli :: [a] -> [a] + +dupli [] = [] +dupli (x:xs) = x:x:(dupli xs) -- cgit v1.2.3-70-g09d2