totalReviews = (reviewsEachProposal cfg) * numProps
totalRelativeLoad = foldl (+) 0 (map (rloadA !) [0 .. numRvrs - 1])
targetLoad i = ceiling (widenInteger totalReviews * (rloadA ! i) / totalRelativeLoad)
totalReviews = (reviewsEachProposal cfg) * numProps
totalRelativeLoad = foldl (+) 0 (map (rloadA !) [0 .. numRvrs - 1])
targetLoad i = ceiling (widenInteger totalReviews * (rloadA ! i) / totalRelativeLoad)