(* report.mli - Don Yang (uguu.org) 10/06/07 *) (* Summarize list of (timestamp, event) pairs and output to stdout *) val show_report : (float * string) list -> unit