Added a last %= to improve things.
Lensified World.hs.
Refactored impact on test util function.