add OCaml version of sekigae script