Move WorldGen types into World.hs