sig
  type t = string
  type desc = Nolabel | Labelled of string | Optional of string
  val explode : Ast_convenience_402.Label.t -> Ast_convenience_402.Label.desc
  val nolabel : Ast_convenience_402.Label.t
  val labelled : string -> Ast_convenience_402.Label.t
  val optional : string -> Ast_convenience_402.Label.t
end