Module Mlpost__Diag.Node
type t={box_style : (Mlpost.Box.t -> Mlpost.Box.t) option;id : int;fill : Mlpost.Color.t option;boxed : bool option;x : float;y : float;s : Mlpost.Box.t;}
val create : (Mlpost.Box.t -> Mlpost.Box.t) option -> Mlpost.Color.t option -> bool option -> float -> float -> Mlpost.Box.t -> tval hash : t -> intval equal : t -> t -> bool