accessor

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