Module EzLoads
val average : ('a -> float) -> 'a list -> float
val median : ('a -> float) -> 'a list -> float
val std_dev : ('a -> float) -> 'a list -> float
type service
=
{
s_path : string;
s_args : (string * string list) list;
s_params : (string * string option list) list;
s_iter : int;
s_parallel : int option;
}
val service_enc : service Json_encoding.encoding
type config
=
{
c_iter : int;
c_parallel : int option;
c_services : service list;
}
val config_enc : config Json_encoding.encoding
val request : ?input:string -> ?offset:bool -> string -> (float * (float * float * float) option, unit) Stdlib.result Lwt.t
val service_urls : string -> service -> string list
val divide_list : int -> 'a list -> 'a list list
val service_requests : string -> service -> (int * (float * (float * float * float) option) list) Lwt.t
type stats
=
{
}
val stats_enc : stats Json_encoding.encoding
val compute_stats : string -> int -> (float * (float * float * float) option) list -> stats
val print_stats : stats -> unit
module SMap : sig ... end
val run : string -> config -> stats list Lwt.t
val services_from_sections : EzAPI.Doc.section list -> service list
val execute : EzAPI.Doc.section list -> unit