Generation of accessor and iteration functions for ocaml variant types

Part of the Jane Street's PPX rewriters collection.
