Tweak clouds

2025-11-06 22:01:24 +00:00
parent 05c530eeb1
commit 7c62479f30
5 changed files with 48 additions and 37 deletions
@@ -54,6 +54,7 @@ lmt :: V4 (V4 a) -> V4 (V4 a)
 lmt = Linear.Matrix.transpose

 vToL :: V4 a -> [a]
+{-# INLINE vToL #-}
 vToL (V4 a b c d) = [a, b, c, d]

 perMat :: Float -> V4 (V4 Float)