sig
  type fcstat
  val fcstat : unit -> WpReport.fcstat
  val export : WpReport.fcstat -> string -> unit
  val export_json :
    WpReport.fcstat -> ?jinput:string -> joutput:string -> unit -> unit
end