Falling back to pre-odoc.2.2.0 documentation page...
val fold : init:'acc__0 -> name:( 'acc__0 -> ( t, Base.String.t ) Fieldslib.Field.t -> 'acc__1 ) -> doc:( 'acc__1 -> ( t, Base.String.t ) Fieldslib.Field.t -> 'acc__2 ) -> aliases: ( 'acc__2 -> ( t, Base.String.t Base.List.t ) Fieldslib.Field.t -> 'acc__3 ) -> 'acc__3
val make_creator : name: ( ( t, Base.String.t ) Fieldslib.Field.t -> 'acc__0 -> ( 'input__ -> Base.String.t ) * 'acc__1 ) -> doc: ( ( t, Base.String.t ) Fieldslib.Field.t -> 'acc__1 -> ( 'input__ -> Base.String.t ) * 'acc__2 ) -> aliases: ( ( t, Base.String.t Base.List.t ) Fieldslib.Field.t -> 'acc__2 -> ( 'input__ -> Base.String.t Base.List.t ) * 'acc__3 ) -> 'acc__0 -> ( 'input__ -> t ) * 'acc__3
val create : name:Base.String.t -> doc:Base.String.t -> aliases:Base.String.t Base.List.t -> t
val to_list : name:( ( t, Base.String.t ) Fieldslib.Field.t -> 'elem__ ) -> doc:( ( t, Base.String.t ) Fieldslib.Field.t -> 'elem__ ) -> aliases:( ( t, Base.String.t Base.List.t ) Fieldslib.Field.t -> 'elem__ ) -> 'elem__ Base.List.t
val map_poly : ( [< `Read | `Set_and_create ], t, 'x0 ) Fieldslib.Field.user -> 'x0 Base.List.t
module Direct : sig ... end