Module type Named_intf.S1

module type S1 = sig .. end

type 'a t 
val name : string