playing with ocaml