metabrush/src/app/MetaBrush/Stroke.hs

11 lines
235 B
Haskell
Raw Normal View History

2020-08-04 06:15:06 +00:00
module MetaBrush.Stroke where
--------------------------------------------------------------------------------
data StrokePoint
= StrokePoint
{ center :: Point2D Double
,
newtype Stroke =
Stroke { strokePoints :: Seq (