Cleanup

2024-12-28 10:31:58 +00:00
parent 39a76f758a
commit e028c54948
10 changed files with 91 additions and 102 deletions
@@ -56,7 +56,7 @@ doDebugTestF7 = uvIOEffects %~ \f u -> do
 doDebugTestF8 :: Universe -> Universe
 doDebugTestF8 = uvIOEffects %~ \f u -> do
    appendFile "log/proj" $ show 
-        (u ^?! uvWorld . cWorld . lWorld . projectiles . ix 5 . prjPos) ++ "/n"
+        (u ^?! uvWorld . cWorld . lWorld . projectiles . ix 5 . pjPos) ++ "/n"
    putStrLn "log/proj written"
    f u
 doDebugTestF10 :: Universe -> Universe