Add tilemap floors to rooms

2021-06-15 14:56:32 +02:00
parent 73bd407c49
commit da631e3b37
31 changed files with 181 additions and 66 deletions
@@ -149,4 +149,8 @@ projV
    :: Point2
    -> Point2
    -> Point2
-projV fromv onv = (fromv `dotV` onv) / (onv `dotV` onv) *.* onv
+projV fromv onv 
+    | den == 0  = error "tried projecting onto zero vector"
+    | otherwise = (fromv `dotV` onv) / den *.* onv
+  where
+    den = onv `dotV` onv