Refactor weapon usages

2021-08-27 16:31:43 +01:00
parent cb8613036f
commit dd44a93476
11 changed files with 308 additions and 60 deletions
@@ -258,6 +258,7 @@ ssaTri ab bc a
 -- the point which lies between pa and pc' on a line from pb of length bc.
 -- Note that there are likely two such points, this should return the point
 -- closer to pc'.
+-- TODO this still causes errors, should be made error free
 ssaTriPoint :: Point2 -> Point2 -> Point2 -> Float -> Point2
 ssaTriPoint pa pb pc' bc
    = let ab = magV (pa -.- pb)