-- Extract the character position from the world.
spritePosition (World (x, y) v anim keys) = (x, y)
spritePosition (World (x, y) v anim keys) = (x, y)
spritePosition (World (x, y) v anim keys) = (x, y)