Just playing around, learning some OCaml.