ocaml code edits! is this a first :-P