Remove BloomNoZWrite layer

2025-11-21 09:36:56 +00:00
parent 3ceff22f36
commit 9c94e1b3f3
13 changed files with 17 additions and 63 deletions
@@ -8,7 +8,7 @@ import Control.Lens

 drawTeslaArc :: TeslaArc -> Picture
 drawTeslaArc pt =
-    setLayer BloomNoZWrite $
+    setLayer BloomLayer $ -- was nozwrite
        fold
            [ setDepth 20.5 $ color (brightX 2 1 $ _taColor pt) $ thickLine x ps
 --            , setDepth 20 $ color (V4 0 0 0 0.5) $ thickLine 10 ps