Identifiermodule Atom : sig ... endmodule Chain : sig ... endtype 'a t = string option * 'a Chain.ttype _t = string option * Chain._tval parse_ident : (string, unit) MParser.tval parse_lowercase_ident : (string, unit) MParser.tval parse_capitalized_ident : (string, unit) MParser.tval of_string : string -> _tval pp : 'a t Containers.Format.printerval _pp : _t Containers.Format.printerval lib : 'a t -> string option