val iter : 
  t ->
  external_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      'a ) ->
  bind_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      'b ) ->
  peer:
    ( ( [< `Read | `Set_and_create ],
        t,
        Network_peer.Peer.Stable.Latest.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Network_peer.Peer.Stable.Latest.t option ->
      'c ) ->
  libp2p_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      'd ) ->
  client_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      'e ) ->
  'fval fold : 
  t ->
  init:'a ->
  external_ip:
    ( 'b ->
      ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      'c ) ->
  bind_ip:
    ( 'd ->
      ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      'e ) ->
  peer:
    ( 'f ->
      ( [< `Read | `Set_and_create ],
        t,
        Network_peer.Peer.Stable.Latest.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Network_peer.Peer.Stable.Latest.t option ->
      'g ) ->
  libp2p_port:
    ( 'h ->
      ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      'i ) ->
  client_port:
    ( 'j ->
      ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      'k ) ->
  'lval for_all : 
  t ->
  external_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      bool ) ->
  bind_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      bool ) ->
  peer:
    ( ( [< `Read | `Set_and_create ],
        t,
        Network_peer.Peer.Stable.Latest.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Network_peer.Peer.Stable.Latest.t option ->
      bool ) ->
  libp2p_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      bool ) ->
  client_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      bool ) ->
  boolval exists : 
  t ->
  external_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      bool ) ->
  bind_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      bool ) ->
  peer:
    ( ( [< `Read | `Set_and_create ],
        t,
        Network_peer.Peer.Stable.Latest.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Network_peer.Peer.Stable.Latest.t option ->
      bool ) ->
  libp2p_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      bool ) ->
  client_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      bool ) ->
  boolval to_list : 
  t ->
  external_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      'a ) ->
  bind_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      'b ) ->
  peer:
    ( ( [< `Read | `Set_and_create ],
        t,
        Network_peer.Peer.Stable.Latest.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Network_peer.Peer.Stable.Latest.t option ->
      'c ) ->
  libp2p_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      'd ) ->
  client_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      'e ) ->
  'f listval map : 
  t ->
  external_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ) ->
  bind_ip:
    ( ( [< `Read | `Set_and_create ], t, Core.Unix.Inet_addr.Blocking_sexp.t )
        Fieldslib.Field.t_with_perm ->
      t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ->
      Core.Unix.Inet_addr.Blocking_sexp.t ) ->
  peer:
    ( ( [< `Read | `Set_and_create ],
        t,
        Network_peer.Peer.Stable.Latest.t option )
        Fieldslib.Field.t_with_perm ->
      t ->
      Network_peer.Peer.Stable.Latest.t option ->
      Network_peer.Peer.Stable.Latest.t option ) ->
  libp2p_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      int ) ->
  client_port:
    ( ( [< `Read | `Set_and_create ], t, int ) Fieldslib.Field.t_with_perm ->
      t ->
      int ->
      int ) ->
  t