Direct (mina_transaction_logic.Mina_transaction_logic.Zkapp_command_logic.Local

val iter : 
  ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
  stack_frame:
    ( ( [< `Read | `Set_and_create ],
        ( 'j, 'k, 'l, 'm, 'n, 'o, 'p, 'q, 'r ) t,
        'j )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      's ->
      't ) ->
  call_stack:
    ( ( [< `Read | `Set_and_create ],
        ( 'u, 'v, 'w, 'x, 'y, 'z, 'a1, 'b1, 'c1 ) t,
        'v )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'd1 ->
      'e1 ) ->
  transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'f1, 'g1, 'h1, 'i1, 'j1, 'k1, 'l1, 'm1, 'n1 ) t,
        'l1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'o1 ->
      'p1 ) ->
  full_transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'q1, 'r1, 's1, 't1, 'u1, 'v1, 'w1, 'x1, 'y1 ) t,
        'w1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'z1 ->
      'a2 ) ->
  token_id:
    ( ( [< `Read | `Set_and_create ],
        ( 'b2, 'c2, 'd2, 'e2, 'f2, 'g2, 'h2, 'i2, 'j2 ) t,
        'd2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'k2 ->
      'l2 ) ->
  excess:
    ( ( [< `Read | `Set_and_create ],
        ( 'm2, 'n2, 'o2, 'p2, 'q2, 'r2, 's2, 't2, 'u2 ) t,
        'p2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'v2 ->
      'w2 ) ->
  supply_increase:
    ( ( [< `Read | `Set_and_create ],
        ( 'x2, 'y2, 'z2, 'a3, 'b3, 'c3, 'd3, 'e3, 'f3 ) t,
        'a3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'g3 ->
      'h3 ) ->
  ledger:
    ( ( [< `Read | `Set_and_create ],
        ( 'i3, 'j3, 'k3, 'l3, 'm3, 'n3, 'o3, 'p3, 'q3 ) t,
        'm3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'r3 ->
      's3 ) ->
  success:
    ( ( [< `Read | `Set_and_create ],
        ( 't3, 'u3, 'v3, 'w3, 'x3, 'y3, 'z3, 'a4, 'b4 ) t,
        'y3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'c4 ->
      'd4 ) ->
  account_update_index:
    ( ( [< `Read | `Set_and_create ],
        ( 'e4, 'f4, 'g4, 'h4, 'i4, 'j4, 'k4, 'l4, 'm4 ) t,
        'l4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'n4 ->
      'o4 ) ->
  failure_status_tbl:
    ( ( [< `Read | `Set_and_create ],
        ( 'p4, 'q4, 'r4, 's4, 't4, 'u4, 'v4, 'w4, 'x4 ) t,
        'x4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'y4 ->
      'z4 ) ->
  'a5

val fold : 
  ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
  init:'j ->
  stack_frame:
    ( 'k ->
      ( [< `Read | `Set_and_create ],
        ( 'l, 'm, 'n, 'o, 'p, 'q, 'r, 's, 't ) t,
        'l )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'u ->
      'v ) ->
  call_stack:
    ( 'w ->
      ( [< `Read | `Set_and_create ],
        ( 'x, 'y, 'z, 'a1, 'b1, 'c1, 'd1, 'e1, 'f1 ) t,
        'y )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'g1 ->
      'h1 ) ->
  transaction_commitment:
    ( 'i1 ->
      ( [< `Read | `Set_and_create ],
        ( 'j1, 'k1, 'l1, 'm1, 'n1, 'o1, 'p1, 'q1, 'r1 ) t,
        'p1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      's1 ->
      't1 ) ->
  full_transaction_commitment:
    ( 'u1 ->
      ( [< `Read | `Set_and_create ],
        ( 'v1, 'w1, 'x1, 'y1, 'z1, 'a2, 'b2, 'c2, 'd2 ) t,
        'b2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'e2 ->
      'f2 ) ->
  token_id:
    ( 'g2 ->
      ( [< `Read | `Set_and_create ],
        ( 'h2, 'i2, 'j2, 'k2, 'l2, 'm2, 'n2, 'o2, 'p2 ) t,
        'j2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'q2 ->
      'r2 ) ->
  excess:
    ( 's2 ->
      ( [< `Read | `Set_and_create ],
        ( 't2, 'u2, 'v2, 'w2, 'x2, 'y2, 'z2, 'a3, 'b3 ) t,
        'w2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'c3 ->
      'd3 ) ->
  supply_increase:
    ( 'e3 ->
      ( [< `Read | `Set_and_create ],
        ( 'f3, 'g3, 'h3, 'i3, 'j3, 'k3, 'l3, 'm3, 'n3 ) t,
        'i3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'o3 ->
      'p3 ) ->
  ledger:
    ( 'q3 ->
      ( [< `Read | `Set_and_create ],
        ( 'r3, 's3, 't3, 'u3, 'v3, 'w3, 'x3, 'y3, 'z3 ) t,
        'v3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'a4 ->
      'b4 ) ->
  success:
    ( 'c4 ->
      ( [< `Read | `Set_and_create ],
        ( 'd4, 'e4, 'f4, 'g4, 'h4, 'i4, 'j4, 'k4, 'l4 ) t,
        'i4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'm4 ->
      'n4 ) ->
  account_update_index:
    ( 'o4 ->
      ( [< `Read | `Set_and_create ],
        ( 'p4, 'q4, 'r4, 's4, 't4, 'u4, 'v4, 'w4, 'x4 ) t,
        'w4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'y4 ->
      'z4 ) ->
  failure_status_tbl:
    ( 'a5 ->
      ( [< `Read | `Set_and_create ],
        ( 'b5, 'c5, 'd5, 'e5, 'f5, 'g5, 'h5, 'i5, 'j5 ) t,
        'j5 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'k5 ->
      'l5 ) ->
  'm5

val for_all : 
  ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
  stack_frame:
    ( ( [< `Read | `Set_and_create ],
        ( 'j, 'k, 'l, 'm, 'n, 'o, 'p, 'q, 'r ) t,
        'j )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      's ->
      bool ) ->
  call_stack:
    ( ( [< `Read | `Set_and_create ],
        ( 't, 'u, 'v, 'w, 'x, 'y, 'z, 'a1, 'b1 ) t,
        'u )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'c1 ->
      bool ) ->
  transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'd1, 'e1, 'f1, 'g1, 'h1, 'i1, 'j1, 'k1, 'l1 ) t,
        'j1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'm1 ->
      bool ) ->
  full_transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'n1, 'o1, 'p1, 'q1, 'r1, 's1, 't1, 'u1, 'v1 ) t,
        't1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'w1 ->
      bool ) ->
  token_id:
    ( ( [< `Read | `Set_and_create ],
        ( 'x1, 'y1, 'z1, 'a2, 'b2, 'c2, 'd2, 'e2, 'f2 ) t,
        'z1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'g2 ->
      bool ) ->
  excess:
    ( ( [< `Read | `Set_and_create ],
        ( 'h2, 'i2, 'j2, 'k2, 'l2, 'm2, 'n2, 'o2, 'p2 ) t,
        'k2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'q2 ->
      bool ) ->
  supply_increase:
    ( ( [< `Read | `Set_and_create ],
        ( 'r2, 's2, 't2, 'u2, 'v2, 'w2, 'x2, 'y2, 'z2 ) t,
        'u2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'a3 ->
      bool ) ->
  ledger:
    ( ( [< `Read | `Set_and_create ],
        ( 'b3, 'c3, 'd3, 'e3, 'f3, 'g3, 'h3, 'i3, 'j3 ) t,
        'f3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'k3 ->
      bool ) ->
  success:
    ( ( [< `Read | `Set_and_create ],
        ( 'l3, 'm3, 'n3, 'o3, 'p3, 'q3, 'r3, 's3, 't3 ) t,
        'q3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'u3 ->
      bool ) ->
  account_update_index:
    ( ( [< `Read | `Set_and_create ],
        ( 'v3, 'w3, 'x3, 'y3, 'z3, 'a4, 'b4, 'c4, 'd4 ) t,
        'c4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'e4 ->
      bool ) ->
  failure_status_tbl:
    ( ( [< `Read | `Set_and_create ],
        ( 'f4, 'g4, 'h4, 'i4, 'j4, 'k4, 'l4, 'm4, 'n4 ) t,
        'n4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'o4 ->
      bool ) ->
  bool

val exists : 
  ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
  stack_frame:
    ( ( [< `Read | `Set_and_create ],
        ( 'j, 'k, 'l, 'm, 'n, 'o, 'p, 'q, 'r ) t,
        'j )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      's ->
      bool ) ->
  call_stack:
    ( ( [< `Read | `Set_and_create ],
        ( 't, 'u, 'v, 'w, 'x, 'y, 'z, 'a1, 'b1 ) t,
        'u )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'c1 ->
      bool ) ->
  transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'd1, 'e1, 'f1, 'g1, 'h1, 'i1, 'j1, 'k1, 'l1 ) t,
        'j1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'm1 ->
      bool ) ->
  full_transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'n1, 'o1, 'p1, 'q1, 'r1, 's1, 't1, 'u1, 'v1 ) t,
        't1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'w1 ->
      bool ) ->
  token_id:
    ( ( [< `Read | `Set_and_create ],
        ( 'x1, 'y1, 'z1, 'a2, 'b2, 'c2, 'd2, 'e2, 'f2 ) t,
        'z1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'g2 ->
      bool ) ->
  excess:
    ( ( [< `Read | `Set_and_create ],
        ( 'h2, 'i2, 'j2, 'k2, 'l2, 'm2, 'n2, 'o2, 'p2 ) t,
        'k2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'q2 ->
      bool ) ->
  supply_increase:
    ( ( [< `Read | `Set_and_create ],
        ( 'r2, 's2, 't2, 'u2, 'v2, 'w2, 'x2, 'y2, 'z2 ) t,
        'u2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'a3 ->
      bool ) ->
  ledger:
    ( ( [< `Read | `Set_and_create ],
        ( 'b3, 'c3, 'd3, 'e3, 'f3, 'g3, 'h3, 'i3, 'j3 ) t,
        'f3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'k3 ->
      bool ) ->
  success:
    ( ( [< `Read | `Set_and_create ],
        ( 'l3, 'm3, 'n3, 'o3, 'p3, 'q3, 'r3, 's3, 't3 ) t,
        'q3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'u3 ->
      bool ) ->
  account_update_index:
    ( ( [< `Read | `Set_and_create ],
        ( 'v3, 'w3, 'x3, 'y3, 'z3, 'a4, 'b4, 'c4, 'd4 ) t,
        'c4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'e4 ->
      bool ) ->
  failure_status_tbl:
    ( ( [< `Read | `Set_and_create ],
        ( 'f4, 'g4, 'h4, 'i4, 'j4, 'k4, 'l4, 'm4, 'n4 ) t,
        'n4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'o4 ->
      bool ) ->
  bool

val to_list : 
  ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
  stack_frame:
    ( ( [< `Read | `Set_and_create ],
        ( 'j, 'k, 'l, 'm, 'n, 'o, 'p, 'q, 'r ) t,
        'j )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      's ->
      't ) ->
  call_stack:
    ( ( [< `Read | `Set_and_create ],
        ( 'u, 'v, 'w, 'x, 'y, 'z, 'a1, 'b1, 'c1 ) t,
        'v )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'd1 ->
      'e1 ) ->
  transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'f1, 'g1, 'h1, 'i1, 'j1, 'k1, 'l1, 'm1, 'n1 ) t,
        'l1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'o1 ->
      'p1 ) ->
  full_transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'q1, 'r1, 's1, 't1, 'u1, 'v1, 'w1, 'x1, 'y1 ) t,
        'w1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'z1 ->
      'a2 ) ->
  token_id:
    ( ( [< `Read | `Set_and_create ],
        ( 'b2, 'c2, 'd2, 'e2, 'f2, 'g2, 'h2, 'i2, 'j2 ) t,
        'd2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'k2 ->
      'l2 ) ->
  excess:
    ( ( [< `Read | `Set_and_create ],
        ( 'm2, 'n2, 'o2, 'p2, 'q2, 'r2, 's2, 't2, 'u2 ) t,
        'p2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'v2 ->
      'w2 ) ->
  supply_increase:
    ( ( [< `Read | `Set_and_create ],
        ( 'x2, 'y2, 'z2, 'a3, 'b3, 'c3, 'd3, 'e3, 'f3 ) t,
        'a3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'g3 ->
      'h3 ) ->
  ledger:
    ( ( [< `Read | `Set_and_create ],
        ( 'i3, 'j3, 'k3, 'l3, 'm3, 'n3, 'o3, 'p3, 'q3 ) t,
        'm3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'r3 ->
      's3 ) ->
  success:
    ( ( [< `Read | `Set_and_create ],
        ( 't3, 'u3, 'v3, 'w3, 'x3, 'y3, 'z3, 'a4, 'b4 ) t,
        'y3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'c4 ->
      'd4 ) ->
  account_update_index:
    ( ( [< `Read | `Set_and_create ],
        ( 'e4, 'f4, 'g4, 'h4, 'i4, 'j4, 'k4, 'l4, 'm4 ) t,
        'l4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'n4 ->
      'o4 ) ->
  failure_status_tbl:
    ( ( [< `Read | `Set_and_create ],
        ( 'p4, 'q4, 'r4, 's4, 't4, 'u4, 'v4, 'w4, 'x4 ) t,
        'x4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'y4 ->
      'z4 ) ->
  'a5 list

val map : 
  ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
  stack_frame:
    ( ( [< `Read | `Set_and_create ],
        ( 'j, 'k, 'l, 'm, 'n, 'o, 'p, 'q, 'r ) t,
        'j )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      's ->
      't ) ->
  call_stack:
    ( ( [< `Read | `Set_and_create ],
        ( 'u, 'v, 'w, 'x, 'y, 'z, 'a1, 'b1, 'c1 ) t,
        'v )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'd1 ->
      'e1 ) ->
  transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'f1, 'g1, 'h1, 'i1, 'j1, 'k1, 'l1, 'm1, 'n1 ) t,
        'l1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'o1 ->
      'p1 ) ->
  full_transaction_commitment:
    ( ( [< `Read | `Set_and_create ],
        ( 'q1, 'r1, 's1, 't1, 'u1, 'v1, 'w1, 'x1, 'y1 ) t,
        'w1 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'z1 ->
      'a2 ) ->
  token_id:
    ( ( [< `Read | `Set_and_create ],
        ( 'b2, 'c2, 'd2, 'e2, 'f2, 'g2, 'h2, 'i2, 'j2 ) t,
        'd2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'k2 ->
      'l2 ) ->
  excess:
    ( ( [< `Read | `Set_and_create ],
        ( 'm2, 'n2, 'o2, 'p2, 'q2, 'r2, 's2, 't2, 'u2 ) t,
        'p2 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'v2 ->
      'w2 ) ->
  supply_increase:
    ( ( [< `Read | `Set_and_create ],
        ( 'x2, 'y2, 'z2, 'a3, 'b3, 'c3, 'd3, 'e3, 'f3 ) t,
        'a3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'g3 ->
      'h3 ) ->
  ledger:
    ( ( [< `Read | `Set_and_create ],
        ( 'i3, 'j3, 'k3, 'l3, 'm3, 'n3, 'o3, 'p3, 'q3 ) t,
        'm3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'r3 ->
      's3 ) ->
  success:
    ( ( [< `Read | `Set_and_create ],
        ( 't3, 'u3, 'v3, 'w3, 'x3, 'y3, 'z3, 'a4, 'b4 ) t,
        'y3 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'c4 ->
      'd4 ) ->
  account_update_index:
    ( ( [< `Read | `Set_and_create ],
        ( 'e4, 'f4, 'g4, 'h4, 'i4, 'j4, 'k4, 'l4, 'm4 ) t,
        'l4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'n4 ->
      'o4 ) ->
  failure_status_tbl:
    ( ( [< `Read | `Set_and_create ],
        ( 'p4, 'q4, 'r4, 's4, 't4, 'u4, 'v4, 'w4, 'x4 ) t,
        'x4 )
        Fieldslib.Field.t_with_perm ->
      ( 'a, 'b, 'c, 'd, 'e, 'f, 'g, 'h, 'i ) t ->
      'y4 ->
      'z4 ) ->
  ( 'a5, 'b5, 'c5, 'd5, 'e5, 'f5, 'g5, 'h5, 'i5 ) t

val set_all_mutable_fields : 'a -> unit