sig
  type t
  val empty : Sample.Summary.t
  val add : Sample.Summary.t -> float -> Sample.Summary.t
  val max : Sample.Summary.t -> float
  val min : Sample.Summary.t -> float
  val size : Sample.Summary.t -> int
  val mean : Sample.Summary.t -> float
  val variance : Sample.Summary.t -> float
  val sd : Sample.Summary.t -> float
  val skewness : Sample.Summary.t -> float
  val kurtosis : Sample.Summary.t -> float
  module Monoid : sig val mempty : t val mappend : t -> t -> t end
end