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->
      functor
        (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