Refactor lighting shaders

2021-06-25 00:44:45 +02:00
parent 6320093473
commit b451953b99
13 changed files with 44 additions and 80 deletions
@@ -36,8 +36,8 @@ lampPic = pictures
    [ setDepth 0 $ color white $ p
    , setDepth (negate 0.1) $ color yellow $ p
    , setDepth (negate 0.5) $ color green $ p
-    , setDepth (negate 0.7) $ color red $ p
-    , setDepth (negate 0.9) $ color blue $ p
+    , setDepth (negate 0.4) $ color red $ p
+    , setDepth (negate 0.2) $ color blue $ p
    , setDepth (negate 1) $ color white $ p
    ]
  where