Module Field.Make_access

Parameters

Signature

val access : ('i -> 'a -> 'b'it -> 'at -> 'bt[> Subtyping.field ]) accessor -> ('i Index.t * 'a'b) T.t -> ('it Index.t * 'at'bt) T.t