Functor Piecewise_linear.Make

module Make (Key : Key) : S  with type key = Key.t

type key 

type t 

include Sexpable

include Binable

val create : (key * float) list ->
       (t, string) Result.t

val get : t -> key -> float