module MetaBrush.Stroke where -------------------------------------------------------------------------------- data StrokePoint = StrokePoint { center :: Point2D Double , newtype Stroke = Stroke { strokePoints :: Seq (