Extraction to OCamlΒΆ

TODO