sig
  val names : string list
  val error_msg : (Response.Tws_error.t, string) Fieldslib.Field.readonly_t
  val error_code : (Response.Tws_error.t, int) Fieldslib.Field.readonly_t
  val fold :
    init:'acc__ ->
    error_code:('acc__ ->
                (Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                'acc__) ->
    error_msg:('acc__ ->
               (Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
               'acc__) ->
    'acc__
  val iter :
    error_code:((Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                unit) ->
    error_msg:((Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
               unit) ->
    unit
  val for_all :
    error_code:((Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                bool) ->
    error_msg:((Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
               bool) ->
    bool
  val exists :
    error_code:((Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                bool) ->
    error_msg:((Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
               bool) ->
    bool
  val to_list :
    error_code:((Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                'elem__) ->
    error_msg:((Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
               'elem__) ->
    'elem__ list
  val map_poly :
    ([< `Read ], Response.Tws_error.t, 'x0) Fieldslib.Field.user -> 'x0 list
  module Direct :
    sig
      val iter :
        Response.Tws_error.t ->
        error_code:((Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                    Response.Tws_error.t -> int -> unit) ->
        error_msg:((Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
                   Response.Tws_error.t -> string -> unit) ->
        unit
      val fold :
        Response.Tws_error.t ->
        init:'acc__ ->
        error_code:('acc__ ->
                    (Response.Tws_error.t, int) Fieldslib.Field.readonly_t ->
                    Response.Tws_error.t -> int -> 'acc__) ->
        error_msg:('acc__ ->
                   (Response.Tws_error.t, string) Fieldslib.Field.readonly_t ->
                   Response.Tws_error.t -> string -> 'acc__) ->
        'acc__
    end
end