val local_state :
( [< `Read | `Set_and_create ], ( 'a, 'b, 'local_state ) t, 'local_state0 )
Fieldslib.Field.t_with_permval pending_coinbase_stack :
( [< `Read | `Set_and_create ],
( 'a, 'pending_coinbase_stack, 'b ) t,
'pending_coinbase_stack0 )
Fieldslib.Field.t_with_permval ledger :
( [< `Read | `Set_and_create ], ( 'ledger, 'a, 'b ) t, 'ledger0 )
Fieldslib.Field.t_with_permval 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 ) * 'a1val create :
ledger:'a ->
pending_coinbase_stack:'b ->
local_state:'c ->
( 'd, 'e, 'f ) tval 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 ) tval 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 ) ->
unitval 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 ) ->
'qval map_poly :
( [< `Read | `Set_and_create ], ( 'a, 'b, 'c ) t, 'd ) Fieldslib.Field.user ->
'e listval 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 ) ->
boolval 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 ) ->
boolval 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