Module Sum.Trunc

type ws
val make : int -> ws
val accel : float array -> ws -> Fun.result
type ws_info = {
  1. size : int;
  2. terms_used : int;
  3. sum_plain : float;
}
val get_info : ws -> ws_info