totalRelativeLoad = foldl (+) 0 (map (rloadA !) [0 .. numRvrs - 1])
-- floor goes best with loadTolerance 2
targetLoad i = floor (widenInteger totalReviews * (rloadA ! i) / totalRelativeLoad) - 1
totalRelativeLoad = foldl (+) 0 (map (rloadA !) [0 .. numRvrs - 1])
-- floor goes best with loadTolerance 2
targetLoad i = floor (widenInteger totalReviews * (rloadA ! i) / totalRelativeLoad) - 1