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