Fields (mina_base.Mina_base.With

val names : string list

val status : 
  ( [< `Read | `Set_and_create ], 'a t, Transaction_status.t )
    Fieldslib.Field.t_with_perm

val data : 
  ( [< `Read | `Set_and_create ], 'a t, 'a0 ) Fieldslib.Field.t_with_perm

val make_creator : 
  data:
    ( ( [< `Read | `Set_and_create ], 'a t, 'a ) Fieldslib.Field.t_with_perm ->
      'b ->
      ( 'c -> 'd ) * 'e ) ->
  status:
    ( ( [< `Read | `Set_and_create ], 'f t, Transaction_status.t )
        Fieldslib.Field.t_with_perm ->
      'g ->
      ( 'h -> Transaction_status.t ) * 'i ) ->
  'j ->
  ( 'k -> 'l t ) * 'm

val create : data:'a -> status:Transaction_status.t -> 'b t

val map : 
  data:
    ( ( [< `Read | `Set_and_create ], 'a t, 'a ) Fieldslib.Field.t_with_perm ->
      'b ) ->
  status:
    ( ( [< `Read | `Set_and_create ], 'c t, Transaction_status.t )
        Fieldslib.Field.t_with_perm ->
      Transaction_status.t ) ->
  'd t

val iter : 
  data:
    ( ( [< `Read | `Set_and_create ], 'a t, 'a ) Fieldslib.Field.t_with_perm ->
      unit ) ->
  status:
    ( ( [< `Read | `Set_and_create ], 'b t, Transaction_status.t )
        Fieldslib.Field.t_with_perm ->
      unit ) ->
  unit

val fold : 
  init:'a ->
  data:
    ( 'b ->
      ( [< `Read | `Set_and_create ], 'c t, 'c ) Fieldslib.Field.t_with_perm ->
      'd ) ->
  status:
    ( 'e ->
      ( [< `Read | `Set_and_create ], 'f t, Transaction_status.t )
        Fieldslib.Field.t_with_perm ->
      'g ) ->
  'h

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

val for_all : 
  data:
    ( ( [< `Read | `Set_and_create ], 'a t, 'a ) Fieldslib.Field.t_with_perm ->
      bool ) ->
  status:
    ( ( [< `Read | `Set_and_create ], 'b t, Transaction_status.t )
        Fieldslib.Field.t_with_perm ->
      bool ) ->
  bool

val exists : 
  data:
    ( ( [< `Read | `Set_and_create ], 'a t, 'a ) Fieldslib.Field.t_with_perm ->
      bool ) ->
  status:
    ( ( [< `Read | `Set_and_create ], 'b t, Transaction_status.t )
        Fieldslib.Field.t_with_perm ->
      bool ) ->
  bool

val to_list : 
  data:
    ( ( [< `Read | `Set_and_create ], 'a t, 'a ) Fieldslib.Field.t_with_perm ->
      'b ) ->
  status:
    ( ( [< `Read | `Set_and_create ], 'c t, Transaction_status.t )
        Fieldslib.Field.t_with_perm ->
      'd ) ->
  'e list

module Direct : sig ... end