Module Graph.XDotDraw

type pos = float * float
type width = float
type height = float
type size = int
type align =
  1. | Left
  2. | Center
  3. | Right
type style_attr =
  1. | Filled
  2. | Invisible
  3. | Diagonals
  4. | Rounded
  5. | Dashed
  6. | Dotted
  7. | Solid
  8. | Bold
  9. | StyleString of string
type operation =
  1. | Filled_ellipse of pos * width * height
  2. | Unfilled_ellipse of pos * width * height
  3. | Filled_polygon of pos array
  4. | Unfilled_polygon of pos array
  5. | Polyline of pos array
  6. | Bspline of pos array
  7. | Filled_bspline of pos array
  8. | Text of pos * align * width * string
  9. | Fill_color of string
  10. | Pen_color of string
  11. | Font of float * string
  12. | Style of style_attr list
val string_scale_size : fontMeasure:(fontName:string -> fontSize:int -> string -> int * int) -> string -> float -> string -> width * height
val parse : string -> operation list
type draw_state = private {
  1. mutable fill_color : string;
  2. mutable pen_color : string;
  3. mutable font : float * string;
  4. mutable style : style_attr list;
}
val draw_with : (draw_state -> operation -> unit) -> operation list -> unit
val normalize_color : string -> string