Module type Functor.Basic2

module type Basic2 = sig .. end

type ('_, '_) t 
val map : ('a -> 'b) -> ('p, 'a) t -> ('p, 'b) t