Module Piecewise_linear.Time


module Time: S  with type key = Time.t

type key 
type t 
include Sexpable
val create : (key * float) list ->
[ `Fail of string | `Succeed of t ]
val get : t -> key -> float