diff --git a/test/Handler/Utils/ExamSpec.hs b/test/Handler/Utils/ExamSpec.hs
index 8c464fcab..f4b8f716b 100644
--- a/test/Handler/Utils/ExamSpec.hs
+++ b/test/Handler/Utils/ExamSpec.hs
@@ -158,7 +158,7 @@ spec = do
         -- | generate users without any pre-assigned rooms
         genUsersWithOccurrences :: Preselection -> Gen (Map UserId (User, Maybe ExamOccurrenceId), Map ExamOccurrenceId Natural)
         genUsersWithOccurrences preselection = do
-            rawUsers <- scale (1 *) $ listOf $ Entity <$> arbitrary <*> arbitrary
+            rawUsers <- scale (50 *) $ listOf $ Entity <$> arbitrary <*> arbitrary
             occurrences <- genOccurrences $ length rawUsers
             -- user surnames anpassen, sodass interessante instanz
             users <- fmap Map.fromList $ forM rawUsers $ \Entity {entityKey, entityVal} -> do