accessor

A library that makes it nicer to work with nested functional data structures
IN THIS PACKAGE
Parameter #1 Accessor . Nonempty . Make_access4 . T
type ('a, 'b, 'c, 'd) t
val nonempty : ( 'at -> ( 'bt, 'a, 'b ) Nonempty.t ) -> ( 'a, 'b, 'c, 'd ) t -> ( 'at, 'bt, 'c, 'd ) t