randomInstance numRvrs numProps = do
reviewerInfos <- indRandomArray (0, numRvrs-1) $ randomReviewerInfo numProps
:: Randomized (Array Int ReviewerInfo)
randomInstance numRvrs numProps = do
reviewerInfos <- indRandomArray (0, numRvrs-1) $ randomReviewerInfo numProps
:: Randomized (Array Int ReviewerInfo)