OCaml:在OCaml中实现的算法