sig
  type t = Mlpost.Dash.t
  val evenly : Mlpost.Brush.Dash.t
  val withdots : Mlpost.Brush.Dash.t
  val scaled : Mlpost.Num.t -> Mlpost.Brush.Dash.t -> Mlpost.Brush.Dash.t
  val shifted : Mlpost.Point.t -> Mlpost.Brush.Dash.t -> Mlpost.Brush.Dash.t
  type on_off
  val on : Mlpost.Num.t -> Mlpost.Brush.Dash.on_off
  val off : Mlpost.Num.t -> Mlpost.Brush.Dash.on_off
  val pattern : Mlpost.Brush.Dash.on_off list -> Mlpost.Brush.Dash.t
end