Direct (mina_base.Mina_base.Control.As

val iter : 
  t ->
  proof:
    ( ( [< `Read | `Set_and_create ], t, Pickles.Side_loaded.Proof.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Pickles.Side_loaded.Proof.t option ->
      'a ) ->
  signature:
    ( ( [< `Read | `Set_and_create ], t, Signature.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Signature.t option ->
      'b ) ->
  'c

val fold : 
  t ->
  init:'a ->
  proof:
    ( 'b ->
      ( [< `Read | `Set_and_create ], t, Pickles.Side_loaded.Proof.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Pickles.Side_loaded.Proof.t option ->
      'c ) ->
  signature:
    ( 'd ->
      ( [< `Read | `Set_and_create ], t, Signature.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Signature.t option ->
      'e ) ->
  'f

val for_all : 
  t ->
  proof:
    ( ( [< `Read | `Set_and_create ], t, Pickles.Side_loaded.Proof.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Pickles.Side_loaded.Proof.t option ->
      bool ) ->
  signature:
    ( ( [< `Read | `Set_and_create ], t, Signature.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Signature.t option ->
      bool ) ->
  bool

val exists : 
  t ->
  proof:
    ( ( [< `Read | `Set_and_create ], t, Pickles.Side_loaded.Proof.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Pickles.Side_loaded.Proof.t option ->
      bool ) ->
  signature:
    ( ( [< `Read | `Set_and_create ], t, Signature.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Signature.t option ->
      bool ) ->
  bool

val to_list : 
  t ->
  proof:
    ( ( [< `Read | `Set_and_create ], t, Pickles.Side_loaded.Proof.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Pickles.Side_loaded.Proof.t option ->
      'a ) ->
  signature:
    ( ( [< `Read | `Set_and_create ], t, Signature.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Signature.t option ->
      'b ) ->
  'c list

val map : 
  t ->
  proof:
    ( ( [< `Read | `Set_and_create ], t, Pickles.Side_loaded.Proof.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Pickles.Side_loaded.Proof.t option ->
      Pickles.Side_loaded.Proof.t option ) ->
  signature:
    ( ( [< `Read | `Set_and_create ], t, Signature.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Signature.t option ->
      Signature.t option ) ->
  t

val set_all_mutable_fields : 'a -> unit