type named
type t
val typename_of_named : named Typerep_lib.Typename.t
val typename_of_t : t Typerep_lib.Typename.t
val witness : (t, named) Typerep_lib.Type_equal.t