Prime Factors - Ocaml | SlaveCode