ocaml: update constants