Vectorization of BitMap Images using the Portrace Algorithm in OCaml