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