nschmoller

zeroes 0 = []
zeroes n = [0] ++ (zeroes (n-1))

foo x y z= zipWith (+) (zipWith (+) x y) z

grid_neighbours l =
  let top = map inc_neighbours ( [(zeroes (length (head l)))] ++ (take (length l) l) )
      bottom = map inc_neighbours ((drop 1 l) ++ [(zeroes (length (head l)))])
      current = map neighbours l
  in zipWith3 foo top bottom current 

nschmoller

// Use Gists to store code you would like to remember later on
console.log(window); // log the "window" object to the console

nschmoller

Keybase proof

I hereby claim:

• I am nschmoller on github.
• I am nschmoller (https://keybase.io/nschmoller) on keybase.
• I have a public key ASC-c9G6wifSpMLu4jd53CaoJ8SANhSHutusGDpzpk03ygo

To claim this, I am signing this object: