Tweak pause camera movement

2023-04-25 10:23:43 +01:00
parent a2ad7c23ff
commit 734d74af52
31 changed files with 97 additions and 114 deletions
@@ -138,8 +138,8 @@ numColor 11 = toV4 (1, 0.5, 0, 1)
 numColor 12 = toV4 (1, 1, 1, 1)
 numColor _ = toV4 (1, 1, 1, 1)

-light4 :: Color -> Color
-light4 = light . light . light . light
+lightx4 :: Color -> Color
+lightx4 = light . light . light . light

 toColor8 :: Color -> Color8
 toColor8 = over each floor . (255 *) . normalizeColor