A Pokemon implementation in OCaml - View it on GitHub