Mercurial > hg > toys

changeset 24:7bcb491ce57e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
catalan: new toy
author Jordi Gutiérrez Hermoso <jordigh@octave.org>
date Mon, 27 Apr 2015 17:28:13 -0400
parents d0d6e77cb496
children af24a1a7194b
files haskell/catalan.hs
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
new file mode 100644
--- /dev/null
+++ b/haskell/catalan.hs
@@ -0,0 +1,4 @@
+import Data.List
+
+catalan :: [Integer]
+catalan = 1:[sum $ zipWith (*) c (reverse c) | c <- tail.inits $ catalan]