Incremental_step_functionSourceAn 'a Step_function.t is a function from Time_ns.t to 'a.
include Core.Invariant.S1 with type 'a t := '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.