noodling around with ocaml