Jane Street interview question

Write functions on binary trees in OCaml.