sig
  val fprint_graph : Format.formatter -> PrintProject.t -> unit
  val output_graph : out_channel -> PrintProject.t -> unit
end