summaryrefslogtreecommitdiff
path: root/h15.hs
diff options
context:
space:
mode:
authorJoe Zhao <ztuowen@gmail.com>2015-03-31 23:41:55 +0800
committerJoe Zhao <ztuowen@gmail.com>2015-03-31 23:41:55 +0800
commita9abc1da41b56edbed00081800382e854d6698d0 (patch)
tree5265cc1c5296768438b67299afd59bcc57c58f0c /h15.hs
parent378f6303e8860b7bbca7dea787d584a6728cebf1 (diff)
downloadh99-a9abc1da41b56edbed00081800382e854d6698d0.tar.gz
h99-a9abc1da41b56edbed00081800382e854d6698d0.tar.bz2
h99-a9abc1da41b56edbed00081800382e854d6698d0.zip
rename to H**, +31 +32 +33 +34 +35 +36
Diffstat (limited to 'h15.hs')
-rw-r--r--h15.hs11
1 files changed, 0 insertions, 11 deletions
diff --git a/h15.hs b/h15.hs
deleted file mode 100644
index a8f84c1..0000000
--- a/h15.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-import Control.Monad
-
-repli :: [a] -> [a]
-repli xs n = concatMap (replicate n) xs
-
-repli' = flip $ concatMap . replicate
-
-repli'' xs n = xs >>= replicate n
-
-repli''' [] _ = []
-repli''' (x:xs) n = foldr (const (x:)) (repli xs n) [1..n]