Update default config, general cleanup

2025-10-08 13:48:53 +01:00
parent 031f07f14c
commit f1ddcaa497
8 changed files with 29 additions and 12 deletions
@@ -348,6 +348,9 @@ intersectCircSeg c r a b
    z = sqrt y
    v = z *.* normalizeV (b -.- a)

+intersectCylSeg :: Point3 -> Float -> Float -> Point3 -> Point3 -> Maybe Point3
+intersectCylSeg p r h x y = Nothing
+
 intersectCircSegTest :: Point2 -> Float -> Point2 -> Point2 -> Bool
 intersectCircSegTest c r x y = intersectSegSegTest (c + z) (c - z) x y
    || dist c x <= r