Fields (pickles_base.Pickles_base.Side_loaded_verification

val names : string list

val h : ( 'a t, 'a ) Fieldslib.Field.t

val fold : 
  init:'acc__0 ->
  h:( 'acc__0 -> ( 'a t, 'a ) Fieldslib.Field.t -> 'acc__1 ) ->
  'acc__1

val make_creator : 
  h:
    ( ( 'a t, 'a ) Fieldslib.Field.t ->
      'acc__0 ->
      ( 'input__ -> 'a ) * 'acc__1 ) ->
  'acc__0 ->
  ( 'input__ -> 'a t ) * 'acc__1

val create : h:'a -> 'a t

val map : h:( ( 'a t, 'a ) Fieldslib.Field.t -> 'a ) -> 'a t

val iter : h:( ( 'a t, 'a ) Fieldslib.Field.t -> unit ) -> unit

val for_all : h:( ( 'a t, 'a ) Fieldslib.Field.t -> bool ) -> bool

val exists : h:( ( 'a t, 'a ) Fieldslib.Field.t -> bool ) -> bool

val to_list : h:( ( 'a t, 'a ) Fieldslib.Field.t -> 'elem__ ) -> 'elem__ list

val map_poly : 
  ( [< `Read | `Set_and_create ], 'a t, 'x0 ) Fieldslib.Field.user ->
  'x0 list

module Direct : sig ... end