Parameter Make_access3.1-T

type ('a, 'b, 'c) t
val nonempty : ('at -> ('bt'a'b) Accessor.Nonempty.t) -> ('a'b'c) t -> ('at'bt'c) t