spyked bricks in the wall » snake http://lucian.mogosanu.ro/bricks on the internet, no one can hear you scream. Sun, 25 Jul 2010 17:09:40 +0000 http://wordpress.org/?v=2.9.2 en hourly 1 the badger, the mushroom, the snake and the haskell http://lucian.mogosanu.ro/bricks/the-badger-the-mushroom-the-snake-and-the-haskell/ http://lucian.mogosanu.ro/bricks/the-badger-the-mushroom-the-snake-and-the-haskell/#comments Tue, 22 Dec 2009 20:10:10 +0000 spyked http://lucian.mogosanu.ro/bricks/?p=1069 How they all fit together:

1
2
3
4
5
6
7
8

module Badger where
 
badger :: Int -> Int -> [String]
badger mushroom snake = badger' mushroom snake mushroom snake
    where
    badger' m s 0 s' = "Mushroom" : "Mushroom" : badger' m s m s'
    badger' m s m' 0 = "Snaaaaaaaaake" : badger' m s m s
    badger' m s m' s' = "Badger" : badger' m s (m' - 1) (s' - 1)

A Haskell 8-liner based on this short made by Weebl.

]]> http://lucian.mogosanu.ro/bricks/the-badger-the-mushroom-the-snake-and-the-haskell/feed/ 3