ocaml coding test