Cleanup

2021-12-05 12:29:01 +00:00
parent 1bb1a06101
commit d9c5cfc26d
22 changed files with 148 additions and 144 deletions
@@ -110,7 +110,7 @@ movementSideEff cr w
        _   -> w
    | otherwise = footstepSideEffect cr w
  where 
-    hasJetPack = any (\it -> it ^? itCombineType == Just JETPACK) $ _crInv cr
+    hasJetPack = any (\it -> it ^? itType == Just JETPACK) $ _crInv cr
    oldPos = _crOldPos cr
    momentum' = 0.97 *.* (_crPos cr -.- _crOldPos cr)
    momentum'' | magV momentum' > 3 = 3 *.* normalizeV momentum'