getMapSprites :: SpriteEnv -> [Sprite]
getMapSprites env = map (spriteAt env . fst) . M.toList $ tiles (spriteLevel env)
getMapSprites :: SpriteEnv -> [Sprite]
getMapSprites env = map (spriteAt env . fst) . M.toList $ tiles (spriteLevel env)
getMapSprites env = map (spriteAt env . fst) . M.toList $ tiles (spriteLevel env)