Remove old layer code

2022-04-10 10:32:55 +01:00
parent 2da4098d41
commit edd82fb3ac
17 changed files with 54 additions and 53 deletions
@@ -115,7 +115,7 @@ moveInverseShockwave w pt

 drawInverseShockwave :: Particle -> Picture
 drawInverseShockwave  pt 
-    = setLayer 1 $ onLayer PtLayer $ uncurryV translate p 
+    = setLayer 1 $ setDepth 20 $ uncurryV translate p 
                          $ color cyan $ thickCircle rad thickness
  where
    p = _ptPos pt