X : Named_intf.S1
val named : 'a Std_internal.Typerep.t ‑> 'a X.t Std_internal.Typerep.Named.t
val typename_of_t : 'a Typename.t ‑> 'a X.t Typename.t