justin/loop
1
0
Fork 0
Code Issues Pull Requests 1 Packages Projects Releases Wiki Activity

Narrow down problem, probably with bullets hitting creature

Browse Source
This commit is contained in:
justin
2021-03-15 14:32:30 +01:00
parent 0519635a27
commit 370f41738c
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Dodge/Base.hs
+1 -1
View File
@@ -22,7 +22,7 @@ import qualified Data.Set as S
-- }}} -- }}}
-- --
leftPad :: Int -> a -> [a] -> [a] leftPad :: Int -> a -> [a] -> [a]
leftPad i x xs = reverse $ take i $ reverse xs ++ repeat x leftPad i x xs = reverse $ take i $ reverse (take i xs) ++ repeat x
rightPad :: Int -> a -> [a] -> [a] rightPad :: Int -> a -> [a] -> [a]
rightPad i x xs = take i $ xs ++ repeat x rightPad i x xs = take i $ xs ++ repeat x