Changed rand to Rand. Updated Randomness monad to prevent hang