sig
module Type :
sig
type t = Bid | Ask | Last | Volume
val t_of_sexp : Sexplib.Sexp.t -> Response.Tick_size.Type.t
val sexp_of_t : Response.Tick_size.Type.t -> Sexplib.Sexp.t
end
type t = private {
tick_type : Response.Tick_size.Type.t;
size : Volume.t;
}
val size : Response.Tick_size.t -> Volume.t
val tick_type : Response.Tick_size.t -> Response.Tick_size.Type.t
module Fields :
sig
val names : string list
val size : (Response.Tick_size.t, Volume.t) Fieldslib.Field.readonly_t
val tick_type :
(Response.Tick_size.t, Response.Tick_size.Type.t)
Fieldslib.Field.readonly_t
val fold :
init:'acc__ ->
tick_type:('acc__ ->
(Response.Tick_size.t, Response.Tick_size.Type.t)
Fieldslib.Field.readonly_t -> 'acc__) ->
size:('acc__ ->
(Response.Tick_size.t, Volume.t) Fieldslib.Field.readonly_t ->
'acc__) ->
'acc__
val iter :
tick_type:((Response.Tick_size.t, Response.Tick_size.Type.t)
Fieldslib.Field.readonly_t -> unit) ->
size:((Response.Tick_size.t, Volume.t) Fieldslib.Field.readonly_t ->
unit) ->
unit
val for_all :
tick_type:((Response.Tick_size.t, Response.Tick_size.Type.t)
Fieldslib.Field.readonly_t -> bool) ->
size:((Response.Tick_size.t, Volume.t) Fieldslib.Field.readonly_t ->
bool) ->
bool
val exists :
tick_type:((Response.Tick_size.t, Response.Tick_size.Type.t)
Fieldslib.Field.readonly_t -> bool) ->
size:((Response.Tick_size.t, Volume.t) Fieldslib.Field.readonly_t ->
bool) ->
bool
val to_list :
tick_type:((Response.Tick_size.t, Response.Tick_size.Type.t)
Fieldslib.Field.readonly_t -> 'elem__) ->
size:((Response.Tick_size.t, Volume.t) Fieldslib.Field.readonly_t ->
'elem__) ->
'elem__ list
val map_poly :
([< `Read ], Response.Tick_size.t, 'x0) Fieldslib.Field.user ->
'x0 list
module Direct :
sig
val iter :
Response.Tick_size.t ->
tick_type:((Response.Tick_size.t, Response.Tick_size.Type.t)
Fieldslib.Field.readonly_t ->
Response.Tick_size.t ->
Response.Tick_size.Type.t -> unit) ->
size:((Response.Tick_size.t, Volume.t) Fieldslib.Field.readonly_t ->
Response.Tick_size.t -> Volume.t -> unit) ->
unit
val fold :
Response.Tick_size.t ->
init:'acc__ ->
tick_type:('acc__ ->
(Response.Tick_size.t, Response.Tick_size.Type.t)
Fieldslib.Field.readonly_t ->
Response.Tick_size.t ->
Response.Tick_size.Type.t -> 'acc__) ->
size:('acc__ ->
(Response.Tick_size.t, Volume.t) Fieldslib.Field.readonly_t ->
Response.Tick_size.t -> Volume.t -> 'acc__) ->
'acc__
end
end
val unpickler : t Tws_prot.Unpickler.t
val pickler : t Tws_prot.Pickler.t Core.Std.Only_in_test.t
val ( = ) : t -> t -> bool
val create :
tick_type:Response.Tick_size.Type.t ->
size:Volume.t -> Response.Tick_size.t
val pp : Format.formatter -> Response.Tick_size.t -> unit
val t_of_sexp : Sexplib.Sexp.t -> Response.Tick_size.t
val sexp_of_t : Response.Tick_size.t -> Sexplib.Sexp.t
end