Helpers: Maek lambda
This commit is contained in:
parent
3e42c47585
commit
230e0477a3
|
@ -24,8 +24,7 @@ getBounds m = (getMinX, getMinY, getMaxX, getMaxY)
|
|||
getMaxY = getFromMap maximum v2y
|
||||
getMinX = getFromMap minimum v2x
|
||||
getMinY = getFromMap minimum v2y
|
||||
f f1 f2 k a result = f1 [f2 k, result]
|
||||
getFromMap f1 f2 = M.foldrWithKey (f f1 f2) 0 m
|
||||
getFromMap f1 f2 = M.foldrWithKey (\k _ result -> f1 [f2 k, result]) 0 m
|
||||
|
||||
drawMap :: M.Map Integer Char -> M.Map (V2 Int) Integer -> String
|
||||
drawMap dict m =
|
||||
|
|
Loading…
Reference in New Issue
Block a user