Make_access4.1-T
type ('a, 'b, 'c, 'd) t
val many_getter : ('at -> 'a Many_getter.t) -> ('a, 'b, 'c, 'd) t -> ('at, 'bt, 'c, 'd) t