Some simple OCaml Scripts