Tweak item dropping, add item radius

This commit is contained in:
2021-11-19 14:04:44 +00:00
parent da83bd06a6
commit 4ef1811dd6
6 changed files with 56 additions and 32 deletions
+1 -1
View File
@@ -171,7 +171,7 @@ pHalf :: Point2 -> Point2 -> Point2
pHalf !a !b = 0.5 *.* (a +.+ b)
-- | Test whether a circle is on a segment by intersecting a new normal segment through the
-- center of the circle with the segment itself.
-- Returns False if the circle center is beyond the enpoints of the
-- Returns False if the circle center is beyond the endpoints of the
-- segment.
circOnSegNoEndpoints :: Point2 -> Point2 -> Point2 -> Float -> Bool
{-# INLINE circOnSegNoEndpoints #-}