basic ocaml snippets