sig
  val iter :
    Tws.Trade.t ->
    stamp:((Tws.Trade.t, Core.Std.Time.t) Fieldslib.Field.readonly_t ->
           Tws.Trade.t -> Core.Std.Time.t -> unit) ->
    price:((Tws.Trade.t, Price.t) Fieldslib.Field.readonly_t ->
           Tws.Trade.t -> Price.t -> unit) ->
    size:((Tws.Trade.t, Volume.t) Fieldslib.Field.readonly_t ->
          Tws.Trade.t -> Volume.t -> unit) ->
    unit
  val fold :
    Tws.Trade.t ->
    init:'acc__ ->
    stamp:('acc__ ->
           (Tws.Trade.t, Core.Std.Time.t) Fieldslib.Field.readonly_t ->
           Tws.Trade.t -> Core.Std.Time.t -> 'acc__) ->
    price:('acc__ ->
           (Tws.Trade.t, Price.t) Fieldslib.Field.readonly_t ->
           Tws.Trade.t -> Price.t -> 'acc__) ->
    size:('acc__ ->
          (Tws.Trade.t, Volume.t) Fieldslib.Field.readonly_t ->
          Tws.Trade.t -> Volume.t -> 'acc__) ->
    'acc__
end