val constructor_descrs :
  Types.type_expr ->
  (string * Types.type_expr list) list ->
  Asttypes.private_flag -> (string * Types.constructor_description) list
val exception_descr :
  Path.t -> Types.type_expr list -> Types.constructor_description
val label_descrs :
  Types.type_expr ->
  (string * Asttypes.mutable_flag * Types.type_expr) list ->
  Types.record_representation ->
  Asttypes.private_flag -> (string * Types.label_description) list
exception Constr_not_found
val find_constr_by_tag :
  Types.constructor_tag ->
  (string * Types.type_expr list) list -> string * Types.type_expr list