functor (X : Named_intf.S1) -> sig val typerep_of_t : 'a Std_internal.Typerep.t -> 'a X.t Std_internal.Typerep.t val typename_of_t : 'a Typename.t -> 'a X.t Typename.t end