An 'a Step_function.t is a function from Time_ns.t to 'a.
val sexp_of_t :
('a -> Ppx_sexp_conv_lib.Sexp.t) ->
'a t ->
Ppx_sexp_conv_lib.Sexp.tinclude Core_kernel.Invariant.S1 with type 'a t := 'a tval invariant : ('a -> unit) -> 'a t -> unitval init : 'a t -> 'aval steps : 'a t -> (Core_kernel.Time_ns.t * 'a) Core_kernel.Sequence.tval value : 'a t -> at:Core_kernel.Time_ns.t -> 'aval constant : 'a -> 'a tconstant a is the step function t with value t ~at = a for all at.
val create_exn : init:'a -> steps:(Core_kernel.Time_ns.t * 'a) list -> 'a tcreate_exn ~init ~steps:[(t_1, v_1); ...; (t_n, vn)] is the step function t with value t ~at = init for at < t_1, value t ~at = vi for t_i <= at < t_i+1. create_exn raises if the times aren't in nondecreasing order, i.e. if for some i <
j, ti > tj.
val create_from_sequence :
init:'a ->
steps:(Core_kernel.Time_ns.t * 'a) Core_kernel.Sequence.t ->
'a t