Skip to content

Instantly share code, notes, and snippets.

@kunjee17

kunjee17/cgolf

Created September 6, 2013 08:48
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save kunjee17/6461226 to your computer and use it in GitHub Desktop.
Save kunjee17/6461226 to your computer and use it in GitHub Desktop.
Download ZIP
Game of life inf F#
Raw
cgolf
let f s g = g|>List.mapi(fun i x->match Seq.sumBy(fun o->
g.[abs((i+o)%(s*s))])[-1-s;-s;1-s;-1;1;-1+s;s;1+s]with 3->1|2->x|_->0)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment