Separate out concrete part of world

2022-07-25 12:10:50 +01:00
parent 3354d108be
commit b2efbd2b3e
134 changed files with 933 additions and 930 deletions
@@ -6,7 +6,7 @@ import Geometry.Vector

 import Control.Lens
 decTimMvVel :: Proj -> World -> World
-decTimMvVel pj = projectiles . ix pjid %~
+decTimMvVel pj = cWorld . projectiles . ix pjid %~
    ( (prjTimer -~ 1) 
    . (prjPos   %~ (+.+ vel) )
    . (prjAcc   %~ rotateV rot )