sig
  val parse_dot_ast : string -> Dot_ast.file
  type clusters_hash = (string, Dot_ast.attr list) Hashtbl.t
  module Parse :
    functor
      (B : Builder.S) (L : sig
                             val node :
                               Dot_ast.node_id ->
                               Dot_ast.attr list -> B.G.V.label
                             val edge : Dot_ast.attr list -> B.G.E.label
                           end->
      sig
        val parse : string -> B.G.t
        val parse_bounding_box_and_clusters :
          string -> B.G.t * string * Dot.clusters_hash
      end
end