Move towards unifying door movement

2025-10-21 23:13:36 +01:00
parent 2f3a00a971
commit 39677c3a02
9 changed files with 143 additions and 79 deletions
@@ -45,7 +45,7 @@ instance ToJSON a => ToJSON (V4 a) where

 instance FromJSON a => FromJSON (V4 a)

-type DPoint2 = (Point2, Float)
+type Point2A = (Point2, Float)

 type QFloat = Q.Quaternion Float