diff options
Diffstat (limited to 'Bezier.hs')
-rw-r--r-- | Bezier.hs | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -32,6 +32,8 @@ data Curve = Curve | |||
32 | , curveSegments :: Maybe Polygonization | 32 | , curveSegments :: Maybe Polygonization |
33 | } | 33 | } |
34 | 34 | ||
35 | -- Although this function accepts an index, 'subdivideCurve' increases the | ||
36 | -- index by one after each call, so it is safe to ignore the index passed. | ||
35 | type StorePoint m = BufferID -> Int -> Vector Float {- 3d -} -> m () | 37 | type StorePoint m = BufferID -> Int -> Vector Float {- 3d -} -> m () |
36 | 38 | ||
37 | xz :: Vector Float -> (Float,Float) | 39 | xz :: Vector Float -> (Float,Float) |