val iter :
'controller t ->
edit_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
send:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
receive:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
set_delegate:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
set_permissions:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
set_verification_key:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
set_zkapp_uri:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
edit_sequence_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
set_token_symbol:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
increment_nonce:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
set_voting_for:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
unit ) ->
unit
val fold :
'controller t ->
init:'acc__0 ->
edit_state:
( 'acc__0 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__1 ) ->
send:
( 'acc__1 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__2 ) ->
receive:
( 'acc__2 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__3 ) ->
set_delegate:
( 'acc__3 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__4 ) ->
set_permissions:
( 'acc__4 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__5 ) ->
set_verification_key:
( 'acc__5 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__6 ) ->
set_zkapp_uri:
( 'acc__6 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__7 ) ->
edit_sequence_state:
( 'acc__7 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__8 ) ->
set_token_symbol:
( 'acc__8 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__9 ) ->
increment_nonce:
( 'acc__9 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__10 ) ->
set_voting_for:
( 'acc__10 ->
( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'acc__11 ) ->
'acc__11
val for_all :
'controller t ->
edit_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
send:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
receive:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_delegate:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_permissions:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_verification_key:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_zkapp_uri:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
edit_sequence_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_token_symbol:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
increment_nonce:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_voting_for:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
bool
val exists :
'controller t ->
edit_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
send:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
receive:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_delegate:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_permissions:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_verification_key:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_zkapp_uri:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
edit_sequence_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_token_symbol:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
increment_nonce:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
set_voting_for:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
bool ) ->
bool
val to_list :
'controller t ->
edit_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
send:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
receive:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
set_delegate:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
set_permissions:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
set_verification_key:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
set_zkapp_uri:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
edit_sequence_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
set_token_symbol:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
increment_nonce:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
set_voting_for:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'elem__ ) ->
'elem__ list
val map :
'controller t ->
edit_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
send:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
receive:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
set_delegate:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
set_permissions:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
set_verification_key:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
set_zkapp_uri:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
edit_sequence_state:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
set_token_symbol:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
increment_nonce:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
set_voting_for:
( ( 'controller t, 'controller ) Fieldslib.Field.t ->
'controller t ->
'controller ->
'controller ) ->
'controller t
val set_all_mutable_fields : 'controller t -> unit