Fields (mina_state.Mina_state.Registers.Fields)

val names : string list

val local_state : 
  ( [< `Read | `Set_and_create ], ( 'a, 'b, 'local_state ) t, 'local_state0 )
    Fieldslib.Field.t_with_perm

val pending_coinbase_stack : 
  ( [< `Read | `Set_and_create ],
    ( 'a, 'pending_coinbase_stack, 'b ) t,
    'pending_coinbase_stack0 )
    Fieldslib.Field.t_with_perm

val ledger : 
  ( [< `Read | `Set_and_create ], ( 'ledger, 'a, 'b ) t, 'ledger0 )
    Fieldslib.Field.t_with_perm

val make_creator : 
  ledger:
    ( ( [< `Read | `Set_and_create ], ( 'a, 'b, 'c ) t, 'a )
        Fieldslib.Field.t_with_perm ->
      'd ->
      ( 'e -> 'f ) * 'g ) ->
  pending_coinbase_stack:
    ( ( [< `Read | `Set_and_create ], ( 'h, 'i, 'j ) t, 'i )
        Fieldslib.Field.t_with_perm ->
      'k ->
      ( 'l -> 'm ) * 'n ) ->
  local_state:
    ( ( [< `Read | `Set_and_create ], ( 'o, 'p, 'q ) t, 'q )
        Fieldslib.Field.t_with_perm ->
      'r ->
      ( 's -> 't ) * 'u ) ->
  'v ->
  ( 'w -> ( 'x, 'y, 'z ) t ) * 'a1

val create : 
  ledger:'a ->
  pending_coinbase_stack:'b ->
  local_state:'c ->
  ( 'd, 'e, 'f ) t

val map : 
  ledger:
    ( ( [< `Read | `Set_and_create ], ( 'a, 'b, 'c ) t, 'a )
        Fieldslib.Field.t_with_perm ->
      'd ) ->
  pending_coinbase_stack:
    ( ( [< `Read | `Set_and_create ], ( 'e, 'f, 'g ) t, 'f )
        Fieldslib.Field.t_with_perm ->
      'h ) ->
  local_state:
    ( ( [< `Read | `Set_and_create ], ( 'i, 'j, 'k ) t, 'k )
        Fieldslib.Field.t_with_perm ->
      'l ) ->
  ( 'm, 'n, 'o ) t

val iter : 
  ledger:
    ( ( [< `Read | `Set_and_create ], ( 'a, 'b, 'c ) t, 'a )
        Fieldslib.Field.t_with_perm ->
      unit ) ->
  pending_coinbase_stack:
    ( ( [< `Read | `Set_and_create ], ( 'd, 'e, 'f ) t, 'e )
        Fieldslib.Field.t_with_perm ->
      unit ) ->
  local_state:
    ( ( [< `Read | `Set_and_create ], ( 'g, 'h, 'i ) t, 'i )
        Fieldslib.Field.t_with_perm ->
      unit ) ->
  unit

val fold : 
  init:'a ->
  ledger:
    ( 'b ->
      ( [< `Read | `Set_and_create ], ( 'c, 'd, 'e ) t, 'c )
        Fieldslib.Field.t_with_perm ->
      'f ) ->
  pending_coinbase_stack:
    ( 'g ->
      ( [< `Read | `Set_and_create ], ( 'h, 'i, 'j ) t, 'i )
        Fieldslib.Field.t_with_perm ->
      'k ) ->
  local_state:
    ( 'l ->
      ( [< `Read | `Set_and_create ], ( 'm, 'n, 'o ) t, 'o )
        Fieldslib.Field.t_with_perm ->
      'p ) ->
  'q

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

val for_all : 
  ledger:
    ( ( [< `Read | `Set_and_create ], ( 'a, 'b, 'c ) t, 'a )
        Fieldslib.Field.t_with_perm ->
      bool ) ->
  pending_coinbase_stack:
    ( ( [< `Read | `Set_and_create ], ( 'd, 'e, 'f ) t, 'e )
        Fieldslib.Field.t_with_perm ->
      bool ) ->
  local_state:
    ( ( [< `Read | `Set_and_create ], ( 'g, 'h, 'i ) t, 'i )
        Fieldslib.Field.t_with_perm ->
      bool ) ->
  bool

val exists : 
  ledger:
    ( ( [< `Read | `Set_and_create ], ( 'a, 'b, 'c ) t, 'a )
        Fieldslib.Field.t_with_perm ->
      bool ) ->
  pending_coinbase_stack:
    ( ( [< `Read | `Set_and_create ], ( 'd, 'e, 'f ) t, 'e )
        Fieldslib.Field.t_with_perm ->
      bool ) ->
  local_state:
    ( ( [< `Read | `Set_and_create ], ( 'g, 'h, 'i ) t, 'i )
        Fieldslib.Field.t_with_perm ->
      bool ) ->
  bool

val to_list : 
  ledger:
    ( ( [< `Read | `Set_and_create ], ( 'a, 'b, 'c ) t, 'a )
        Fieldslib.Field.t_with_perm ->
      'd ) ->
  pending_coinbase_stack:
    ( ( [< `Read | `Set_and_create ], ( 'e, 'f, 'g ) t, 'f )
        Fieldslib.Field.t_with_perm ->
      'h ) ->
  local_state:
    ( ( [< `Read | `Set_and_create ], ( 'i, 'j, 'k ) t, 'k )
        Fieldslib.Field.t_with_perm ->
      'l ) ->
  'm list

module Direct : sig ... end