Continue work on shadow rendering

2023-03-14 11:20:38 +00:00
parent 9947979b52
commit 6af041bb8c
20 changed files with 417 additions and 380 deletions
@@ -26,7 +26,7 @@ roomCritLS = do
    col <- takeOne [0.5, 0.6]
    h <- takeOne [30, 35]
    rad <- takeOne [300]
-    return $ lsPosColRad (V3 0 0 h) col rad
+    return $ lsColPosRad col (V3 0 0 h) rad

 smallRoom :: Room
 smallRoom = corridorWallN & rmRandPSs .~ [psRandRanges (15, 25) (30, 45) (pi, 2 * pi)]