Generation of accessor and iteration functions for ocaml variant types
