Make_access3.1-T
type ('a, 'b, 'c) t
val mapper : ('at -> f:('a -> 'b) -> 'bt) -> ('a, 'b, 'c) t -> ('at, 'bt, 'c) t